| File |
Line number |
Procedure |
Code |
|
./pkg/cfc/cfc11_forcing.F |
112 |
CFC11_FORCING |
ySouth = -10.0 |
|
./pkg/cfc/cfc11_forcing.F |
117 |
CFC11_FORCING |
ELSE IF(yC(i,j,bi,bj) .LE. ySouth) THEN |
|
./pkg/cfc/cfc11_forcing.F |
120 |
CFC11_FORCING |
xintp(j) = (yC(i,j,bi,bj) - ySouth)/ |
|
./pkg/cfc/cfc11_forcing.F |
121 |
CFC11_FORCING |
& (yNorth - ySouth) |
|
./pkg/cfc/cfc11_forcing.F |
57 |
CFC11_FORCING |
_RL yNorth, ySouth |
|
./pkg/cfc/cfc12_forcing.F |
112 |
CFC12_FORCING |
ySouth = -10.0 |
|
./pkg/cfc/cfc12_forcing.F |
117 |
CFC12_FORCING |
ELSE IF(yC(i,j,bi,bj) .LE. ySouth) THEN |
|
./pkg/cfc/cfc12_forcing.F |
120 |
CFC12_FORCING |
xintp(j) = (yC(i,j,bi,bj) - ySouth)/ |
|
./pkg/cfc/cfc12_forcing.F |
121 |
CFC12_FORCING |
& (yNorth - ySouth) |
|
./pkg/cfc/cfc12_forcing.F |
58 |
CFC12_FORCING |
_RL yNorth, ySouth |