Symbol Description Uses
igen_geoth 5


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 71 CTRL_MAP_INI_GENARR 
      igen_geoth=0
./pkg/ctrl/ctrl_map_ini_genarr.F 79 CTRL_MAP_INI_GENARR 
     &     igen_geoth=iarr
./pkg/ctrl/ctrl_map_ini_genarr.F 91 CTRL_MAP_INI_GENARR 
      if (igen_geoth.GT.0)
./pkg/ctrl/ctrl_map_ini_genarr.F 92 CTRL_MAP_INI_GENARR 
     &  call CTRL_MAP_GENARR2D(geothermalFlux,igen_geoth,myThid)