File |
Line number |
Procedure |
Code |
./pkg/kpp/kpp_routines.F |
1437 |
STATEKPP |
_RL WORK1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/kpp/kpp_routines.F |
1459 |
STATEKPP |
O WORK1, |
./pkg/kpp/kpp_routines.F |
1476 |
STATEKPP |
RHO1(I,J) = WORK1(I,J) + rhoConst |
./pkg/kpp/kpp_routines.F |
1489 |
STATEKPP |
WORK3 (I,J) = WORK1(I,J) - 0.8 * WORK2(I,J) |
./pkg/kpp/kpp_routines.F |
1540 |
STATEKPP |
O WORK1 ) |
./pkg/kpp/kpp_routines.F |
1548 |
STATEKPP |
TTALPHA(I,J,K) = WORK1 (I,J) |
./pkg/kpp/kpp_routines.F |
1564 |
STATEKPP |
O WORK1, |
./pkg/kpp/kpp_routines.F |
1573 |
STATEKPP |
& WORK1(I,J) .LT. WORK3(I,J) .AND. |
./pkg/kpp/kpp_routines.F |
1576 |
STATEKPP |
& ABS(((WORK3(I,J)-WORK1(I,J))*rC(k)+ |
./pkg/kpp/kpp_routines.F |
1578 |
STATEKPP |
& (WORK2(I,J)-WORK1(I,J)))) |