8 lines
268 B
Text
8 lines
268 B
Text
|
C Common block: pre_common
|
||
|
|
C------------------------------------------------------------------------------
|
||
|
|
c stores the dimension and datatype out of cardlo
|
||
|
|
c for use in the preadjust program
|
||
|
|
|
||
|
|
character dtype*4, dimn*4
|
||
|
|
common / pre_common/ dtype, dimn
|