sw/os8/v3d/sources/fortran/all/xfix.ra

   1 /
   2 / VERSION 5A 4-26-77 MH
   3 /
   4         SECT    #FIX
   5         JA      .
   6         JLT     NEGFIX
   7         ALN     0
   8         FNORM
   9         JA      #FIX
  10 NEGFIX, FNEG
  11         ALN     0
  12         FNORM
  13         FNEG
  14         JA      #FIX
  15         END
  16 \f