diff --git a/model/src/w3iopomd.F90 b/model/src/w3iopomd.F90
index df5cdb4eb..bbdfda34c 100644
--- a/model/src/w3iopomd.F90
+++ b/model/src/w3iopomd.F90
@@ -1604,6 +1604,11 @@ SUBROUTINE W3IOPON_WRITE(timestep_only,filename, ncerr)
     ncerr = nf90_put_var(fh, v_ww3time, TIME, start = (/ 1, itime/), &
        count = (/ 2, 1 /))
     if (nf90_err(ncerr) .ne. 0) return
+
+    CALL U2D('days since 1990-01-01 00:00:00',REFDATE,IERR)
+    CALL T2D(TIME,CURDATE,IERR)
+    outjulday=TSUB(REFDATE,CURDATE)
+
     ncerr = nf90_put_var(fh, v_time, outjulday, start = (/itime/))
     if (nf90_err(ncerr) .ne. 0) return