diff --git a/model/src/w3iopomd.F90 b/model/src/w3iopomd.F90
index a859f6fb0..63d364f7f 100644
--- a/model/src/w3iopomd.F90
+++ b/model/src/w3iopomd.F90
@@ -1542,11 +1542,11 @@ SUBROUTINE W3IOPON_WRITE(timestep_only, IMOD, filename, ncerr)
 
       ! Write the data with NOPTS as a dimension. (no time dimension)
       if (associated(PTLOC)) then
-         ncerr = nf90_put_var(fh, v_ptloc, PTLOC)
+         ncerr = nf90_put_var(fh, v_ptloc, PTLOC(:,1:NOPTS))
          if (nf90_err(ncerr) .ne. 0) return
       endif
       if (associated(PTNME)) then
-         ncerr = nf90_put_var(fh, v_ptnme, PTNME)
+         ncerr = nf90_put_var(fh, v_ptnme, PTNME(1:NOPTS))
          if (nf90_err(ncerr) .ne. 0) return
       endif