From 9c170e4b8ad3e8731cfc2611b6725ebf809361a1 Mon Sep 17 00:00:00 2001
From: Edward Hartnett <edward.hartnett@noaa.gov>
Date: Mon, 6 Nov 2023 09:38:37 -0700
Subject: [PATCH] further netcdf write development

---
 model/src/w3iopomd.F90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/model/src/w3iopomd.F90 b/model/src/w3iopomd.F90
index ae500c645..ace363528 100644
--- a/model/src/w3iopomd.F90
+++ b/model/src/w3iopomd.F90
@@ -1076,7 +1076,7 @@ SUBROUTINE W3IOPON_WRITE (NDSOP, IMOD, filename, ncerr)
     integer :: v_iceho, v_icefo, v_grdid, v_spco
 
     ! ! Create the netCDF file.
-    ncerr = nf90_create("filename", NF90_NETCDF4, fh)
+    ncerr = nf90_create("filename ", NF90_NETCDF4, fh)
     if (ncerr .ne. 0) return
 
     ! ! Define dimensions.