EXTRN NOTHIN                                                           BAD00010
DDDD DS CL8                                                             BAD00020
 END                                                                    BAD00030