目前我在DISP
写了一个子程序fortran
,我是新手。在这段代码中,我想读一个我使用的文件
OPEN(UNIT = 1, FILE = "abcd.txt", FORM = "FORMATTED", STATUS = "OLD", ACTION = "READ")
这些文件包含nxm Matrix中的值。我想在此矩阵中指定值,例如column 5 = displacement
和column 1 = nodes
。
我可以声明像REAL,DIMENSION(n,m)::A
这样的数组,然后使用DO LOOP
将值分配给NODES
和U(1)
这些已经是子程序中声明的参数吗?
SUBROUTINE DISP(U,KSTEP,KINC,TIME,NODE,NOEL,JDOF,COORDS)