Symbol Description Uses
kHi last vertical level (of array fldRL/RS) to read-in 56


File Line number Procedure Code
./pkg/mdsio/mdsio_read_field.F 139 MDS_READ_FIELD 
      nNz = 1 + kHi - kLo
./pkg/mdsio/mdsio_read_field.F 14 MDS_READ_FIELD 
     I   kSize,kLo,kHi,
./pkg/mdsio/mdsio_read_field.F 161 MDS_READ_FIELD 
      IF ( kLo.LT.1 .OR. kHi.GT.kSize ) THEN
./pkg/mdsio/mdsio_read_field.F 168 MDS_READ_FIELD 
     &    ' , kLo=', kLo, ' , kHi=', kHi
./pkg/mdsio/mdsio_read_field.F 276 MDS_READ_FIELD 
       DO k=kLo,kHi
./pkg/mdsio/mdsio_read_field.F 415 MDS_READ_FIELD 
           DO k=kLo,kHi
./pkg/mdsio/mdsio_read_field.F 86 MDS_READ_FIELD 
      INTEGER kSize, kLo, kHi
./pkg/mdsio/mdsio_write_field.F 100 MDS_WRITE_FIELD 
      INTEGER kSize, kLo, kHi
./pkg/mdsio/mdsio_write_field.F 15 MDS_WRITE_FIELD 
     I   kSize,kLo,kHi,
./pkg/mdsio/mdsio_write_field.F 165 MDS_WRITE_FIELD 
      nNz = 1 + kHi - kLo
./pkg/mdsio/mdsio_write_field.F 189 MDS_WRITE_FIELD 
      IF ( kLo.LT.1 .OR. kHi.GT.kSize ) THEN
./pkg/mdsio/mdsio_write_field.F 196 MDS_WRITE_FIELD 
     &    ' , kLo=', kLo, ' , kHi=', kHi
./pkg/mdsio/mdsio_write_field.F 262 MDS_WRITE_FIELD 
       DO k=kLo,kHi
./pkg/mdsio/mdsio_write_field.F 451 MDS_WRITE_FIELD 
           DO k=kLo,kHi
./pkg/obcs/obcs_apply_ptracer.F 113 OBCS_APPLY_PTRACER 
         DO k = kLo,kHi
./pkg/obcs/obcs_apply_ptracer.F 131 OBCS_APPLY_PTRACER 
         DO k = kLo,kHi
./pkg/obcs/obcs_apply_ptracer.F 53 OBCS_APPLY_PTRACER 
      INTEGER k, kLo, kHi
./pkg/obcs/obcs_apply_ptracer.F 61 OBCS_APPLY_PTRACER 
        kHi = Nr
./pkg/obcs/obcs_apply_ptracer.F 65 OBCS_APPLY_PTRACER 
        kHi = kArg
./pkg/obcs/obcs_apply_ptracer.F 76 OBCS_APPLY_PTRACER 
         DO k = kLo,kHi
./pkg/obcs/obcs_apply_ptracer.F 94 OBCS_APPLY_PTRACER 
         DO k = kLo,kHi
./pkg/obcs/obcs_apply_ts.F 101 OBCS_APPLY_TS 
           DO k = kLo,kHi
./pkg/obcs/obcs_apply_ts.F 120 OBCS_APPLY_TS 
           DO k = kLo,kHi
./pkg/obcs/obcs_apply_ts.F 138 OBCS_APPLY_TS 
           DO k = kLo,kHi
./pkg/obcs/obcs_apply_ts.F 49 OBCS_APPLY_TS 
      INTEGER k, kLo, kHi
./pkg/obcs/obcs_apply_ts.F 67 OBCS_APPLY_TS 
        kHi = Nr
./pkg/obcs/obcs_apply_ts.F 70 OBCS_APPLY_TS 
        kHi = kArg
./pkg/obcs/obcs_apply_ts.F 83 OBCS_APPLY_TS 
           DO k = kLo,kHi
