| File |
Line number |
Procedure |
Code |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2112 |
SAGPOL |
_RL xx,uuu,ttt,emt,up1,um1,st1 |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2115 |
SAGPOL |
uuu = sqrt( xx/(one-ssc)) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2118 |
SAGPOL |
up1 = uuu + one |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2119 |
SAGPOL |
um1 = uuu - one |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2123 |
SAGPOL |
tll = uuu*four*emt *st1 |
|
./pkg/fizhi/fizhi_swrad.F |
2111 |
SAGPOL |
_RL xx,uuu,ttt,emt,up1,um1,st1 |
|
./pkg/fizhi/fizhi_swrad.F |
2114 |
SAGPOL |
uuu = sqrt( xx/(one-ssc)) |
|
./pkg/fizhi/fizhi_swrad.F |
2117 |
SAGPOL |
up1 = uuu + one |
|
./pkg/fizhi/fizhi_swrad.F |
2118 |
SAGPOL |
um1 = uuu - one |
|
./pkg/fizhi/fizhi_swrad.F |
2122 |
SAGPOL |
tll = uuu*four*emt *st1 |