home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d2xx / d267 / diglib.lha / Diglib / diglib.zoo / diglib / MAPSET.FOR < prev    next >
Text File  |  1989-06-20  |  277b  |  11 lines
  1.         SUBROUTINE MAPSET(XLEFT,XRIGHT,YBOT,YTOP,CSIZE,TKLN,LRAXIS)
  2.         LOGICAL*2 LRAXIS
  3. C
  4.         INCLUDE GCDCHR.PRM
  5. C
  6. C
  7.         CALL MAPPRM(XLEFT*XLENCM/100.0,XRIGHT*XLENCM/100.0,
  8.      1   YBOT*YLENCM/100.0,YTOP*YLENCM/100.0,CSIZE,TKLN,LRAXIS)
  9.         RETURN
  10.         END
  11.