set
bmw 3. ;# set beamwidth to 3 arc minutes
set azOffAmin [expr -2*$bmw] ;#
set az off to -2 beamwidths
set zaOffAmin [expr -2*$bmw] ;#
set za offsets to -2 beamwidths
set stepAmin [expr $bmw/3.] ;#
step 1/3 of a beam width
set secsPnt 4
set focus 0
set firstZaStrip 1
set firstAzPnt 1
set ra 074533.06 ;# J2000 ra
hhmmss.ss
set dec 101112.70 ;# J2000 dec
ddmmss.ss
byumap $ra $dec $azOffAmin
$zaOffAmin $stepAmin $secsPnt $focus $firstZaStrip \ $firstAzPnt