Symbol Description Uses
nd 76


File Line number Procedure Code
./pkg/mnc/mnc_var.F 118 MNC_VAR_INIT_ANY 
      integer i,j,k, n, indf,indv, fid, nd, ngrid, is,ie, err
./pkg/mnc/mnc_var.F 169 MNC_VAR_INIT_ANY 
          nd = 0
./pkg/mnc/mnc_var.F 171 MNC_VAR_INIT_ANY 
            nd = nd + 1
./pkg/mnc/mnc_var.F 172 MNC_VAR_INIT_ANY 
            ids(nd) = mnc_d_ids(mnc_fd_ind(indf,k))
./pkg/mnc/mnc_var.F 204 MNC_VAR_INIT_ANY 
      err = NF_DEF_VAR(fid, vname, vtype, nd, ids, vid)
./pkg/diagnostics/diagstats_set_pointers.F 36 DIAGSTATS_SET_POINTERS 
      INTEGER md,ld,nd
./pkg/diagnostics/diagstats_set_pointers.F 64 DIAGSTATS_SET_POINTERS 
         DO nd=1,ndiagt
./pkg/diagnostics/diagstats_set_pointers.F 65 DIAGSTATS_SET_POINTERS 
          IF ( diagSt_Flds(md,ld).EQ.cdiag(nd) ) THEN
./pkg/diagnostics/diagstats_set_pointers.F 66 DIAGSTATS_SET_POINTERS 
            CALL DIAGSTATS_SETDIAG(mate,ndiagcount,md,ld,nd,myThid)
./pkg/diagnostics/diagstats_set_pointers.F 68 DIAGSTATS_SET_POINTERS 
            jSdiag(md,ld) = nd
./pkg/diagnostics/diagnostics_switch_onoff.F 132 DIAGNOSTICS_SWITCH_ONOFF 
               nd = jSdiag(m,n)
./pkg/diagnostics/diagnostics_switch_onoff.F 135 DIAGNOSTICS_SWITCH_ONOFF 
     &           nd,' ',cdiag(nd),' :',qSdiag(0,0,iSp,bi,bj),' ->', 0
./pkg/diagnostics/diagnostics_switch_onoff.F 144 DIAGNOSTICS_SWITCH_ONOFF 
               nd = jSdiag(m,n)
./pkg/diagnostics/diagnostics_switch_onoff.F 147 DIAGNOSTICS_SWITCH_ONOFF 
     &           nd,' ',cdiag(nd),' :',qSdiag(0,0,iSp,bi,bj),' ->',-1
./pkg/diagnostics/diagnostics_switch_onoff.F 46 DIAGNOSTICS_SWITCH_ONOFF 
      INTEGER m, n, nd
./pkg/diagnostics/diagnostics_set_pointers.F 130 DIAGNOSTICS_SET_POINTERS 
         nd = jdiag(md,ld)
./pkg/diagnostics/diagnostics_set_pointers.F 131 DIAGNOSTICS_SET_POINTERS 
         mate_index = gdiag(nd)(6:8)
./pkg/diagnostics/diagnostics_set_pointers.F 144 DIAGNOSTICS_SET_POINTERS 
     &         nd, '  ', cdiag(nd), ' , Parms: ', gdiag(nd)
./pkg/diagnostics/diagnostics_set_pointers.F 161 DIAGNOSTICS_SET_POINTERS 
            nd = jdiag(md,ld)
./pkg/diagnostics/diagnostics_set_pointers.F 162 DIAGNOSTICS_SET_POINTERS 
            kLev = MIN(kdiag(nd),kLev)
./pkg/diagnostics/diagnostics_set_pointers.F 193 DIAGNOSTICS_SET_POINTERS 
            nd = jdiag(md,ld)
./pkg/diagnostics/diagnostics_set_pointers.F 194 DIAGNOSTICS_SET_POINTERS 
            IF ( kLev.GT.kdiag(nd) ) THEN
./pkg/diagnostics/diagnostics_set_pointers.F 205 DIAGNOSTICS_SET_POINTERS 
     &       '(=',kdiag(nd),') for Diag. #', nd, ' : ',cdiag(nd)
./pkg/diagnostics/diagnostics_set_pointers.F 208 DIAGNOSTICS_SET_POINTERS 
     &       ' parsing code >>',gdiag(nd),'<<'
./pkg/diagnostics/diagnostics_set_pointers.F 36 DIAGNOSTICS_SET_POINTERS 
      INTEGER md,ld,nd
./pkg/diagnostics/diagnostics_set_pointers.F 65 DIAGNOSTICS_SET_POINTERS 
         DO nd=1,ndiagt
./pkg/diagnostics/diagnostics_set_pointers.F 66 DIAGNOSTICS_SET_POINTERS 
          IF ( flds(md,ld).EQ.cdiag(nd) ) THEN
