RUNT VERSION FES 74 8 17tl2 fc<t/Z3/7i> 

 C. EVALUATE DETERMINANT. 



Sb*. 



IF <OTRMNT) 70.74,70 



366 



70 DO 72 J«1.N 



370 



72 DTRMNT'DTPMNT*A( J, J) 



377 



74 LNE0F=1 



401 



RETURN 





C. SINGULAR MATRIX, SET E 



401 



94 LNEOF • 2 



403 



DTRMNT«0. 



404 



RETURN 



405 



END 



Table D-2. Continued 



130 



