#
#
#
include 'sdatmosim.g'
#
 rec120:= optimalvslew(freq=300,  sourcesize=.05, pwv=1.0, stiphase=1.5, el=20);
 rec130:= optimalvslew(freq=300,  sourcesize=.05, pwv=1.0, stiphase=1.5, el=30);
 rec140:= optimalvslew(freq=300,  sourcesize=.05, pwv=1.0, stiphase=1.5, el=40);
 rec150:= optimalvslew(freq=300,  sourcesize=.05, pwv=1.0, stiphase=1.5, el=50);
 rec160:= optimalvslew(freq=300,  sourcesize=.05, pwv=1.0, stiphase=1.5, el=60);
 rec170:= optimalvslew(freq=300,  sourcesize=.05, pwv=1.0, stiphase=1.5, el=70);

 rec220:= optimalvslew(freq=300,  sourcesize=.05, pwv=1.0, stiphase=3.0, el=20);
 rec230:= optimalvslew(freq=300,  sourcesize=.05, pwv=1.0, stiphase=3.0, el=30);
 rec240:= optimalvslew(freq=300,  sourcesize=.05, pwv=1.0, stiphase=3.0, el=40);
 rec250:= optimalvslew(freq=300,  sourcesize=.05, pwv=1.0, stiphase=3.0, el=50);
 rec260:= optimalvslew(freq=300,  sourcesize=.05, pwv=1.0, stiphase=3.0, el=60);
 rec270:= optimalvslew(freq=300,  sourcesize=.05, pwv=1.0, stiphase=3.0, el=70);
 print 'Look at rec220, rec230, rec240, rec250, rec260, rec270, etc'



#
#  for plot
#
  results1 := optimalvslew(freq=300, sourcesize=0.2, 
                       pwv=1.0, stiphase=1.0, el=60 );
  results0 := optimalvslew(freq=300, sourcesize=0.2, 
                       pwv=1.0, stiphase=0.000001, el=60 );
#
#  for az
#
 rec10:= optimalvslew(freq=300,  sourcesize=.2, pwv=1.0, stiphase=1.0, el=60, az=10 );
 rec40:= optimalvslew(freq=300,  sourcesize=.2, pwv=1.0, stiphase=1.0, el=60, az=40 );
 rec70:= optimalvslew(freq=300,  sourcesize=.2, pwv=1.0, stiphase=1.0, el=60, az=70 );
 rec100:= optimalvslew(freq=300,  sourcesize=.2, pwv=1.0, stiphase=1.0, el=60, az=100 );
 rec130:= optimalvslew(freq=300,  sourcesize=.2, pwv=1.0, stiphase=1.0, el=60, az=130 );
 rec160:= optimalvslew(freq=300,  sourcesize=.2, pwv=1.0, stiphase=1.0, el=60, az=160 );
 rec190:= optimalvslew(freq=300,  sourcesize=.2, pwv=1.0, stiphase=1.0, el=60, az=190 );
 rec220:= optimalvslew(freq=300,  sourcesize=.2, pwv=1.0, stiphase=1.0, el=60, az=220 );
 rec250:= optimalvslew(freq=300,  sourcesize=.2, pwv=1.0, stiphase=1.0, el=60, az=250 );

 rec280:= optimalvslew(freq=300,  sourcesize=.2, pwv=1.0, stiphase=1.0, el=60, az=280 );
 rec310:= optimalvslew(freq=300,  sourcesize=.2, pwv=1.0, stiphase=1.0, el=60, az=310 );
 rec340:= optimalvslew(freq=300,  sourcesize=.2, pwv=1.0, stiphase=1.0, el=60, az=340 );