//check parameters //pulse length of shaped pulse exists('homorof1','parameter'):$ex if ($ex=0) then create('homorof1','pulse') homorof1=2 setlimit('homorof1',100,0.1,0.0125) endif exists('homorof2','parameter'):$ex if ($ex=0) then create('homorof2','pulse') homorof2=2 setlimit('homorof2',100,0.1,0.0125) endif exists('homorof3','parameter'):$ex if ($ex=0) then create('homorof3','pulse') homorof3=2 setlimit('homorof3',100,0.1,0.0125) endif exists('bandwidth','parameter'):$ex if ($ex=0) then create('bandwidth','real') setlimit('bandwidth',250000,500,1) bandwidth=5000 endif exists('npoints','parameter'):$ex if ($ex=0) then create('npoints','real') npoints=200 endif exists('hidmf','parameter'):$ex if ($ex=0) then create('hidmf','integer') setlimit('hidmf',49999,100,1) hidmf=5000 endif exists('hidres','parameter'):$ex if ($ex=0) then create('hidres','integer') setlimit('hidres',360,1,0) hidres=9 endif exists('hidpwr','parameter'):$ex if ($ex=0) then create('hidpwr','real') setlimit('hidpwr',55,-16,1) hidpwr=50 endif exists('hidseq','parameter'):$ex if ($ex=0) then create('hidseq','string') hidseq='kp_highdec' endif exists('lodseq','parameter'):$ex if ($ex=0) then create('lodseq','string') lodseq='kp_lowdec' endif exists('lodpwr','parameter'):$ex if ($ex=0) then create('lodpwr','real') setlimit('lodpwr',55,-16,1) lodpwr=50 endif exists('lodres','parameter'):$ex if ($ex=0) then create('lodres','integer') setlimit('lodres',360,1,0) lodres=9 endif exists('lodmf','parameter'):$ex if ($ex=0) then create('lodmf','integer') setlimit('lodmf',49999,100,1) hidmf=5000 endif