From bb972407ef3696bf1e4fa02883bc0e3527ef1a08 Mon Sep 17 00:00:00 2001
From: AliS-Noaa <ali.salimi@noaa.gov>
Date: Mon, 14 Jul 2025 18:16:02 +0000
Subject: [PATCH] revising access in ww3_outp

---
 model/src/ww3_outp.F90 | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/model/src/ww3_outp.F90 b/model/src/ww3_outp.F90
index 167fdceea0..570b18da81 100644
--- a/model/src/ww3_outp.F90
+++ b/model/src/ww3_outp.F90
@@ -936,10 +936,10 @@ PROGRAM W3OUTP
           J = LEN_TRIM(FNMPRE)
           IF (FLFORM) THEN
             OPEN(NDSTAB, FILE=TRIM(TFNAME), STATUS='OLD', &
-                IOSTAT=IERR, FORM='UNFORMATTED', ACCESS='APPEND')
+                IOSTAT=IERR, FORM='UNFORMATTED', ACCESS='SEQUENTIAL', POSITION='APPEND')
           ELSE
             OPEN(NDSTAB, FILE=TRIM(TFNAME), STATUS='OLD', &
-                IOSTAT=IERR, FORM='FORMATTED', ACCESS='APPEND')
+                IOSTAT=IERR, FORM='FORMATTED', ACCESS='SEQUENTIAL', POSITION='APPEND')
           END IF
 
           PROCESS_POINT_ONLY = .TRUE.