working on filename

NOAA-EMC · Nov 16, 2023 · 2063833 · 2063833
1 parent 53e799c
commit 2063833
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/model/src/w3iopomd.F90 b/model/src/w3iopomd.F90
@@ -1173,6 +1173,7 @@ SUBROUTINE W3IOPON_READ (NDSOP, IOTST, IMOD, filename, ncerr)
     integer :: v_taido, v_dairo, v_zet_seto, v_aso, v_cao, v_cdo, v_iceo
     integer :: v_iceho, v_icefo, v_grdid, v_spco
 
+    print *,filename
     IOTST = 0
 
     ! Open the netCDF file.