grlsub_A_5803a.pro 510 B

12345678910111213141516171819202122232425262728293031
  1. pro grlsub_A_5803a
  2. common data
  3. common CFD
  4. common CFDconst
  5. common Vars
  6. common ana_mix
  7. ;overall
  8. SO_MV_scalemax = 17.9
  9. SO_MV_scalemin = -3.1
  10. if multi then begin
  11. subloop_multi, [12,7,13];prs,hx1,px
  12. subloop_multi, [12,10,9];prs,hpn,pn
  13. subloop_multi, [7,10,11];hx1,hpn,xn
  14. subloop_multi, [7,10,12,14];hx1,hpn,prs,xnp
  15. SO_MV_scalemax = 21.3
  16. subloop_multi, [22,24,25];prs,iso,ip
  17. subloop_multi, [22,19,23];prs,bu1,bp
  18. subloop_multi, [24,19,21];iso,bu1,bi
  19. subloop_multi, [24,19,22,26];iso,bu1,prs,bpi
  20. endif
  21. end