Former-commit-id:133dc97f67
[formerlya02aeb236c
] [formerly9f19e3f712
] [formerly133dc97f67
[formerlya02aeb236c
] [formerly9f19e3f712
] [formerly06a8b51d6d
[formerly9f19e3f712
[formerly 64fa9254b946eae7e61bbc3f513b7c3696c4f54f]]]] Former-commit-id:06a8b51d6d
Former-commit-id:9bb8decbcf
[formerly8e80217e59
] [formerly377dcd10b9
[formerly3360eb6c5f
]] Former-commit-id:377dcd10b9
Former-commit-id:e2ecdcfe33
7 lines
268 B
Text
7 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
|