sub programControl {
...
subroutine1();
}
sub subroutine1 {
...
programControl();
}