1 : C ILIN SOURCE CHAT 05/01/13 00:33:17 5004 2 : SUBROUTINE ILIN(XCO,DM,FE) 3 : IMPLICIT INTEGER(I-N) 4 : IMPLICIT REAL*8 (A-H,O-Z) 4 : CALL CALFF(XCO,FE) 5 : FE=FE+DLOG(DM) 6 : RETURN 7 : END 8 :
© Cast3M 2003 - All rights reserved.
Disclaimer