From 66d7f0234d4ebe80e246eb9d3ab90875f6f01325 Mon Sep 17 00:00:00 2001 From: Edward Hartnett Date: Tue, 9 Apr 2024 10:51:56 -0600 Subject: [PATCH] working on read code --- regtests/unittests/test_io.F90 | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/regtests/unittests/test_io.F90 b/regtests/unittests/test_io.F90 index 46d46b404..e23d0753e 100644 --- a/regtests/unittests/test_io.F90 +++ b/regtests/unittests/test_io.F90 @@ -103,12 +103,12 @@ program test_io print *, 'OK!' print *, 'testing reading the WW3 binary point file in netCDF...' - ! call w3iopon('READ', ndsop, iotest) - ! print *, iotest - ! if (iotest .ne. 0) stop 100 - ! print *, 'OK!' + call w3iopon('READ', ndsop, iotest) + print *, iotest + if (iotest .ne. 0) stop 100 + print *, 'OK!' + - print *, 'OK!' print *, 'SUCCESS!'