home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / INFO / C / ROBOT03.ZIP / RCCL201 < prev    next >
Encoding:
Text File  |  1987-03-02  |  211 b   |  17 lines
  1. #include "../h/rccl.h"
  2.  
  3. pumatask()
  4. {
  5.     printrn(
  6.         trslm(
  7.             rotm(
  8.                 rotm(
  9.                     rotm(
  10.                         newtrans("T",const),
  11.                     xunit, 90.),
  12.                 yunit, 90.),
  13.             zunit, 90.),
  14.         10., 20., 30.),
  15.      stdout);
  16. }
  17.