home *** CD-ROM | disk | FTP | other *** search
/ The Fred Fish Collection 1.5 / ffcollection-1-5-1992-11.iso / ff_disks / 100-199 / ff144.lzh / AnalytiCalc / AnalySources.Arc / SCIFCT.FTN < prev   
Text File  |  1988-03-09  |  366b  |  14 lines
  1. C SCIENTIFIC FUNCTION CALLER
  2. C This version is a dummy placeholder.
  3. C The SCIFCT subroutine exists to allow AnalytiCalc to call just
  4. C about *ANY* Fortran callable routine.
  5.     SUBROUTINE SCIFCT(LINE,RETCD)
  6.     INTEGER RETCD
  7.     CHARACTER*1 LINE(80)
  8.     RETCD=1
  9. C HANDLE *U STXXXX FUNCTIONS. LINE ARRAY PASSED IN HERE
  10. C STARTS AFTER THE "ST" SO WE CAN DECODE IT.
  11.     RETURN
  12.     END
  13.  
  14.