Index: /issm/trunk-jpl/src/c/modules/SurfaceMassBalancex/run_semic_transient.f90
===================================================================
--- /issm/trunk-jpl/src/c/modules/SurfaceMassBalancex/run_semic_transient.f90	(revision 27586)
+++ /issm/trunk-jpl/src/c/modules/SurfaceMassBalancex/run_semic_transient.f90	(revision 27587)
@@ -41,15 +41,16 @@
 
    ! output data
-   double precision :: tsurf_out  ! Ice surface Temperature [K]
-   double precision :: smb_out    ! surface mass balance=(Accu-Melt) [m/s]
-   double precision :: smbi_out   ! SMB ice  [water equivalent m/s]
-   double precision :: smbs_out   ! SMB snow [water equivalent m/s]
-   double precision :: saccu_out  ! accumulation [m/s]
-   double precision :: smelt_out  ! ablation [m/s]
-   double precision :: alb_out    ! grid-averaged albedo [no unit] 
-   double precision :: alb_snow_out  
+   double precision, intent(out) :: tsurf_out  ! Ice surface Temperature [K]
+   double precision, intent(out) :: smb_out    ! surface mass balance=(Accu-Melt) [m/s]
+   double precision, intent(out) :: smbi_out   ! SMB ice  [water equivalent m/s]
+   double precision, intent(out) :: smbs_out   ! SMB snow [water equivalent m/s]
+   double precision, intent(out) :: saccu_out  ! accumulation [m/s]
+   double precision, intent(out) :: smelt_out  ! ablation [m/s]
+   double precision, intent(out) :: alb_out    ! grid-averaged albedo [no unit] 
+   double precision, intent(out) :: alb_snow_out  
    double precision :: qmr_out    
-   double precision :: hice_out    
-   double precision :: hsnow_out 
+   !double precision, intent(out) :: qmr_out    
+   double precision, intent(out) :: hice_out    
+   double precision, intent(out) :: hsnow_out 
 
    double precision :: total_time, start, finish