add Sw_pstokes_x and y fields

schism-dev · Sep 17, 2021 · 9e6857d · 9e6857d
1 parent 537740f
commit 9e6857d
Show file tree

Hide file tree

Showing 2 changed files with 15 additions and 1 deletion.
diff --git a/mediator/esmFldsExchange_cesm_mod.F90 b/mediator/esmFldsExchange_cesm_mod.F90
@@ -1377,7 +1377,9 @@ subroutine esmFldsExchange_cesm(gcomp, phase, rc)
     flds = (/'Sw_lamult ',&
              'Sw_ustokes',&
              'Sw_vstokes',&
-             'Sw_hstokes'/)
+             'Sw_hstokes',&
+             'Sw_pstokes_x',&
+             'Sw_pstokes_y'/)
 
     do n = 1,size(flds)
        fldname = trim(flds(n))

diff --git a/mediator/fd_cesm.yaml b/mediator/fd_cesm.yaml
@@ -1097,6 +1097,10 @@
        canonical_units: 1
        description: ocean import - Langmuir multiplier
      #
+     - standard_name: Sw_lasl
+       canonical_units: 1
+       description: ocean import - surface layer Langmuir number
+     #
      - standard_name: Sw_ustokes
        canonical_units: m/s
        description: ocean import - Stokes drift u component
@@ -1105,6 +1109,14 @@
        canonical_units: m/s
        description: ocean import - Stokes drift v component
      #
+     - standard_name: Sw_pstokes_x
+       canonical_units: m/s
+       description: Eastward partitioned stokes drift components
+     #
+     - standard_name: Sw_pstokes_y
+       canonical_units: m/s
+       description: Northward partitioned stokes drift components
+     #
      #-----------------------------------
      # mediator fields
      #-----------------------------------