[daip] DATCAL and dispersive delay corrections (15APR99)

[Michael Bietenholz]

(As usual, if this has been found and fixed already ignore this message;
this is the 15APR99 version)

DATCAL does the dispersive delay corrections wrong.  The fix is
simply to replace the indicated "GI" below with "GID".

               IF (DODISP) THEN
                  IF (BADDSP) THEN
                     GWT = 0.0
                  ELSE
                     PHASE = LAMBDA(NLAMDA * (IIF - 1) + IFQ)
     *                       * (DDELAY(IA1) - DDELAY(IA2))
                     GRD = COS (PHASE)
                     GID = SIN (PHASE)
                     TVR1 = TVR
                     TVR = GRD * TVR1 + GID * TVI
>>>                  TVI = GRD * TVI - GI * TVR1     <<<
                                       ^^
                     END IF
                  END IF

                           michael bietenholz