Symbol Description Uses
mnc_d_names names <--+ <--+ | 18


File Line number Procedure Code
./pkg/mnc/mnc_init.F 40 MNC_INIT 
        mnc_d_names(i)(1:MNC_MAX_CHAR) = blank(1:MNC_MAX_CHAR)
./pkg/mnc/mnc_common.h 129 NO PROCEDURE 
     &     mnc_f_names, mnc_g_names, mnc_v_names, mnc_d_names,
./pkg/mnc/mnc_common.h 140 NO PROCEDURE 
      character*(MNC_MAX_CHAR) mnc_d_names(MNC_MAX_ID)
./pkg/mnc/mnc_dim.F 113 MNC_DIM_INIT_ALL_CV 
        ntmp = ILNBLNK(mnc_d_names(j))
./pkg/mnc/mnc_dim.F 115 MNC_DIM_INIT_ALL_CV 
     &       .AND. (dname(dnf:dnl) .EQ. mnc_d_names(j)(1:ntmp))) THEN
./pkg/mnc/mnc_dim.F 135 MNC_DIM_INIT_ALL_CV 
      CALL MNC_GET_NEXT_EMPTY_IND(MNC_MAX_ID, mnc_d_names, indd, myThid)
./pkg/mnc/mnc_dim.F 159 MNC_DIM_INIT_ALL_CV 
      mnc_d_names(indd)(1:(dnl-dnf+1)) = dname(dnf:dnl)
./pkg/mnc/mnc_dump.F 59 MNC_DUMP_ALL 
        write(*,'(i3,a,a40)') i,':', mnc_d_names(i)
./pkg/mnc/mnc_grid.F 144 MNC_GRID_INIT_ALL 
            IF (mnc_d_names(mnc_fd_ind(indf,jj)) .NE. dnames(k)) THEN
./pkg/mnc/mnc_grid.F 185 MNC_GRID_INIT_ALL 
          kk = ILNBLNK(mnc_d_names(jj))
./pkg/mnc/mnc_grid.F 187 MNC_GRID_INIT_ALL 
     &         .AND. (dnames(i)(1:n) .EQ. mnc_d_names(jj)(1:kk))) THEN
./pkg/mnc/mnc_grid.F 254 MNC_GRID_GET_DIMIND 
          n1 = ILNBLNK(mnc_d_names(l))
./pkg/mnc/mnc_grid.F 256 MNC_GRID_GET_DIMIND 
     &         .AND. (mnc_d_names(l)(1:n1) .EQ. dname(1:n))) THEN
./pkg/mnc/mnc_file.F 378 MNC_FILE_CLOSE 
        mnc_d_names(j)(1:MNC_MAX_CHAR) = mnc_blank_name(1:MNC_MAX_CHAR)
./pkg/mnc/mnc_file.F 695 MNC_FILE_TRY_READ 
          n1 = IFNBLNK(mnc_d_names(j))
./pkg/mnc/mnc_file.F 696 MNC_FILE_TRY_READ 
          n2 = ILNBLNK(mnc_d_names(j))
./pkg/mnc/mnc_file.F 698 MNC_FILE_TRY_READ 
     &         .AND. (mnc_d_names(j)(ns:ne) .EQ. name(ns:ne))) THEN
./pkg/mnc/mnc_file.F 719 MNC_FILE_TRY_READ 
          dnames(i)(1:MNC_MAX_CHAR) = mnc_d_names(did)(1:MNC_MAX_CHAR)