# Initial uniform parameters GBR22 (R0), GBY22 (Y0) of Gaussian packets 
  N1=27 N2=28 N3=20
  
  echo.pl:  '$1=AR0'  ">tmp.cal"
  CAL="tmp.cal" AR0=-0.25E-6
  GRD1='fgbr22.out'
  grdcal:
  
  echo.pl:  '$1=AY0'  ">tmp.cal"
  CAL="tmp.cal" AY0=0.25E-6
  GRD1='fgby22.out'
  grdcal: