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 |
2116 |
SAGPOL |
ttt = sqrt( xx*(one-ssc)*three )*tau |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2117 |
SAGPOL |
emt = expmn(-ttt) |
./pkg/fizhi/fizhi_swrad.F |
2111 |
SAGPOL |
_RL xx,uuu,ttt,emt,up1,um1,st1 |
./pkg/fizhi/fizhi_swrad.F |
2115 |
SAGPOL |
ttt = sqrt( xx*(one-ssc)*three )*tau |
./pkg/fizhi/fizhi_swrad.F |
2116 |
SAGPOL |
emt = expmn(-ttt) |