| File |
Line number |
Procedure |
Code |
|
./model/src/gsw_teos10.F |
138 |
NO PROCEDURE |
_RL pot_enthalpy, sfac |
|
./model/src/gsw_teos10.F |
142 |
NO PROCEDURE |
sfac = 0.0248826675584615 _d 0 |
|
./model/src/gsw_teos10.F |
144 |
NO PROCEDURE |
x2 = sfac*sa |
|
./model/src/gsw_teos10.F |
206 |
NO PROCEDURE |
_RL sfac, x2, x, y, g03, g08 |
|
./model/src/gsw_teos10.F |
209 |
NO PROCEDURE |
sfac = 0.0248826675584615 |
|
./model/src/gsw_teos10.F |
211 |
NO PROCEDURE |
x2 = sfac*sa |
|
./pkg/bling/bling_light.F |
141 |
BLING_LIGHT |
sfac(j) = MAX(1. _d -5,fluxi) |
|
./pkg/bling/bling_light.F |
157 |
BLING_LIGHT |
irr_surf(i,j) = sfac(j) |
|
./pkg/bling/bling_light.F |
81 |
BLING_LIGHT |
_RL sfac (1-OLy:sNy+OLy) |
|
./pkg/dic/bio_export.F |
58 |
BIO_EXPORT |
_RL sfac (1-OLy:sNy+OLy) |
|
./pkg/dic/bio_export.F |
73 |
BIO_EXPORT |
CALL INSOL(myTime,sfac,bi,bj,myThid) |
|
./pkg/dic/bio_export.F |
88 |
BIO_EXPORT |
lit(i,j)=sfac(j) |
|
./pkg/dic/insol.F |
10 |
INSOL |
SUBROUTINE INSOL(Time,sfac,bi,bj,myThid) |
|
./pkg/dic/insol.F |
35 |
INSOL |
_RL sfac(1-OLy:sNy+OLy) |
|
./pkg/dic/insol.F |
85 |
INSOL |
sfac(j) = MAX(1. _d -5,fluxi) |