!-parm stack,opt
!-imp80 chopsup22b_choptp+chopsup22b_chop22bs,chop22y,chop22l
!-imp80 chopsup22b_choptp+chopsup22b_grope22s,grope22y,grope22l
!-imp80 chopsup22b_choptp+chopsup22b_disc23s,disc23y,disc23l
!-imp80 chopsup22b_choptp+chopsup22b_form17s,form17y,form17l
!-imp80 chopsup22b_ctopt60+chopsup22b_gdc03s,gdc03y,gdc03l
!-imp80 chopsup22b_choptp+chopsup22b_choper36s,choper36y,choper36l
!-imp80 chopsup22b_ctopt60+chopsup22b_tape80s,tape80y,tape80l
!-imp80 chopsup22b_mindiags,mindiagy,mindiagl
!-parm map
!-link
chop22y
grope22y
disc23y
form17y
gdc03y
choper36y
tape80y
mindiagy
.end
chopz
!-destroy chop22y,grope22y,disc23y,form17y
!-destroy gdc03y,choper36y,tape80y,mindiagy
!-copy chopsup22b_dbootz,dbootz
!-chopfix ocpmprg