home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 9 / 09.iso / l / l196 / 3.ddi / MATBA.BI$ / MATBA.bin
Encoding:
Text File  |  1990-06-24  |  1.3 KB  |  26 lines
  1.  
  2. DECLARE FUNCTION MatAddD% (Alpha() AS DOUBLE, Beta() AS DOUBLE)
  3. DECLARE FUNCTION MatAddI% (Alpha() AS INTEGER, Beta() AS INTEGER)
  4. DECLARE FUNCTION MatAddL% (Alpha() AS LONG, Beta() AS LONG)
  5. DECLARE FUNCTION MatAddS% (Alpha() AS SINGLE, Beta() AS SINGLE)
  6. DECLARE FUNCTION MatDetD% (A() AS DOUBLE, det#)
  7. DECLARE FUNCTION MatDetI% (A() AS INTEGER, det%)
  8. DECLARE FUNCTION MatDetL% (A() AS LONG, det&)
  9. DECLARE FUNCTION MatDetS% (A() AS SINGLE, det!)
  10. DECLARE FUNCTION MatInvD% (A() AS DOUBLE)
  11. DECLARE FUNCTION MatInvS% (A() AS SINGLE)
  12. DECLARE FUNCTION MatMultD% (Alpha() AS DOUBLE, Beta() AS DOUBLE, Gamma() AS DOUBLE)
  13. DECLARE FUNCTION MatMultI% (Alpha() AS INTEGER, Beta() AS INTEGER, Gamma() AS INTEGER)
  14. DECLARE FUNCTION MatMultL% (Alpha() AS LONG, Beta() AS LONG, Gamma() AS LONG)
  15. DECLARE FUNCTION MatMultS% (Alpha() AS SINGLE, Beta() AS SINGLE, Gamma() AS SINGLE)
  16. DECLARE FUNCTION MatSEqnD% (A() AS DOUBLE, b() AS DOUBLE)
  17. DECLARE FUNCTION MatSEqnS% (A() AS SINGLE, b() AS SINGLE)
  18. DECLARE FUNCTION MatSubD% (Alpha() AS DOUBLE, Beta() AS DOUBLE)
  19. DECLARE FUNCTION MatSubI% (Alpha() AS INTEGER, Beta() AS INTEGER)
  20. DECLARE FUNCTION MatSubL% (Alpha() AS LONG, Beta() AS LONG)
  21. DECLARE FUNCTION MatSubS% (Alpha() AS SINGLE, Beta() AS SINGLE)
  22.  
  23.  
  24. CONST seps! = .00001
  25. CONST deps# = .00000000001#
  26.