! global.zpl
!
! Written by Kenneth E. Moore 9/4/92
!
print "This program computes the global vertex"
print "coordinates or orientations surface by" 
print "surface."
print
s=0
label 1
s = s+1
print "Surface  = ",s
print "Global X = ",glcx(s)
print "Global Y = ",glcy(s)
print "Global Z = ",glcz(s)
print "Global L = ",glca(s)
print "Global M = ",glcb(s)
print "Global N = ",glcc(s)
if s < nsur() then goto 1
print "All done!"


