Symbol Description Uses
npart_dist 10



File Line number Procedure Code
./pkg/flt/flt_init.F 262 FLT_INIT
         npart_dist = DBLE(npart_tile(bi,bj))
./pkg/flt/flt_init.F 263 FLT_INIT
         _GLOBAL_SUM_R8( npart_dist, myThid )
./pkg/flt/flt_init.F 268 FLT_INIT
            write(errormessageunit,*) 'sum npart_tile: ',npart_dist
./pkg/flt/flt_init.F 55 FLT_INIT
      _RL npart_read, npart_dist
./pkg/flt/flt_runga2.F 57 FLT_RUNGA2
      _RL npart_dist
./pkg/flt/flt_exchg.F 59 FLT_EXCHG
      _RL npart_dist
./pkg/flt/flt_restart.F 42 FLT_RESTART
      _RL npart_dist
./pkg/flt/flt_restart.F 84 FLT_RESTART
         npart_dist = DBLE(npart_tile(bi,bj))
./pkg/flt/flt_restart.F 87 FLT_RESTART
       _GLOBAL_SUM_R8( npart_dist, myThid )
./pkg/flt/flt_restart.F 91 FLT_RESTART
          write(errormessageunit,*) npart_dist,' floats written'