PROGRAM dispatch,6 USE demo1 USE demo2 USE experiment USE ez_example ! Execution starts here. This just dispatches to the real starting place. CALL Demo_1 CALL Demo_2 ! CALL Do_Example ! CALL Do_Experiment END PROGRAM dispatch