| Symbol | Description | Uses |
| work3 | 4 |
| File | Line number | Procedure | Code |
| ./pkg/kpp/kpp_calc.F | 174 | KPP_CALC |
_KPP_RL work3 ( ibot:itop , jbot:jtop ) |
| ./pkg/kpp/kpp_calc.F | 359 | KPP_CALC |
work3(i,j) = |
| ./pkg/kpp/kpp_calc.F | 374 | KPP_CALC |
if ( work3(i,j) .lt. (phepsi*phepsi*drF(1)*drF(1)) ) then |
| ./pkg/kpp/kpp_calc.F | 377 | KPP_CALC |
tempVar2 = SQRT( work3(i,j) ) * p5 |