Symbol Description Uses
kLoc 12



File Line number Procedure Code
./pkg/layers/layers_diagnostics_init.F 49 LAYERS_DIAGNOSTICS_INIT
      INTEGER kLoc
./pkg/layers/layers_diagnostics_init.F 70 LAYERS_DIAGNOSTICS_INIT
        kLoc = layers_krho(iLa)
./pkg/layers/layers_diagnostics_init.F 71 LAYERS_DIAGNOSTICS_INIT
        IF ( kLoc.GE.1 .AND. kLoc.LE.Nr ) THEN
./pkg/layers/layers_diagnostics_init.F 72 LAYERS_DIAGNOSTICS_INIT
          rLoc = rC(kLoc)
./pkg/layers/layers_diagnostics_init.F 74 LAYERS_DIAGNOSTICS_INIT
          kLoc = 0
./pkg/layers/layers_diagnostics_init.F 77 LAYERS_DIAGNOSTICS_INIT
     &    ' for layer averaging, ref_z=', rLoc, ',', kLoc
./pkg/monitor/mon_stats_latbnd_rl.F 12 MON_STATS_LATBND_RL
     I     myNr, mskNr, kLoc, nSepBnd, ySepBnd,
./pkg/monitor/mon_stats_latbnd_rl.F 31 MON_STATS_LATBND_RL
      INTEGER myNr, mskNr, kLoc
./pkg/monitor/mon_stats_latbnd_rl.F 74 MON_STATS_LATBND_RL
      IF ( kLoc.EQ.0 ) THEN
./pkg/monitor/mon_stats_latbnd_rl.F 78 MON_STATS_LATBND_RL
        k1 = kLoc
./pkg/monitor/mon_stats_latbnd_rl.F 79 MON_STATS_LATBND_RL
        k2 = kLoc