Small bug fixes in physics/SFC_Models/Lake/Flake/flake_driver.F90 and…

… physics/SFC_Models/Land/RUC/lsm_ruc.F90

physics/SFC_Models/Lake/Flake/flake_driver.F90

@@ -65,7 +65,7 @@ SUBROUTINE flake_driver_run (                          &
 
       real (kind=kind_phys),dimension(:),intent(inout) ::                     &
      &           snwdph, hice, tsurf, t_sfc, hflx, evap, fice, ustar, qsfc,    &
-     &           ch, cm, chh, cmm, tsurf_ice, lflx, gflx
+     &           ch, cm, chh, cmm, T_ice, tsurf_ice, lflx, gflx
       real (kind=kind_phys),dimension(:),intent(inout), optional :: &
      &           h_ML, t_wML, t_mnw, H_B, T_B, t_bot1, t_bot2, c_t, T_snow
       real (kind=kind_phys),  intent(in) :: julian

physics/SFC_Models/Land/RUC/lsm_ruc.F90

@@ -95,7 +95,7 @@ subroutine lsm_ruc_init (me, master, isot, ivegsrc, nlunit,               &
       real (kind_phys), dimension(:),   intent(inout) :: semis_lnd
       real (kind_phys), dimension(:),   intent(inout) :: semis_ice
       real (kind_phys), dimension(:),   intent(inout) :: &
-           albdvis_lnd, albdnir_lnd,  albivis_lnd,  albinir_lnd, &
+           albdvis_lnd, albdnir_lnd,  albivis_lnd,  albinir_lnd
       real (kind_phys), dimension(:),   intent(inout), optional ::            &
                         albdvis_ice, albdnir_ice,  albivis_ice,  albinir_ice, &
                         sfcqv_lnd, sfcqv_ice
@@ -446,7 +446,7 @@ subroutine lsm_ruc_run                                            & ! inputs
      &      tsice
 
 !  ---  output:
-      real (kind_phys), dimension(:), intent(inout), optional ::
+      real (kind_phys), dimension(:), intent(inout), optional ::         &
      &       sfalb_lnd, sfalb_ice, wetness, snowfallac_lnd,              &
      &       snowfallac_ice, rhosnf
       real (kind_phys), dimension(:), intent(inout) ::                   &

physics/TODO_DONE.txt

@@ -0,0 +1,6 @@
+https://docs.google.com/document/d/1fa7kTJXCX0qFv4OTj2BtgIxPBj63vbi_Fa9B4M_InfM/edit#heading=h.rs78qntnlzly
+
+TODO
+
+
+DONE