cal_sec_to_clock()

CAL_$SEC_TO_CLOCK                 Domain/OS                  CAL_$SEC_TO_CLOCK


NAME
     cal_$sec_to_clock - convert seconds to a clock value

SYNOPSIS (C)
     #include <apollo/base.h>
     #include <apollo/cal.h>

     void cal_$sec_to_clock(
          unsigned long &seconds,
          time_$clock_t *clock_value)

SYNOPSIS (Pascal)
     %include '/sys/ins/base.ins.pas';
     %include '/sys/ins/cal.ins.pas';

     procedure cal_$sec_to_clock(
          in seconds: linteger;
          out clock_value: time_$clock_t);

SYNOPSIS (FORTRAN)
     %include '/sys/ins/base.ins.ftn'
     %include '/sys/ins/cal.ins.ftn'

           integer*2 clock(3), clockh
           integer*4 clockl, seconds

           equivalence (clockl, clock_value(2)), (clockh, clock_value(1))

           call cal_$sec_to_clock(seconds, clock_value)

DESCRIPTION
     Cal_$sec_to_clock calculates the number of 4-microsecond system clock
     periods equivalent to the number of seconds in seconds, and supplies the
     result in clock_value.

     seconds
          An time interval expressed in seconds.

     clock_value
          The same interval defined by seconds expressed in 4-microsecond sys-
          tem clock periods.

NOTES
     Cal_$sec_to_clock does not detect overflows.
Museum
