//COINMAP JOB (1110,81912,,100),'DANA MAX',MSGCLASS=S,
//          CLASS=H,NOTIFY=COINEWM
/*JOBPARM SHIFT=D
/*ROUTE PRINT LOCAL
//*
//STEP1 EXEC CALFORM
//SYSIN    DD *
 1
ADVANCE                    3.5
POINTS                     1.0       1.0
    1            0.0       0.0
    2            0.0       1.0
    3            0.0       2.0
    4            0.0       3.0
    5            0.0       4.0
    6            0.0       5.0
    7            0.0       6.0
    8            1.0       0.0
    9            1.0       1.0
   10            1.0       2.0
   11            1.0       3.0
   12            1.0       4.0
   13            1.0       5.0
   14            1.0       6.0
   15            2.0       0.0
   16            2.0       1.0
   17            2.0       2.0
   18            2.0       3.0
   19            2.0       4.0
   20            2.0       5.0
   21            2.0       6.0
   22            3.0       0.0
   23            3.0       1.0
   24            3.0       2.0
   25            3.0       3.0
   26            3.0       4.0
   27            3.0       5.0
   28            3.0       6.0
   29            4.0       0.0
   30            4.0       1.0
   31            4.0       2.0
   32            4.0       3.0
   33            4.0       4.0
   34            4.0       5.0
   35            4.0       6.0
   36            5.0       0.0
   37            5.0       1.0
   38            5.0       2.0
   39            5.0       3.0
   40            5.0       4.0
   41            5.0       5.0
   42            5.0       6.0
   43            6.0       0.0
   44            6.0       1.0
   45            6.0       2.0
   46            6.0       3.0
   47            6.0       4.0
   48            6.0       5.0
   49            6.0       6.0
       END
POLYGONS
1111         18   26   32   24 9999
       END
OFFSET                     0.0       2.0
MAP
       END
LINES
  2           9   10   18   12   13   20   26   34   41   40
  2          40   32   38   37   30   24   16    9
  3           1   43   49    7    1
       END
LEGENDS
   39         .2                        WOW
       END
FINISH
//
