主题:有关common
SUBROUTINE FPIGRA (IL,X)
REAL LOAD,NU,ACCUR(3),K5
COMMON/ASDT/LAYER,NLAYS,M,R,Z,NU(10),ACCUR,LOAD,HOSTRS,NZEROS,H(9)
1,K5(10),E(10),AL(9),THICK(9),RADIUS(10)
COMMON/IGRAN/T0,V0,S0,U0,T1,V1,S1,U1,TQ1,SQ1,FPIGR,EXP1,EXP2
COMMON/TYPE1/KD,KC,ES(10),E2(10),ES2(10)
这是一个SUBROUTINE的前部分,有些问题不是很明白。
1.这里边有real load,nu....,但在程序中好像用的是共同区域的COMMON/ASDT/LOAD,那它到底是定义什么?
2.既然有了real load,nu....,那COMMON/ASDT/LOAD不是冲突了?
3.怎么知道公共区域中的变量,如m,r是real,还是integer?
新手入门,等待高手解答
REAL LOAD,NU,ACCUR(3),K5
COMMON/ASDT/LAYER,NLAYS,M,R,Z,NU(10),ACCUR,LOAD,HOSTRS,NZEROS,H(9)
1,K5(10),E(10),AL(9),THICK(9),RADIUS(10)
COMMON/IGRAN/T0,V0,S0,U0,T1,V1,S1,U1,TQ1,SQ1,FPIGR,EXP1,EXP2
COMMON/TYPE1/KD,KC,ES(10),E2(10),ES2(10)
这是一个SUBROUTINE的前部分,有些问题不是很明白。
1.这里边有real load,nu....,但在程序中好像用的是共同区域的COMMON/ASDT/LOAD,那它到底是定义什么?
2.既然有了real load,nu....,那COMMON/ASDT/LOAD不是冲突了?
3.怎么知道公共区域中的变量,如m,r是real,还是integer?
新手入门,等待高手解答