Subroutine TERMINATE24
subroutine TERMINATE24 ! Calls call TERMINATE call rite end subroutine TERMINATE24