| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/groatb.F |
131 |
GROATB |
KOPEN=-1 |
|
./pkg/seaice/groatb.F |
132 |
GROATB |
CALL BUDGET(UG, TMIX, HICE, FO, KOPEN, bi, bj) |
|
./pkg/seaice/groatb.F |
135 |
GROATB |
KOPEN=1 |
|
./pkg/seaice/groatb.F |
155 |
GROATB |
CALL BUDGET(UG, TICE, HICEP, FICE, KOPEN, bi, bj) |
|
./pkg/seaice/groatb.F |
176 |
GROATB |
CALL BUDGET(UG, TICE, HICE, FICE, KOPEN, bi, bj) |
|
./pkg/seaice/groatb.F |
44 |
GROATB |
INTEGER KOPEN |
|
./pkg/seaice/budget.F |
38 |
BUDGET |
INTEGER KOPEN |
|
./pkg/seaice/budget.F |
7 |
BUDGET |
SUBROUTINE BUDGET(UG, TICE, HICE1, FICE1, KOPEN, bi, bj) |
|
./pkg/seaice/budget.F |
98 |
BUDGET |
IF(KOPEN.LE.0) THEN |