File |
Line number |
Procedure |
Code |
./pkg/cfc/cfc11_forcing.F |
141 |
CFC11_FORCING |
recip_dLat = 1. _d 0 / ( atmCFC_yNorthBnd - atmCFC_ySouthBnd ) |
./pkg/cfc/cfc11_forcing.F |
144 |
CFC11_FORCING |
weight = ( yC(i,j,bi,bj) - atmCFC_ySouthBnd )*recip_dLat |
./pkg/cfc/cfc11_forcing.F |
74 |
CFC11_FORCING |
_RL recip_dLat, weight |
./pkg/cfc/cfc12_forcing.F |
142 |
CFC12_FORCING |
recip_dLat = 1. _d 0 / ( atmCFC_yNorthBnd - atmCFC_ySouthBnd ) |
./pkg/cfc/cfc12_forcing.F |
145 |
CFC12_FORCING |
weight = ( yC(i,j,bi,bj) - atmCFC_ySouthBnd )*recip_dLat |
./pkg/cfc/cfc12_forcing.F |
75 |
CFC12_FORCING |
_RL recip_dLat, weight |