| File |
Line number |
Procedure |
Code |
|
./pkg/cfc/cfc12_forcing.F |
101 |
CFC12_FORCING |
ATMOSCFC12(i,j,bi,bj)=ACFC12south |
|
./pkg/cfc/cfc12_forcing.F |
122 |
CFC12_FORCING |
& + (1.0 - xintp(j))*ACFC12south |
|
./pkg/cfc/cfc12_forcing.F |
51 |
CFC12_FORCING |
_RL ACFC12north, ACFC12south |
|
./pkg/cfc/cfc12_forcing.F |
76 |
CFC12_FORCING |
ACFC12south = ACFC12(lastYear,2)*bWght |
|
./pkg/cfc/cfc12_forcing.F |
80 |
CFC12_FORCING |
ACFC12south = ACFC12(maxYear,1) |
|
./pkg/cfc/cfc12_forcing.F |
83 |
CFC12_FORCING |
& ACFC12north,ACFC12south |
|
./pkg/cfc/cfc12_forcing.F |
97 |
CFC12_FORCING |
ATMOSCFC12(i,j,bi,bj)=a1*ACFC12south + |