more

edwardhartnett · Feb 21, 2024 · 4e67131 · 4e67131
1 parent db576b2
commit 4e67131
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 2 deletions.
diff --git a/moving_nest/fv_moving_nest_types.F90 b/moving_nest/fv_moving_nest_types.F90
@@ -142,7 +142,7 @@ module fv_moving_nest_types_mod
 
     real (kind=kind_phys), _ALLOCATABLE :: zorl (:,:)       _NULL   !< roughness length
     real (kind=kind_phys), _ALLOCATABLE :: zorll (:,:)      _NULL   !< land roughness length
-    !real (kind=kind_phys), _ALLOCATABLE :: zorli (:,:)     _NULL   !< ice surface roughness length ! TODO do we need this?
+    !real (kind=kind_phys), _ALLOCATABLE :: zorli (:,:)     _NULL   < ice surface roughness length ! TODO do we need this?
     real (kind=kind_phys), _ALLOCATABLE :: zorlw (:,:)      _NULL   !< wave surface roughness length
     real (kind=kind_phys), _ALLOCATABLE :: zorlwav (:,:)    _NULL   !< wave surface roughness in cm derived from wave model
 

diff --git a/moving_nest/fv_moving_nest_utils.F90 b/moving_nest/fv_moving_nest_utils.F90
@@ -102,14 +102,15 @@ module fv_moving_nest_utils_mod
 
 #include <fms_platform.h>
 
-
+  !> ???
   interface alloc_read_data
 #ifdef OVERLOAD_R8
     module procedure alloc_read_data_r4_2d
 #endif
     module procedure alloc_read_data_r8_2d
   end interface alloc_read_data
 
+  !> ???
   interface fill_nest_halos_from_parent
     module procedure fill_nest_halos_from_parent_r4_2d
     module procedure fill_nest_halos_from_parent_r4_3d
@@ -120,6 +121,7 @@ module fv_moving_nest_utils_mod
     module procedure fill_nest_halos_from_parent_r8_4d
   end interface fill_nest_halos_from_parent
 
+  !> ???
   interface alloc_halo_buffer
     module procedure alloc_halo_buffer_r4_2d
     module procedure alloc_halo_buffer_r4_3d
@@ -130,6 +132,7 @@ module fv_moving_nest_utils_mod
     module procedure alloc_halo_buffer_r8_4d
   end interface alloc_halo_buffer
 
+  !> ???
   interface fill_nest_from_buffer
     module procedure fill_nest_from_buffer_r4_2d
     module procedure fill_nest_from_buffer_r4_3d
@@ -140,6 +143,7 @@ module fv_moving_nest_utils_mod
     module procedure fill_nest_from_buffer_r8_4d
   end interface fill_nest_from_buffer
 
+  !> ???
   interface fill_nest_from_buffer_cell_center
     module procedure fill_nest_from_buffer_cell_center_r4_2d
     module procedure fill_nest_from_buffer_cell_center_r4_3d
@@ -150,11 +154,13 @@ module fv_moving_nest_utils_mod
     module procedure fill_nest_from_buffer_cell_center_r8_4d
   end interface fill_nest_from_buffer_cell_center
 
+  !> ???
   interface output_grid_to_nc
     module procedure output_grid_to_nc_2d
     module procedure output_grid_to_nc_3d
   end interface output_grid_to_nc
 
+  !> ???
   interface fill_grid_from_supergrid
     module procedure fill_grid_from_supergrid_r4_3d
     module procedure fill_grid_from_supergrid_r8_3d