Module Print_Module Implicit None Save Logical :: test_print End Module Print_Module