| File |
Line number |
Procedure |
Code |
|
./pkg/dic/car_flux.F |
104 |
CAR_FLUX |
IF ( caexport(i,j) .NE. 0. _d 0 ) THEN |
|
./pkg/dic/car_flux.F |
110 |
CAR_FLUX |
flux_l = caexport(i,j)*reminFac |
|
./pkg/dic/car_flux.F |
54 |
CAR_FLUX |
_RL caexport(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/dic/car_flux.F |
65 |
CAR_FLUX |
caexport(i,j) = 0. _d 0 |
|
./pkg/dic/car_flux.F |
75 |
CAR_FLUX |
caexport(i,j) = CAR_S(i,j,k)*drF(k) * _hFacC(i,j,k,bi,bj) |
|
./pkg/dic/car_flux.F |
86 |
CAR_FLUX |
flux_u(i,j) = caexport(i,j) |
|
./pkg/dic/car_flux_omega_top.F |
53 |
CAR_FLUX_OMEGA_TOP |
_RL caexport(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/dic/car_flux_omega_top.F |
88 |
CAR_FLUX_OMEGA_TOP |
caexport(i,j)= R_CP*rain_ratio(i,j,bi,bj)*bioac(i,j,k)* |
|
./pkg/dic/car_flux_omega_top.F |
95 |
CAR_FLUX_OMEGA_TOP |
flux_u = caexport(i,j) |