Skip to content

Commit

Permalink
adding in-line comments to document the usage of the WRST switch NOAA…
Browse files Browse the repository at this point in the history
  • Loading branch information
JessicaMeixner-NOAA committed Jan 14, 2020
1 parent b6a8483 commit dd3dee1
Show file tree
Hide file tree
Showing 2 changed files with 12 additions and 0 deletions.
7 changes: 7 additions & 0 deletions model/ftn/w3iorsmd.ftn
Original file line number Diff line number Diff line change
Expand Up @@ -748,6 +748,13 @@
(ICE(ISEA),ISEA=1+(IPART-1)*NSIZE, &
MIN(NSEA,IPART*NSIZE))
END DO

!/WRST ! The WRST switch saves the values of wind in the
!/WRST ! restart file and then uses the wind for the first
!/WRST ! time step here. This is needed when coupling with
!/WRST ! an atm model that does not have 10m wind speeds at
!/WRST ! initialization. If there is no restart, wind is zero

!/WRST DO IX=1, NX
!/WRST DO IPART=1,NPRTY2
!/WRST NREC = NREC + 1
Expand Down
5 changes: 5 additions & 0 deletions model/ftn/wmesmfmd.ftn
Original file line number Diff line number Diff line change
Expand Up @@ -2238,6 +2238,11 @@
tw0 = twn
wx0 = wxn
wy0 = wyn
!/WRST ! The WRST switch saves the values of wind in the
!/WRST ! restart file and then uses the wind for the first
!/WRST ! time step here. This is needed when coupling with
!/WRST ! an atm model that does not have 10m wind speeds at
!/WRST ! initialization. If there is no restart, wind is zero
!/WRST wxn = WXNwrst !replace with values from restart
!/WRST wyn = WYNwrst
!/WRST wx0 = WXNwrst
Expand Down

0 comments on commit dd3dee1

Please sign in to comment.