| File |
Line number |
Procedure |
Code |
|
./pkg/bling/bling_light.F |
209 |
BLING_LIGHT |
irr_eff(i,j,k) = irr_inst(i,j,k) |
|
./pkg/bling/bling_light.F |
214 |
BLING_LIGHT |
irr_eff(i,j,k) = irr_mix(i,j) |
|
./pkg/bling/bling_light.F |
65 |
BLING_LIGHT |
_RL irr_eff (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
|
./pkg/bling/bling_light.F |
90 |
BLING_LIGHT |
irr_eff(i,j,k) = 0. _d 0 |
|
./pkg/bling/bling_light.F |
9 |
BLING_LIGHT |
U irr_inst, irr_eff, |
|
./pkg/bling/bling_main.F |
104 |
BLING_MAIN |
_RL irr_eff(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
|
./pkg/bling/bling_main.F |
124 |
BLING_MAIN |
irr_eff(i,j,k) = 0. _d 0 |
|
./pkg/bling/bling_production.F |
163 |
BLING_PROD |
_RL irr_eff(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
|
./pkg/bling/bling_production.F |
239 |
BLING_PROD |
irr_eff(i,j,k) = 0. _d 0 |
|
./pkg/bling/bling_production.F |
365 |
BLING_PROD |
U irr_inst, irr_eff, |
|
./pkg/bling/bling_production.F |
375 |
BLING_PROD |
& (irr_eff(i,j,k) - irr_mem(i,j,k,bi,bj))* |
|
./pkg/bling/bling_production.F |
476 |
BLING_PROD |
mu(i,j,k) = Pc_m * ( 1. _d 0 - exp(-irr_eff(i,j,k) |
|
./pkg/bling/bling_production.F |
479 |
BLING_PROD |
mu_diaz(i,j,k) = Pc_m_diaz * ( 1. _d 0 - exp(-irr_eff(i,j,k) |
|
./pkg/bling/bling_production.F |
482 |
BLING_PROD |
light_lim(i,j,k) = ( 1. _d 0 - exp(-irr_eff(i,j,k) |
|
./pkg/bling/bling_production.F |
861 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(irr_eff, 'BLGIEFF ',0,Nr,2,bi,bj,myThid) |