./pkg/obcs/obcs_apply_uv.F 119 OBCS_APPLY_UV 
           DO k = kLo,kHi
./pkg/obcs/obcs_apply_uv.F 137 OBCS_APPLY_UV 
           DO k = kLo,kHi
./pkg/obcs/obcs_apply_uv.F 48 OBCS_APPLY_UV 
      INTEGER k, kLo, kHi
./pkg/obcs/obcs_apply_uv.F 65 OBCS_APPLY_UV 
        kHi = Nr
./pkg/obcs/obcs_apply_uv.F 68 OBCS_APPLY_UV 
        kHi = kArg
./pkg/obcs/obcs_apply_uv.F 81 OBCS_APPLY_UV 
           DO k = kLo,kHi
./pkg/obcs/obcs_apply_uv.F 99 OBCS_APPLY_UV 
           DO k = kLo,kHi
./pkg/rw/read_mflds.F 365 READ_MFLDS_LEV_RL 
     I                fPrec, kSiz, kLo, kHi, myIter, myThid )
./pkg/rw/read_mflds.F 396 READ_MFLDS_LEV_RL 
      INTEGER kSiz, kLo, kHi
./pkg/rw/read_mflds.F 474 READ_MFLDS_LEV_RL 
     I                       fType, kSiz, kLo, kHi,
./pkg/rw/read_rec.F 388 READ_REC_LEV_RS 
     I                           fName, fPrec, kSiz, kLo, kHi,
./pkg/rw/read_rec.F 410 READ_REC_LEV_RS 
      INTEGER kSiz, kLo, kHi
./pkg/rw/read_rec.F 441 READ_REC_LEV_RS 
     I                     fType, kSiz, kLo, kHi,
./pkg/rw/read_rec.F 453 READ_REC_LEV_RL 
     I                           fName, fPrec, kSiz, kLo, kHi,
./pkg/rw/read_rec.F 475 READ_REC_LEV_RL 
      INTEGER kSiz, kLo, kHi
./pkg/rw/read_rec.F 506 READ_REC_LEV_RL 
     I                     fType, kSiz, kLo, kHi,
./pkg/rw/write_rec.F 473 WRITE_REC_LEV_RS 
     I                            fName, fPrec, kSiz, kLo, kHi, field,
./pkg/rw/write_rec.F 494 WRITE_REC_LEV_RS 
      INTEGER kSiz, kLo, kHi
./pkg/rw/write_rec.F 529 WRITE_REC_LEV_RS 
     I                      fType, kSiz, kLo, kHi, dummyRL, field,
./pkg/rw/write_rec.F 540 WRITE_REC_LEV_RL 
     I                            fName, fPrec, kSiz, kLo, kHi, field,
./pkg/rw/write_rec.F 561 WRITE_REC_LEV_RL 
      INTEGER kSiz, kLo, kHi
./pkg/rw/write_rec.F 596 WRITE_REC_LEV_RL 
     I                      fType, kSiz, kLo, kHi, field, dummyRS,
./eesupp/src/print.F 1112 PRINT_MAPRL 
     I        iLo,   iHi,   jLo,   jHi,  kLo,  kHi, nBx, nBy,
./eesupp/src/print.F 1169 PRINT_MAPRL 
      INTEGER kLo, kHi
./eesupp/src/print.F 1171 PRINT_MAPRL 
      _RL fld(iLo:iHi,jLo:jHi,kLo:kHi,nBx,nBy)
./eesupp/src/print.F 679 PRINT_MAPRS 
     I        iLo,   iHi,   jLo,   jHi,  kLo,  kHi, nBx, nBy,
./eesupp/src/print.F 736 PRINT_MAPRS 
      INTEGER kLo, kHi
./eesupp/src/print.F 738 PRINT_MAPRS 
      _RS fld(iLo:iHi,jLo:jHi,kLo:kHi,nBx,nBy)