SUBROUTINE AM1GET END SUBROUTINE BUTSET END SUBROUTINE CAMAC END SUBROUTINE CAMATT END SUBROUTINE CLIST END SUBROUTINE CRATT END SUBROUTINE CTAPE END SUBROUTINE C1SET END SUBROUTINE C1SETH END SUBROUTINE C2SETB END SUBROUTINE DVMSET END SUBROUTINE ECAM END SUBROUTINE FCNA END SUBROUTINE HITOMT END SUBROUTINE HIVOLT END SUBROUTINE INTCPT END SUBROUTINE LITOF END SUBROUTINE LITON END SUBROUTINE NMPLOT END SUBROUTINE SETERR END SUBROUTINE SPOUTS END SUBROUTINE WEOF0 END SUBROUTINE WEOF1 END