Symbol Description Uses
mnc_g_names grid names <----+ 13



File Line number Procedure Code
./pkg/mnc/MNC_COMMON.h 135 NO PROCEDURE
     &     mnc_g_names, mnc_v_names, mnc_d_names, 
./pkg/mnc/MNC_COMMON.h 139 NO PROCEDURE
      character*(MNC_MAX_CHAR) mnc_g_names(MNC_MAX_ID)
./pkg/mnc/mnc_dump.F 51 MNC_DUMP_ALL
        write(*,'(i3,a,a40)') i,':', mnc_g_names(i)(1:40)
./pkg/mnc/mnc_file.F 389 MNC_FILE_CLOSE
          mnc_g_names(k)(1:MNC_MAX_CHAR)=mnc_blank_name(1:MNC_MAX_CHAR)
./pkg/mnc/mnc_grid.F 123 MNC_GRID_INIT_ALL
        ngt = ILNBLNK(mnc_g_names(mnc_f_info(indf,ii)))
./pkg/mnc/mnc_grid.F 125 MNC_GRID_INIT_ALL
     &       .AND. (mnc_g_names(mnc_f_info(indf,ii))(1:ngt) 
./pkg/mnc/mnc_grid.F 168 MNC_GRID_INIT_ALL
      CALL MNC_GET_NEXT_EMPTY_IND(MNC_MAX_ID, mnc_g_names,
./pkg/mnc/mnc_grid.F 170 MNC_GRID_INIT_ALL
      mnc_g_names(indg)(1:MNC_MAX_CHAR) =
./pkg/mnc/mnc_grid.F 173 MNC_GRID_INIT_ALL
      mnc_g_names(indg)(1:n) = gname(1:n)
./pkg/mnc/mnc_init.F 55 MNC_INIT
        mnc_g_names(i)(1:MNC_MAX_CHAR) = blank(1:MNC_MAX_CHAR)
./pkg/mnc/mnc_var.F 188 MNC_VAR_INIT_ANY
        n = ILNBLNK(mnc_g_names(k))
./pkg/mnc/mnc_var.F 190 MNC_VAR_INIT_ANY
     &       .AND. (mnc_g_names(k)(1:n) .EQ. gname(1:n))) THEN
./pkg/mnc/mnc_var.F 214 MNC_VAR_INIT_ANY
          IF (mnc_g_names(k) .NE. gname) THEN