小编use*_*055的帖子

我遇到了这些错误。

colsys.f:1367.51:

     1          NOLD, ALDIF, K, NCOMP, M, MSTAR, 3,DUMM,0)              
                                                   1
Warning: Rank mismatch in argument 'dmval' at (1) (rank-1 and scalar)
colsys.f:814.33:

     1          EALPHA, A, IPIV, INTEGS, RNORM, 0, FSUB,                
                                 1
Warning: Actual argument contains too few elements for dummy argument 'integs' (1/3) at (1)

这里我给出了程序链接。下面提供的链接中有更多错误。我修正了一些错误。但我不知道如何附加更新的程序，因为复制和粘贴太长。

http://www4.ncsu.edu/~mtchu/Teaching/Lectures/MA581/colsys.f