[GH Actions] fprettify source code

UMEP-dev · Jul 17, 2023 · 6b15fe3 · 6b15fe3
1 parent bdfb2a9
commit 6b15fe3
Showing 1 changed file with 6 additions and 6 deletions.
diff --git a/src/suews/src/suews_ctrl_typeII.f95 b/src/suews/src/suews_ctrl_typeII.f95
@@ -13,9 +13,9 @@ MODULE SUEWS_HydroHeat_DTS
       REAL(KIND(1D0)), DIMENSION(:), ALLOCATABLE :: state_roof ! wetness status of roof [mm]
       REAL(KIND(1D0)), DIMENSION(:), ALLOCATABLE :: soilstore_wall ! Soil moisture of wall [mm]
       REAL(KIND(1D0)), DIMENSION(:), ALLOCATABLE :: state_wall ! wetness status of wall [mm]
-   ! CONTAINS
-   !    PROCEDURE :: allocHydro => allocHydroState_c
-   !    PROCEDURE :: deallocHydro => deallocHydroState_c
+      ! CONTAINS
+      !    PROCEDURE :: allocHydro => allocHydroState_c
+      !    PROCEDURE :: deallocHydro => deallocHydroState_c
    END TYPE HYDRO_STATE
 
    TYPE, PUBLIC :: HEAT_STATE
@@ -25,9 +25,9 @@ MODULE SUEWS_HydroHeat_DTS
       REAL(KIND(1D0)), DIMENSION(:), ALLOCATABLE :: tsfc_roof ! roof surface temperature [degC]
       REAL(KIND(1D0)), DIMENSION(:), ALLOCATABLE :: tsfc_wall ! wall surface temperature [degC]
       REAL(KIND(1D0)), DIMENSION(:), ALLOCATABLE :: tsfc_surf ! surface temperature [degC]
-   ! CONTAINS
-   !    PROCEDURE :: allocHeat => allocHeatState_c
-   !    PROCEDURE :: deallocHeat => deallocHeatState_c
+      ! CONTAINS
+      !    PROCEDURE :: allocHeat => allocHeatState_c
+      !    PROCEDURE :: deallocHeat => deallocHeatState_c
    END TYPE HEAT_STATE
 
 ! CONTAINS