Museum

Home

Lab Overview

Retrotechnology Articles

⇒ Online Manual

Media Vault

Software Library

Restoration Projects

Artifacts Sought

CAL_$FLOAT_CLOCK                  Domain/OS                   CAL_$FLOAT_CLOCK


NAME
     cal_$float_clock - convert clock ticks into seconds

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

     void cal_$float_clock(
          time_$clock_t &clock_value,
          double *float_seconds)

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

     procedure cal_$float_clock(
          in clock_value: time_$clock_t;
          out float_seconds: univ cal_$dpval_t);

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

           integer*2 clock_value(3), clockh
           integer*4 clockl
           double precision float_seconds

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

           call cal_$float_clock(clock_value, float_seconds)

DESCRIPTION
     Cal_$float_clock calculates the number of seconds equivalent to the
     number of system clock ticks in clock_value, and supplies the floating
     point result in float_seconds.

     clock_value
          The clock value to be converted.

     float_seconds
          The number of seconds equivalent to clock_value.

Typewritten Software • bear@typewritten.org • Edmonds, WA 98026