| File |
Line number |
Procedure |
Code |
|
./pkg/kpp/kpp_routines.F |
1439 |
STATEKPP |
_RL WORK3 (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/kpp/kpp_routines.F |
1472 |
STATEKPP |
O WORK3 ) |
|
./pkg/kpp/kpp_routines.F |
1478 |
STATEKPP |
SSBETA(I,J,1) = WORK3(I,J) |
|
./pkg/kpp/kpp_routines.F |
1489 |
STATEKPP |
WORK3 (I,J) = WORK1(I,J) - 0.8 * WORK2(I,J) |
|
./pkg/kpp/kpp_routines.F |
1573 |
STATEKPP |
& WORK1(I,J) .LT. WORK3(I,J) .AND. |
|
./pkg/kpp/kpp_routines.F |
1574 |
STATEKPP |
& WORK2(I,J) .GE. WORK3(I,J) ) THEN |
|
./pkg/kpp/kpp_routines.F |
1576 |
STATEKPP |
& ABS(((WORK3(I,J)-WORK1(I,J))*rC(k)+ |
|
./pkg/kpp/kpp_routines.F |
1577 |
STATEKPP |
& (WORK2(I,J)-WORK3(I,J))*rC(k-1))/ |