pro grlsub_A_5803a


common data
common CFD
common CFDconst
common Vars
common ana_mix


;overall
SO_MV_scalemax =  17.9
SO_MV_scalemin = -3.1


if multi then begin
subloop_multi, [12,7,13];prs,hx1,px
subloop_multi, [12,10,9];prs,hpn,pn
subloop_multi, [7,10,11];hx1,hpn,xn
subloop_multi, [7,10,12,14];hx1,hpn,prs,xnp
SO_MV_scalemax =  21.3
subloop_multi, [22,24,25];prs,iso,ip
subloop_multi, [22,19,23];prs,bu1,bp
subloop_multi, [24,19,21];iso,bu1,bi
subloop_multi, [24,19,22,26];iso,bu1,prs,bpi
endif

end