110 |
& somSfx |
& somSfx |
111 |
|
|
112 |
C-- COMMON /GAD_PARM_I/ Integer parameters for GAD pkg routines |
C-- COMMON /GAD_PARM_I/ Integer parameters for GAD pkg routines |
|
C GAD_Scheme_olSize :: overlap minimum size for this advection scheme |
|
113 |
C GAD_OlMinSize :: overlap minimum size for GAD routines |
C GAD_OlMinSize :: overlap minimum size for GAD routines |
114 |
C 1: min required; 2: to add to current min; 3: factor to apply |
C 1: min required; 2: to add to current min; 3: factor to apply |
|
INTEGER GAD_Scheme_olSize(GAD_Scheme_MaxNum) |
|
115 |
INTEGER GAD_OlMinSize(3) |
INTEGER GAD_OlMinSize(3) |
116 |
COMMON /GAD_PARM_I/ |
COMMON /GAD_PARM_I/ |
|
& GAD_Scheme_olSize, |
|
117 |
& GAD_OlMinSize |
& GAD_OlMinSize |
118 |
|
|
119 |
C-- COMMON /GAD_PARM_L/ Logical parameters for GAD pkg routines |
C-- COMMON /GAD_PARM_L/ Logical parameters for GAD pkg routines |