         PROC  P,0,PRNTR,IN,OUT,PUNCH=NO,COMPARE=NO                     J$U00010
UDT      NAME  0                                                        J$U00020
// J$ALCPRT &PRNTR(1),&PRNTR(2)                                         J$U00030
//       IF    ('&PUNCH' EQ 'NO')D2                                     J$U00050
// DVC 40                                                               J$U00060
// LFD OUTPUT2                                                          J$U00070
//D2     NOP                                                            J$U00080
// DVCVOL &IN(1)                                                        J$U00090
// LBL &IN(2)                                                           J$U00100
// LFD INPUT1,&IN(3),&IN(4)                                             J$U00110
// DVCVTP &OUT(1)                                                       J$U00120
// LBL &OUT(2)                                                          J$U00130
//       IF    ('&COMPARE' EQ 'NO')D4                                   J$U00140
// LFD INPUT2                                                           J$U00150
//       GO    D6                                                       J$U00160
//D4     NOP                                                            J$U00170
// LFD OUTPUT1                                                          J$U00180
//D6     NOP                                                            J$U00190
// EXEC DATA                                                            J$U00200
         END                                                            J$U00210
