fortran 数组作为参数传递

czqczqczq

fcode 发表于 2018-5-2 15:22
chiangtp,
是的，需要虚参是 assumed-shape array

类似的问题：
call Update ( nblock,  stateOld(1,12), stateNew(1,12 )
stateOld是（nblock,17）, stateNew(nblock,17 ) 矩阵
而在
subroutine strainUpdate ( nblock, strainOld, strainNew )

dimension   strainOld(nblock,6),    strainNew(nblock,6)

那么 子程序中strainOld(nblock,6),    strainNew(nblock,6)矩阵与原来的stateOld是（nblock,17）, stateNew(nblock,17 )矩阵怎么对应？？