Symbol Description Uses
kop1 6


File Line number Procedure Code
./pkg/dic/car_flux.F 111 CAR_FLUX 
     &          *maskC(i,j,kop1,bi,bj)
./pkg/dic/car_flux.F 52 CAR_FLUX 
      INTEGER I,J,k, ko, kop1
./pkg/dic/car_flux.F 93 CAR_FLUX 
        kop1   = MIN(Nr,ko+1)
./pkg/dic/phos_flux.F 117 PHOS_FLUX 
     &          *maskC(i,j,kop1,bi,bj)
./pkg/dic/phos_flux.F 53 PHOS_FLUX 
      INTEGER I,J,k, ko, kop1
./pkg/dic/phos_flux.F 95 PHOS_FLUX 
        kop1   = MIN(Nr,ko+1)