Public Release of SHiELD_Physics containing updates from GFDL Weather…

… and Climate Dynamics Division

GFS_layer/GFS_abstraction_layer.F90

@@ -0,0 +1,47 @@
+module physics_abstraction_layer
+
+  use GFS_typedefs,    only: init_type        =>  GFS_init_type,     &
+                             control_type     =>  GFS_control_type,  &
+                             statein_type     =>  GFS_statein_type,  &
+                             stateout_type    =>  GFS_stateout_type, &
+                             sfcprop_type     =>  GFS_sfcprop_type,  &
+                             coupling_type    =>  GFS_coupling_type, &
+                             grid_type        =>  GFS_grid_type,     &
+                             tbd_type         =>  GFS_tbd_type,      &
+                             cldprop_type     =>  GFS_cldprop_type,  &
+                             radtend_type     =>  GFS_radtend_type,  &
+                             intdiag_type     =>  GFS_diag_type
+
+  use GFS_driver,      only: initialize       =>  GFS_initialize,       &
+                             time_vary_step   =>  GFS_time_vary_step,   &
+                             radiation_step1  =>  GFS_radiation_driver, &
+                             physics_step1    =>  GFS_physics_driver,   &
+                             physics_step2    =>  GFS_stochastic_driver
+
+!----------------------
+!  public physics types
+!----------------------
+  public  init_type
+  public  control_type
+  public  statein_type
+  public  stateout_type
+  public  sfcprop_type
+  public  coupling_type
+  public  grid_type
+  public  tbd_type
+  public  cldprop_type
+  public  radtend_type
+  public  intdiag_type
+
+!--------------------------
+!  public physics functions
+!--------------------------
+  public  initialize
+  public  time_vary_step
+  public  radiation_step1
+  public  physics_step1
+  public  physics_step2
+
+CONTAINS
+
+end module physics_abstraction_layer