src/Marando/IAU/iauUt1tai.php
public static function Ut1tai($ut11, $ut12, $dta, &$tai1, &$tai2) {
    $dtad;

    /* Result, safeguarding precision. */
    $dtad = $dta / DAYSEC;
    if ($ut11 > $ut12) {
      $tai1 = $ut11;
      $tai2 = $ut12 - $dtad;
    }
    else {
      $tai1 = $ut11 - $dtad;
      $tai2 = $ut12;
    }

    /* Status (always OK). */
    return 0;
  }
public static function Ut1tai($ut11, $ut12, $dta, &$tai1, &$tai2) {
    $dtad;

    /* Result, safeguarding precision. */
    $dtad = $dta / DAYSEC;
    if ($ut11 > $ut12) {
      $tai1 = $ut11;
      $tai2 = $ut12 - $dtad;
    }
    else {
      $tai1 = $ut11 - $dtad;
      $tai2 = $ut12;
    }

    /* Status (always OK). */
    return 0;
  }
public static function Ut1tai ( $ ut11 , $ ut12 , $ dta , & $ tai1 , & $ tai2 ) { $ dtad ; /* Result, safeguarding precision. */ $ dtad = $ dta / DAYSEC ; if ( $ ut11 > $ ut12 ) { $ tai1 = $ ut11 ; $ tai2 = $ ut12 - $ dtad ; } else { $ tai1 = $ ut11 - $ dtad ; $ tai2 = $ ut12 ; } /* Status (always OK). */ return 0 ; }
- - - - - - - - - -
i a u U t 1 t a i
- - - - - - - - - -

Time scale transformation:  Universal Time, UT1, to International
Atomic Time, TAI.

This function is part of the International Astronomical Union's
SOFA (Standards of Fundamental Astronomy) software collection.

Status:  canonical.

Given:
ut11,ut12  double    UT1 as a 2-part Julian Date
dta        double    UT1-TAI in seconds

Returned:
tai1,tai2  double    TAI as a 2-part Julian Date

Returned (function value):
int       status:  0 = OK

Notes:

1) ut11+ut12 is Julian Date, apportioned in any convenient way
between the two arguments, for example where ut11 is the Julian
Day Number and ut12 is the fraction of a day.  The returned
tai1,tai2 follow suit.

2) The argument dta, i.e. UT1-TAI, is an observed quantity, and is
available from IERS tabulations.

Reference:

Explanatory Supplement to the Astronomical Almanac,
P. Kenneth Seidelmann (ed), University Science Books (1992)

This revision:  2013 June 18

SOFA release 2015-02-09

Copyright (C) 2015 IAU SOFA Board.  See notes at end.
- - - - - - - - - - i a u U t 1 t a i - - - - - - - - - -