请教各位大神fortran编译是否影响结果以及一些语法问题

necrohan

看下LSOLVE(4)这个函数，应该返回true或false，直接用1判断可能有问题。
CALL CKRATX (NII, NKK, MXSP, MXTB, T, RCKWRK(NcK1),  这里是说传入的参数t和子程序需要的数组大小不一致。
Warning: Extension: Tab character in format at (1) 是Tab字符错误，我没遇到过，可以试试替换成空格。
DO J=3,YEXPANDSTART 这里的警告是 YEXPANDSTART 不是整数，可以自己取整，不知道应该向上还是向下取整。