Symbol Description Uses
npart float identifier 84


File Line number Procedure Code
./pkg/flt/FLT.h 110 NO PROCEDURE 
      _RL     npart(max_npart_tile,nSx,nSy)
./pkg/flt/FLT.h 121 NO PROCEDURE 
     &       npart, tstart, tend,
./pkg/flt/flt_exch2.F 113 FLT_EXCH2 
               fltbuf_send(ic+1,bi,bj,W2_EAST) =   npart(ip,bi,bj)
./pkg/flt/flt_exch2.F 130 FLT_EXCH2 
               npart(ip,bi,bj) = 0.
./pkg/flt/flt_exch2.F 146 FLT_EXCH2 
               fltbuf_send(ic+1,bi,bj,W2_WEST) =   npart(ip,bi,bj)
./pkg/flt/flt_exch2.F 163 FLT_EXCH2 
               npart(ip,bi,bj) = 0.
./pkg/flt/flt_exch2.F 192 FLT_EXCH2 
              IF ( npart(jp,bi,bj).NE.0. _d 0 ) THEN
./pkg/flt/flt_exch2.F 196 FLT_EXCH2 
                npart (ip,bi,bj) =  npart (jp,bi,bj)
./pkg/flt/flt_exch2.F 225 FLT_EXCH2 
            IF ( npart(ip,bi,bj).NE.0 ) THEN
./pkg/flt/flt_exch2.F 238 FLT_EXCH2 
               fltbuf_send(ic+1,bi,bj,W2_NORTH) =   npart(ip,bi,bj)
./pkg/flt/flt_exch2.F 255 FLT_EXCH2 
               npart(ip,bi,bj) = 0.
./pkg/flt/flt_exch2.F 276 FLT_EXCH2 
               fltbuf_send(ic+1,bi,bj,W2_SOUTH) =   npart(ip,bi,bj)
./pkg/flt/flt_exch2.F 293 FLT_EXCH2 
               npart(ip,bi,bj) = 0.
./pkg/flt/flt_exch2.F 329 FLT_EXCH2 
              IF ( npart(jp,bi,bj).NE.0. _d 0 ) THEN
./pkg/flt/flt_exch2.F 333 FLT_EXCH2 
                npart (ip,bi,bj) =  npart (jp,bi,bj)
./pkg/flt/flt_exch2.F 396 FLT_EXCH2 
               npart( jp,bi,bj) = fltbuf_recv(ic+1,bi,bj,W2_EAST)
./pkg/flt/flt_exch2.F 425 FLT_EXCH2 
               npart( jp,bi,bj) = fltbuf_recv(ic+1,bi,bj,W2_WEST)
./pkg/flt/flt_exch2.F 454 FLT_EXCH2 
               npart( jp,bi,bj) = fltbuf_recv(ic+1,bi,bj,W2_NORTH)
./pkg/flt/flt_exch2.F 483 FLT_EXCH2 
               npart( jp,bi,bj) = fltbuf_recv(ic+1,bi,bj,W2_SOUTH)
./pkg/flt/flt_exchg.F 113 FLT_EXCHG 
               fltbuf_sendE(ic+1,bi,bj) =   npart(ip,bi,bj)
./pkg/flt/flt_exchg.F 126 FLT_EXCHG 
               npart(ip,bi,bj) = 0.
./pkg/flt/flt_exchg.F 146 FLT_EXCHG 
               fltbuf_sendW(ic+1,bi,bj) =   npart(ip,bi,bj)
./pkg/flt/flt_exchg.F 159 FLT_EXCHG 
               npart(ip,bi,bj) = 0.
./pkg/flt/flt_exchg.F 188 FLT_EXCHG 
              IF ( npart(jp,bi,bj).NE.0. _d 0 ) THEN
./pkg/flt/flt_exchg.F 192 FLT_EXCHG 
                npart (ip,bi,bj) =  npart (jp,bi,bj)
./pkg/flt/flt_exchg.F 241 FLT_EXCHG 
               npart( jp,bi,bj) = fltbuf_recvE(ic+1,bi,bj)
./pkg/flt/flt_exchg.F 270 FLT_EXCHG 
               npart( jp,bi,bj) = fltbuf_recvW(ic+1,bi,bj)
./pkg/flt/flt_exchg.F 346 FLT_EXCHG 
               fltbuf_sendE(ic+1,bi,bj) =   npart(ip,bi,bj)
./pkg/flt/flt_exchg.F 359 FLT_EXCHG 
               npart(ip,bi,bj) = 0.
./pkg/flt/flt_exchg.F 384 FLT_EXCHG 
               fltbuf_sendW(ic+1,bi,bj) =   npart(ip,bi,bj)
./pkg/flt/flt_exchg.F 397 FLT_EXCHG 
               npart(ip,bi,bj) = 0.
./pkg/flt/flt_exchg.F 431 FLT_EXCHG 
              IF ( npart(jp,bi,bj).NE.0. _d 0 ) THEN
./pkg/flt/flt_exchg.F 435 FLT_EXCHG 
                npart (ip,bi,bj) =  npart (jp,bi,bj)
./pkg/flt/flt_exchg.F 484 FLT_EXCHG 
               npart( jp,bi,bj) = fltbuf_recvE(ic+1,bi,bj)
./pkg/flt/flt_exchg.F 513 FLT_EXCHG 
               npart( jp,bi,bj) = fltbuf_recvW(ic+1,bi,bj)
./pkg/flt/flt_init_varia.F 158 FLT_INIT_VARIA 
              npart( npart_tile(bi,bj),bi,bj) = tmp(1)
