Symbol Description Uses
ZK 5


File Line number Procedure Code
./pkg/fizhi/fizhi_lsm.F 704 RCUNST 
     &                  ZK,            CC
./pkg/fizhi/fizhi_lsm.F 747 RCUNST 
      ZK =     PDIR(ChNo) *MIN( EXTK1, 50. _d 0/ZLAI(ChNo) ) +
./pkg/fizhi/fizhi_lsm.F 755 RCUNST 
      EKAT = EXP( ZK*ZLAI(ChNo) )
./pkg/fizhi/fizhi_lsm.F 760 RCUNST 
      DUM3 = ZK * VGRST3(ITYP(ChNo))
./pkg/fizhi/fizhi_lsm.F 761 RCUNST 
      RCINV = ( DUM1*LOG(DUM2) + ZK*ZLAI(ChNo) ) / DUM3