JOB  TEST 5
               CTL  630 1
     * Test whether 7-character L with %U1 A-address writes tape.
               ORG  333
     START     MCM  START,4006   4006 = 00W
               SW
               SW                WM under the GM
               LCA  %U1,4006
               CU   %U1,R
               LCA  %U1,201,R    Read into print area
               W
     STOP      H    STOP
               DCW  @"@          Group mark
               END  START