Update MOD_BGC_Vars_PFTimeVariables.F90

CoLM-SYSU · Jan 25, 2024 · 2e3ca59 · 2e3ca59
1 parent 5176342
commit 2e3ca59
Showing 1 changed file with 8 additions and 8 deletions.
diff --git a/main/BGC/MOD_BGC_Vars_PFTimeVariables.F90 b/main/BGC/MOD_BGC_Vars_PFTimeVariables.F90
@@ -708,13 +708,13 @@ END SUBROUTINE allocate_BGCPFTimeVariables
 
    SUBROUTINE READ_BGCPFTimeVariables (file_restart)
 
-      USE MOD_NetCDFVector
-      USE MOD_LandPFT
-      USE MOD_Vars_Global
+   USE MOD_NetCDFVector
+   USE MOD_LandPFT
+   USE MOD_Vars_Global
 
-      IMPLICIT NONE
+   IMPLICIT NONE
 
-      character(LEN=*), intent(in) :: file_restart
+   character(LEN=*), intent(in) :: file_restart
 
 ! bgc variables
       CALL ncio_read_vector (file_restart, 'leafc_p                ', landpft, leafc_p               )
@@ -2086,9 +2086,9 @@ END SUBROUTINE deallocate_BGCPFTimeVariables
 #ifdef RangeCheck
    SUBROUTINE check_BGCPFTimeVariables
 
-      USE MOD_RangeCheck
-      USE MOD_SPMD_Task
-      IMPLICIT NONE
+   USE MOD_RangeCheck
+   USE MOD_SPMD_Task
+   IMPLICIT NONE
 
 ! bgc variables
       CALL check_vector_data ('leafc_p                ', leafc_p                )