print,'yr , mo, da, hr, min, sec, lat, lon'
;read, yr , mo, da, hr, min, sec, lat, lon
read, hr,min,sec
yr=1993
mo = 1
da=28
lat=58.23
lon=256.33
stephem, yr , mo, da, hr, min, sec, lat, lon, nstars, desig, az, za, mag, vis

end