Remove a diagnostic write statement.

This commit is contained in:
Steve Franke 2018-11-29 11:18:48 -06:00
parent 9c8fc17ecc
commit 2b0f7a74e7
1 changed files with 0 additions and 1 deletions

View File

@ -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.