| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_budget_ocean.F |
102 |
SEAICE_BUDGET_OCEAN |
netHeatFlux(I,J) = Qnet(I,J,bi,bj) |
|
./pkg/seaice/seaice_budget_ocean.F |
10 |
SEAICE_BUDGET_OCEAN |
O netHeatFlux, SWHeatFlux, |
|
./pkg/seaice/seaice_budget_ocean.F |
115 |
SEAICE_BUDGET_OCEAN |
netHeatFlux(I,J)=-A1(I,J)-A2(I,J) |
|
./pkg/seaice/seaice_budget_ocean.F |
45 |
SEAICE_BUDGET_OCEAN |
_RL netHeatFlux(1:sNx,1:sNy) |
|
./pkg/seaice/seaice_budget_ocean.F |
82 |
SEAICE_BUDGET_OCEAN |
netHeatFlux(I,J) = 0. _d 0 |
|
./pkg/seaice/seaice_budget_ocean_if.F |
10 |
SEAICE_BUDGET_OCEAN_IF |
O netHeatFlux, SWHeatFlux, |
|
./pkg/seaice/seaice_budget_ocean_if.F |
111 |
SEAICE_BUDGET_OCEAN_IF |
netHeatFlux(I,J) = Qnet(I,J,bi,bj) |
|
./pkg/seaice/seaice_budget_ocean_if.F |
125 |
SEAICE_BUDGET_OCEAN_IF |
& i,j, netHeatFlux(I,J), SWHeatFlux(I,J) |
|
./pkg/seaice/seaice_budget_ocean_if.F |
139 |
SEAICE_BUDGET_OCEAN_IF |
netHeatFlux(I,J)=-A1(I,J)-A2(I,J) |
|
./pkg/seaice/seaice_budget_ocean_if.F |
47 |
SEAICE_BUDGET_OCEAN_IF |
_RL netHeatFlux(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_budget_ocean_if.F |
95 |
SEAICE_BUDGET_OCEAN_IF |
netHeatFlux(I,J) = 0. _d 0 |