home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / INFO / MISC / IFP05.ZIP / FPMATH.EXE / LINEAR.EXE / SINGLETO < prev    next >
Encoding:
Text File  |  1987-02-09  |  76 b   |  5 lines
  1. (* Check if matrix is a singleton *)
  2.  
  3. DEF Singleton AS [length,#1]|=;
  4.  
  5.