Symbol Description Uses
max_npart_exch 11


File Line number Procedure Code
./pkg/flt/FLT.h 31 NO PROCEDURE 
      INTEGER max_npart_tile, max_npart_exch
./pkg/flt/FLT.h 33 NO PROCEDURE 
      parameter (max_npart_exch =  50)
./pkg/flt/flt_exchg.F 122 FLT_EXCHG 
                     if (icountW .gt. max_npart_exch) stop
./pkg/flt/flt_exchg.F 166 FLT_EXCHG 
               do ip=1,max_npart_exch
./pkg/flt/flt_exchg.F 196 FLT_EXCHG 
               do ip=1,max_npart_exch
./pkg/flt/flt_exchg.F 263 FLT_EXCHG 
                     if (icountN .gt. max_npart_exch) stop
./pkg/flt/flt_exchg.F 292 FLT_EXCHG 
                     if (icountS .gt. max_npart_exch) stop
./pkg/flt/flt_exchg.F 337 FLT_EXCHG 
               do ip=1,max_npart_exch
./pkg/flt/flt_exchg.F 367 FLT_EXCHG 
               do ip=1,max_npart_exch
./pkg/flt/flt_exchg.F 51 FLT_EXCHG 
      parameter(imax2=imax*max_npart_exch)
./pkg/flt/flt_exchg.F 92 FLT_EXCHG 
                     if (icountE .gt. max_npart_exch) stop