Symbol Description Uses
fgname 13


File Line number Procedure Code
./pkg/mnc/mnc_cw_udim.F 103 MNC_CW_GET_UDIM 
      character*(*) fgname
./pkg/mnc/mnc_cw_udim.F 113 MNC_CW_GET_UDIM 
      fgf = IFNBLNK(fgname)
./pkg/mnc/mnc_cw_udim.F 114 MNC_CW_GET_UDIM 
      fgl = ILNBLNK(fgname)
./pkg/mnc/mnc_cw_udim.F 115 MNC_CW_GET_UDIM 
      CALL MNC_GET_IND(MNC_MAX_ID, fgname, mnc_cw_fgnm, indfg, myThid)
./pkg/mnc/mnc_cw_udim.F 119 MNC_CW_GET_UDIM 
     &       fgname(fgf:fgl), ''' is not defined'
./pkg/mnc/mnc_cw_udim.F 12 MNC_CW_SET_UDIM 
     I     fgname,
./pkg/mnc/mnc_cw_udim.F 37 MNC_CW_SET_UDIM 
      character*(*) fgname
./pkg/mnc/mnc_cw_udim.F 48 MNC_CW_SET_UDIM 
      fgf = IFNBLNK(fgname)
./pkg/mnc/mnc_cw_udim.F 49 MNC_CW_SET_UDIM 
      fgl = ILNBLNK(fgname)
./pkg/mnc/mnc_cw_udim.F 50 MNC_CW_SET_UDIM 
      CALL MNC_GET_IND(MNC_MAX_ID, fgname, mnc_cw_fgnm, indfg, myThid)
./pkg/mnc/mnc_cw_udim.F 54 MNC_CW_SET_UDIM 
        mnc_cw_fgnm(indfg)(1:(fgl-fgf+1)) = fgname(fgf:fgl)
./pkg/mnc/mnc_cw_udim.F 74 MNC_CW_SET_UDIM 
     &     fgname(fgf:fgl), ''' the unlim dim ''', nudim,
./pkg/mnc/mnc_cw_udim.F 88 MNC_CW_GET_UDIM 
     I     fgname,