Symbol Description Uses
xx_kapgm_file 12


File Line number Procedure Code
./pkg/ecco/cost_kapgm.F 100 COST_KAPGM 
        ilfld = ilnblnk( xx_kapgm_file )
./pkg/ecco/cost_kapgm.F 102 COST_KAPGM 
     &       xx_kapgm_file(1:ilfld),'.',optimcycle
./optim/optim_numbmod.F 142 OPTIM_NUMBMOD 
     &  xx_kapgm_file,
./pkg/ctrl/ctrl_map_ini.F 244 CTRL_MAP_INI 
      il=ilnblnk( xx_kapgm_file )
./pkg/ctrl/ctrl_map_ini.F 246 CTRL_MAP_INI 
     &     xx_kapgm_file(1:il),'.',optimcycle
./pkg/ctrl/ctrl_pack.F 122 CTRL_PACK 
      call CTRL_SET_FNAME(xx_kapgm_file, fname_kapgm, mythid)
./pkg/ctrl/ctrl.h 384 NO PROCEDURE 
     &                    , xx_kapgm_file
./pkg/ctrl/ctrl.h 417 NO PROCEDURE 
      character*(MAX_LEN_FNAM) xx_kapgm_file
./pkg/ctrl/ctrl_init.F 494 CTRL_INIT 
     &       xx_kapgm_file, 16, 116, 1, 1, 1,
./pkg/ctrl/ctrl_unpack.F 131 CTRL_UNPACK 
      call CTRL_SET_FNAME(xx_kapgm_file, fname_kapgm, mythid)
./pkg/ctrl/ctrl_readparms.F 100 CTRL_READPARMS 
     &  xx_kapgm_file,
./pkg/ctrl/ctrl_readparms.F 187 CTRL_READPARMS 
        xx_kapgm_file       = 'xx_kapgm'