./pkg/diagnostics/diagnostics_set_pointers.F 67 DIAGNOSTICS_SET_POINTERS 
            CALL DIAGNOSTICS_SETDIAG(mate,ndiagcount,md,ld,nd,myThid)
./pkg/diagnostics/diagnostics_set_pointers.F 69 DIAGNOSTICS_SET_POINTERS 
            jdiag(md,ld) = nd
./pkg/fizhi/update_ocean_exports.F 175 GETSICE 
      integer i,j,n,nn,iyear,iyearbc,nd,ndby3,imbc,jmbc
./pkg/fizhi/update_ocean_exports.F 292 GETSICE 
      nd = 2
./pkg/fizhi/update_ocean_exports.F 303 GETSICE 
       do while (.not.found .and. nd .le. ndatebc)
./pkg/fizhi/update_ocean_exports.F 304 GETSICE 
        timebc2 = dfloat(nymdbc(nd)) + dfloat(nhmsbc(nd))/1000000
./pkg/fizhi/update_ocean_exports.F 306 GETSICE 
         nymdbc1 = nymdbc(nd-1)
./pkg/fizhi/update_ocean_exports.F 307 GETSICE 
         nymdbc2 = nymdbc(nd)
./pkg/fizhi/update_ocean_exports.F 308 GETSICE 
         nhmsbc1 = nhmsbc(nd-1)
./pkg/fizhi/update_ocean_exports.F 309 GETSICE 
         nhmsbc2 = nhmsbc(nd)
./pkg/fizhi/update_ocean_exports.F 310 GETSICE 
         call BCDATA (iunit,imbc,jmbc,nd,nd+1,sicebc1,sicebc2)
./pkg/fizhi/update_ocean_exports.F 313 GETSICE 
         nd = nd + 1
./pkg/fizhi/update_ocean_exports.F 427 GETSST 
      integer i,j,n,nn,iyear,iyearbc,nd,ndby3,imbc,jmbc
./pkg/fizhi/update_ocean_exports.F 545 GETSST 
      nd = 2
./pkg/fizhi/update_ocean_exports.F 556 GETSST 
       do while (.not.found .and. nd .le. ndatebc)
./pkg/fizhi/update_ocean_exports.F 557 GETSST 
        timebc2 = dfloat(nymdbc(nd)) + dfloat(nhmsbc(nd))/1000000
./pkg/fizhi/update_ocean_exports.F 559 GETSST 
         nymdbc1 = nymdbc(nd-1)
./pkg/fizhi/update_ocean_exports.F 560 GETSST 
         nymdbc2 = nymdbc(nd)
./pkg/fizhi/update_ocean_exports.F 561 GETSST 
         nhmsbc1 = nhmsbc(nd-1)
./pkg/fizhi/update_ocean_exports.F 562 GETSST 
         nhmsbc2 = nhmsbc(nd)
./pkg/fizhi/update_ocean_exports.F 563 GETSST 
         call BCDATA (iunit,imbc,jmbc,nd,nd+1,sstbc1,sstbc2)
./pkg/fizhi/update_ocean_exports.F 566 GETSST 
         nd = nd + 1
./pkg/fizhi/fizhi_alarms.F 101 FIZHI_ALARMS 
      ndmoist = nhmsf( nd )
./pkg/fizhi/fizhi_alarms.F 39 FIZHI_ALARMS 
      integer  nhmsf, m,n, nd
./pkg/fizhi/fizhi_alarms.F 63 FIZHI_ALARMS 
      nd = ndturb
./pkg/fizhi/fizhi_alarms.F 64 FIZHI_ALARMS 
      do while ( mod(3*3600,nd).ne.0 )
./pkg/fizhi/fizhi_alarms.F 65 FIZHI_ALARMS 
      nd = ndturb + 2*n*m*ndt
./pkg/fizhi/fizhi_alarms.F 68 FIZHI_ALARMS 
      if( nd.lt.ndt ) then
./pkg/fizhi/fizhi_alarms.F 78 FIZHI_ALARMS 
      ndturb  = nhmsf( nd )
./pkg/fizhi/fizhi_alarms.F 86 FIZHI_ALARMS 
      nd = ndmoist
./pkg/fizhi/fizhi_alarms.F 87 FIZHI_ALARMS 
      do while ( mod(3*3600,nd).ne.0 )
./pkg/fizhi/fizhi_alarms.F 88 FIZHI_ALARMS 
      nd = ndmoist + n*m*ndt
./pkg/fizhi/fizhi_alarms.F 91 FIZHI_ALARMS 
      if( nd.lt.ndt ) then
./pkg/fizhi/fizhi_clockstuff.F 811 TIC_TIME 
      integer ny,nm,nd,ny00,modymd