| File |
Line number |
Procedure |
Code |
|
./pkg/thsice/thsice_step_fwd.F |
103 |
THSICE_STEP_FWD |
_RL opFrac, icFrac |
|
./pkg/thsice/thsice_step_fwd.F |
282 |
THSICE_STEP_FWD |
opFrac= 1. _d 0-icFrac |
|
./pkg/thsice/thsice_step_fwd.F |
289 |
THSICE_STEP_FWD |
& - opFrac*Qnet(i,j,bi,bj) |
|
./pkg/thsice/thsice_step_fwd.F |
291 |
THSICE_STEP_FWD |
& + opFrac*EmPmR(i,j,bi,bj) |
|
./pkg/thsice/thsice_step_fwd.F |
292 |
THSICE_STEP_FWD |
Qnet(i,j,bi,bj) = -icFrac*flx2oc(i,j) + opFrac*Qnet(i,j,bi,bj) |
|
./pkg/thsice/thsice_step_fwd.F |
294 |
THSICE_STEP_FWD |
& + opFrac*EmPmR(i,j,bi,bj) |
|
./pkg/thsice/thsice_step_temp.F |
191 |
THSICE_STEP_TEMP |
opFrac = 1. _d 0 - icFrac |
|
./pkg/thsice/thsice_step_temp.F |
193 |
THSICE_STEP_TEMP |
Qsw(i,j,bi,bj) = opFrac*Qsw(i,j,bi,bj) |
|
./pkg/thsice/thsice_step_temp.F |
76 |
THSICE_STEP_TEMP |
_RL opFrac, icFrac |
|
./pkg/aim_v23/aim_aim2sioce.F |
152 |
AIM_AIM2SIOCE |
opFrac = 1. _d 0 - icFrac |
|
./pkg/aim_v23/aim_aim2sioce.F |
154 |
AIM_AIM2SIOCE |
& + opFrac*Qsw(i,j,bi,bj) |
|
./pkg/aim_v23/aim_aim2sioce.F |
192 |
AIM_AIM2SIOCE |
opFrac = 1. _d 0 - icFrac |
|
./pkg/aim_v23/aim_aim2sioce.F |
195 |
AIM_AIM2SIOCE |
Qnet(i,j,bi,bj) = Qnet(i,j,bi,bj)*opFrac |
|
./pkg/aim_v23/aim_aim2sioce.F |
202 |
AIM_AIM2SIOCE |
EmPmR(i,j,bi,bj) = EmPmR(i,j,bi,bj)*opFrac |
|
./pkg/aim_v23/aim_aim2sioce.F |
207 |
AIM_AIM2SIOCE |
Qsw(i,j,bi,bj) = opFrac*Qsw(i,j,bi,bj) |
|
./pkg/aim_v23/aim_aim2sioce.F |
89 |
AIM_AIM2SIOCE |
_RL icFrac, opFrac |
|
./pkg/cheapaml/cheapaml.F |
375 |
CHEAPAML |
opFrac = 1. _d 0 - icFrac |
|
./pkg/cheapaml/cheapaml.F |
378 |
CHEAPAML |
& + opFrac*solar(i,j,bi,bj) ) |
|
./pkg/cheapaml/cheapaml.F |
379 |
CHEAPAML |
fsha(i,j) = icFrac*fsha(i,j) + opFrac*fsha0 |
|
./pkg/cheapaml/cheapaml.F |
380 |
CHEAPAML |
flha(i,j) = icFrac*flha(i,j) + opFrac*flha0 |
|
./pkg/cheapaml/cheapaml.F |
381 |
CHEAPAML |
evp(i,j) = icFrac*evp(i,j) + opFrac*evp_0 |
|
./pkg/cheapaml/cheapaml.F |
382 |
CHEAPAML |
xolw(i,j) = icFrac*xolw(i,j) + opFrac*xolw0 |
|
./pkg/cheapaml/cheapaml.F |
383 |
CHEAPAML |
ssqt(i,j) = icFrac*ssqt(i,j) + opFrac*ssqt0 |
|
./pkg/cheapaml/cheapaml.F |
384 |
CHEAPAML |
q100(i,j) = icFrac*q100(i,j) + opFrac*q100_0 |
|
./pkg/cheapaml/cheapaml.F |
385 |
CHEAPAML |
cdq(i,j) = icFrac*cdq(i,j) + opFrac*cdq_0 |
|
./pkg/cheapaml/cheapaml.F |
90 |
CHEAPAML |
_RL icFrac, opFrac |
|
./pkg/cheapaml/cheapaml_seaice.F |
101 |
CHEAPAML_SEAICE |
_RL icFrac, opFrac |
|
./pkg/cheapaml/cheapaml_seaice.F |
255 |
CHEAPAML_SEAICE |
opFrac = 1. _d 0 - icFrac |