AW sets parameters for scattering phenomena
This commit is contained in:
parent
a6110f9b48
commit
4c4044b15c
2 changed files with 25 additions and 1 deletions
|
@ -792,6 +792,30 @@ compat_layer.setDewpoint(D);
|
|||
if (p>0.0) {compat_layer.setPressure(p);}
|
||||
|
||||
|
||||
# determine whether low haze is icy and whether we see scattering
|
||||
|
||||
var ice_hex_sheet = 0.0;
|
||||
var ice_hex_column = 0.0;
|
||||
|
||||
if (T < -5.0)
|
||||
{
|
||||
ice_hex_column = (-T - 5.0) /10.0;
|
||||
ice_hex_sheet = (-T - 10.0 + (T-D)) /20.0;
|
||||
|
||||
|
||||
var sheet_bias = (T-D)/ 20;
|
||||
if (sheet_bias > 1.0) {sheet_bias = 1.0;}
|
||||
ice_hex_column = ice_hex_column * sheet_bias;
|
||||
|
||||
if (ice_hex_sheet > 1.0) {ice_hex_sheet = 1.0;}
|
||||
if (ice_hex_column > 1.0) {ice_hex_column = 1.0;}
|
||||
}
|
||||
#print("Col: ",ice_hex_column);
|
||||
#print("Sheet: ", ice_hex_sheet);
|
||||
|
||||
setprop("/environment/scattering-phenomena/ice-hexagonal-column-factor", ice_hex_column);
|
||||
setprop("/environment/scattering-phenomena/ice-hexagonal-sheet-factor", ice_hex_sheet);
|
||||
|
||||
# now determine the local wind
|
||||
|
||||
|
||||
|
|
|
@ -1701,7 +1701,7 @@ calc_geo(blat);
|
|||
|
||||
var vis = 9000.0 + rand() * 10000.0;
|
||||
var T = 10.0 + rand() * 15.0;
|
||||
var spread = 6.0 + 2.0 * rand();
|
||||
var spread = 8.0 + 4.0 * rand();
|
||||
var D = T - spread;
|
||||
var p = 1000 + rand() * 10.0; p = adjust_p(p);
|
||||
|
||||
|
|
Loading…
Reference in a new issue