File |
Line number |
Procedure |
Code |
./pkg/cfc/cfc12_forcing.F |
121 |
CFC12_FORCING |
ATMOSCFC12(i,j,bi,bj)= xintp(j) * ACFC12north |
./pkg/cfc/cfc12_forcing.F |
51 |
CFC12_FORCING |
_RL ACFC12north, ACFC12south |
./pkg/cfc/cfc12_forcing.F |
74 |
CFC12_FORCING |
ACFC12north = ACFC12(lastYear,1)*bWght |
./pkg/cfc/cfc12_forcing.F |
79 |
CFC12_FORCING |
ACFC12north = ACFC12(maxYear,1) |
./pkg/cfc/cfc12_forcing.F |
83 |
CFC12_FORCING |
& ACFC12north,ACFC12south |
./pkg/cfc/cfc12_forcing.F |
92 |
CFC12_FORCING |
ATMOSCFC12(i,j,bi,bj)=ACFC12north |
./pkg/cfc/cfc12_forcing.F |
98 |
CFC12_FORCING |
& a2*ACFC12north |