| File |
Line number |
Procedure |
Code |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
54 |
CTRL_MAP_INI_GENARR |
integer igen_etan,igen_bdrag,igen_geoth |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
69 |
CTRL_MAP_INI_GENARR |
igen_etan=0 |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
75 |
CTRL_MAP_INI_GENARR |
& igen_etan=iarr |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
83 |
CTRL_MAP_INI_GENARR |
if (igen_etan.GT.0) then |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
84 |
CTRL_MAP_INI_GENARR |
call CTRL_MAP_GENARR2D(etaN,igen_etan,myThid) |