Merge pull request #138 from grantfirl/GFS_surface_generic_update

GFS surface generic update
NCAR · Aug 9, 2018 · e2363f0 · e2363f0
2 parents 8660f34 + 2c9e262
commit e2363f0
Show file tree

Hide file tree

Showing 7 changed files with 362 additions and 188 deletions.
diff --git a/physics/GFS_surface_generic.f90 b/physics/GFS_surface_generic.f90
diff --git a/physics/gmtb_scm_sfc_flux_spec.f90 b/physics/gmtb_scm_sfc_flux_spec.f90
@@ -37,7 +37,7 @@ end subroutine gmtb_scm_sfc_flux_spec_finalize
 !! | spec_sh_flux     | specified_kinematic_surface_upward_sensible_heat_flux                        | specified kinematic surface upward sensible heat flux           | K m s-1       |    1 | real      | kind_phys | in     | F        |
 !! | spec_lh_flux     | specified_kinematic_surface_upward_latent_heat_flux                          | specified kinematic surface upward latent heat flux             | kg kg-1 m s-1 |    1 | real      | kind_phys | in     | F        |
 !! | exner_inverse    | ratio_of_exner_function_between_midlayer_and_interface_at_lowest_model_layer | Exner function ratio bt midlayer and interface at 1st layer     | ratio         |    1 | real      | kind_phys | in     | F        |
-!! | T_surf           | surface_skin_temperature                                                     | ocean surface skin temperature                                  | K             |    1 | real      | kind_phys | in     | F        |
+!! | T_surf           | surface_skin_temperature                                                     | surface skin temperature                                        | K             |    1 | real      | kind_phys | in     | F        |
 !! | cp               | specific_heat_of_dry_air_at_constant_pressure                                | specific heat of dry air at constant pressure                   | J kg-1 K-1    |    0 | real      | kind_phys | in     | F        |
 !! | grav             | gravitational_acceleration                                                   | gravitational acceleration                                      | m s-2         |    0 | real      | kind_phys | in     | F        |
 !! | hvap             | latent_heat_of_vaporization_of_water_at_0C                                   | latent heat of vaporization of water at 0C                      | J kg-1        |    0 | real      | kind_phys | in     | F        |

diff --git a/physics/moninedmf.f b/physics/moninedmf.f
@@ -88,7 +88,7 @@ end subroutine hedmf_finalize
 !! | v10m           | y_wind_at_10m                                                               | y component of wind at 10 m                           | m s-1         |    1 | real      | kind_phys | in     | F        |
 !! | fm             | Monin-Obukhov_similarity_function_for_momentum                              | Monin-Obukhov similarity function for momentum        | none          |    1 | real      | kind_phys | in     | F        |
 !! | fh             | Monin-Obukhov_similarity_function_for_heat                                  | Monin-Obukhov similarity function for heat            | none          |    1 | real      | kind_phys | in     | F        |
-!! | tsea           | surface_skin_temperature                                                    | surface temperature                                   | K             |    1 | real      | kind_phys | in     | F        |
+!! | tsea           | surface_skin_temperature                                                    | surface skin temperature                              | K             |    1 | real      | kind_phys | in     | F        |
 !! | heat           | kinematic_surface_upward_sensible_heat_flux                                 | kinematic surface upward sensible heat flux           | K m s-1       |    1 | real      | kind_phys | in     | F        |
 !! | evap           | kinematic_surface_upward_latent_heat_flux                                   | kinematic surface upward latent heat flux             | kg kg-1 m s-1 |    1 | real      | kind_phys | in     | F        |
 !! | stress         | surface_wind_stress                                                         | surface wind stress                                   | m2 s-2        |    1 | real      | kind_phys | in     | F        |