home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / misc / volume1 / 8710 / 14 / letter.f < prev    next >
Encoding:
Text File  |  1990-07-13  |  258 b   |  11 lines
  1.     subroutine letter (nchr,iht,iang,x,y,str)
  2. c ---- Translate parameters from old Benson-Lehner letter calls
  3. c ----  to hp parameters and call symbol. ----
  4.     character str*(*)
  5.  
  6.     ht = iht * .06
  7.     ang = float (iang)
  8.     call symbol (x,y,ht,str,ang,nchr)
  9.     return
  10.     end
  11.