From 2b0f7a74e75bff0132f77bea2e54fc3f82e4e73c Mon Sep 17 00:00:00 2001 From: Steve Franke Date: Thu, 29 Nov 2018 11:18:48 -0600 Subject: [PATCH] Remove a diagnostic write statement. --- lib/jt65sim.f90 | 1 - 1 file changed, 1 deletion(-) diff --git a/lib/jt65sim.f90 b/lib/jt65sim.f90 index 92e5d587e..0e57962ce 100644 --- a/lib/jt65sim.f90 +++ b/lib/jt65sim.f90 @@ -105,7 +105,6 @@ program jt65sim end if case ('M') read (optarg(:narglen), '(A)',err=10) msg - write(*,*) msg end select cycle 10 display_help=.true.