./pkg/flt/flt_init_varia.F 202 FLT_INIT_VARIA 
             npart(ip,bi,bj)  = (iG-1)*6*6+ip
./pkg/flt/flt_init_varia.F 244 FLT_INIT_VARIA 
             npart(ip,bi,bj)  = tmp(1)
./pkg/flt/flt_traj.F 110 FLT_TRAJ 
            tmp(1) = npart(ip,bi,bj)
./pkg/flt/flt_up.F 119 FLT_UP 
             tmp(1) = npart(ip,bi,bj)
./pkg/flt/flt_write_pickup.F 81 FLT_WRITE_PICKUP 
            tmp(1) =   npart(ip,bi,bj)
./verification/flt_example/extra/cvprofiles.F 164 NO PROCEDURE 
       npart       = INT(tmp(6))
./verification/flt_example/extra/cvprofiles.F 166 NO PROCEDURE 
      print*, 'npart    = ',npart
./verification/flt_example/extra/cvprofiles.F 177 NO PROCEDURE 
      allocate (pnum(npart))
./verification/flt_example/extra/cvprofiles.F 182 NO PROCEDURE 
      allocate (xpart(npart,icount))
./verification/flt_example/extra/cvprofiles.F 183 NO PROCEDURE 
      allocate (ypart(npart,icount))
./verification/flt_example/extra/cvprofiles.F 184 NO PROCEDURE 
      allocate (kpart(npart,icount))
./verification/flt_example/extra/cvprofiles.F 185 NO PROCEDURE 
      allocate (temp(npart,Nr,icount))
./verification/flt_example/extra/cvprofiles.F 187 NO PROCEDURE 
         allocate (uvel(npart,Nr,icount))
./verification/flt_example/extra/cvprofiles.F 188 NO PROCEDURE 
         allocate (vvel(npart,Nr,icount))
./verification/flt_example/extra/cvprofiles.F 189 NO PROCEDURE 
         allocate (salt(npart,Nr,icount))
./verification/flt_example/extra/cvprofiles.F 191 NO PROCEDURE 
      allocate (zeta(npart,icount))
./verification/flt_example/extra/cvprofiles.F 195 NO PROCEDURE 
      do m=1,npart
./verification/flt_example/extra/cvprofiles.F 22 NO PROCEDURE 
      integer narg, npart
./verification/flt_example/extra/cvprofiles.F 242 NO PROCEDURE 
      do ip=1,npart
./verification/flt_example/extra/cvprofiles.F 272 NO PROCEDURE 
               if (ip .gt. npart) then
./verification/flt_example/extra/cvprofiles.F 273 NO PROCEDURE 
                  print*,'ip out of order: ',ip,npart
./verification/flt_example/extra/cvprofiles.F 312 NO PROCEDURE 
      print*,icount,' x ',npart,' = ',icount*npart,' records expected,',
./verification/flt_example/extra/cvprofiles.F 314 NO PROCEDURE 
      print*,'==> ',icount*npart-itotalrecord,' float records missing'
./verification/flt_example/extra/cvprofiles.F 333 NO PROCEDURE 
      partdim = ncddef(ncid, 'Particles', npart, iret)
./verification/flt_example/extra/cvprofiles.F 497 NO PROCEDURE 
      edges(1) = npart
./verification/flt_example/extra/cvprofiles.F 520 NO PROCEDURE 
      edges(1) = npart
./verification/flt_example/extra/cvprofiles.F 534 NO PROCEDURE 
      edges(1) = npart
./verification/flt_example/extra/cvprofiles.F 76 NO PROCEDURE 
      data npart /10/
./verification/flt_example/extra/write_float.F 108 NO PROCEDURE 
                   npart  = REAL(ip)
./verification/flt_example/extra/write_float.F 117 NO PROCEDURE 
         if (flag) write(1,rec=ip+1) npart,tstart,xpart,ypart,
./verification/flt_example/extra/write_float.F 135 NO PROCEDURE 
                   npart  = REAL(ip)
./verification/flt_example/extra/write_float.F 144 NO PROCEDURE 
         if (flag) write(1,rec=ip+1) npart,tstart,xpart,ypart,
./verification/flt_example/extra/write_float.F 161 NO PROCEDURE 
                   npart  = REAL(ip)
./verification/flt_example/extra/write_float.F 170 NO PROCEDURE 
         if (flag) write(1,rec=ip+1) npart,tstart,xpart,ypart,
./verification/flt_example/extra/write_float.F 183 NO PROCEDURE 
                   npart  = REAL(ip)
./verification/flt_example/extra/write_float.F 192 NO PROCEDURE 
         if (flag) write(1,rec=ip+1) npart,tstart,xpart,ypart,
./verification/flt_example/extra/write_float.F 205 NO PROCEDURE 
                   npart  = DBLE(ip)
./verification/flt_example/extra/write_float.F 215 NO PROCEDURE 
     & write(1,rec=1) npart,tstart,xpart,ypart,kpart,kfloat,iup,itop,tend
./verification/flt_example/extra/write_float.F 3 NO PROCEDURE 
        double precision npart,xpart,ypart,kpart,kfloat,iup,itop
./verification/flt_example/extra/write_float.F 57 NO PROCEDURE 
                   npart  = 0.
./verification/flt_example/extra/write_float.F 66 NO PROCEDURE 
        if (flag)  write(1,rec=1)    npart,tstart,xpart,ypart,
./verification/flt_example/extra/write_float.F 86 NO PROCEDURE 
                   npart  = REAL(ip)
./verification/flt_example/extra/write_float.F 95 NO PROCEDURE 
         if (flag) write(1,rec=ip+1) npart,tstart,xpart,ypart,