&NAM     PROC  &P,1                                                     M3600010
M36020   NAME                                                           M3600020
         LCL   &X                                                       M3600030
&X       SET   '&NAM.        '(1,8)                                     M3600040
*********************************************************************** M3600050
*                                                                     * M3600060
*                        SYSTEM/360 MODEL 20 MEMORY                   * M3600070
*                             4K INCREMENTS                           * M3600080
*                                                                     * M3600090
*********************************************************************** M3600100
&X       DS    0F                                                       M3600110
         DO    &P(1)                                                    M3600120
         DS    16CL256                       4K                         M3600130
         ENDO                                                           M3600140
*********************************************************************** M3600150
*                                                                     * M3600160
*                                                                     * M3600170
*                                                                     * M3600180
*********************************************************************** M3600190
         END                                                            M3600200
