home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / INFO / FORTRAN / LLSQ.ZIP / DIFF.FOR < prev    next >
Encoding:
Text File  |  1984-02-23  |  493 b   |  7 lines
  1.       FUNCTION DIFF(X,Y)                                                DFF00100
  2. C     C.L.LAWSON AND R.J.HANSON, JET PROPULSION LABORATORY, 1973 JUNE 7 DFF00200
  3. C     TO APPEAR IN 'SOLVING LEAST SQUARES PROBLEMS', PRENTICE-HALL, 1974DFF00300
  4.       DIFF=X-Y                                                          DFF00400
  5.       RETURN                                                            DFF00500
  6.       END                                                               DFF00600
  7.