Fix syntax error in Cleanup_DataCont routine

src/Core/hco_datacont_mod.F90 - In Cleanup_DataCont, added a missing ")" character in the IF statement where DeepClean is defined. Signed-off-by: Bob Yantosca <[email protected]>
geoschem · Feb 22, 2023 · 52beff6 · 52beff6
1 parent 71f5081
commit 52beff6
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Core/hco_datacont_mod.F90 b/src/Core/hco_datacont_mod.F90
@@ -252,7 +252,7 @@ SUBROUTINE DataCont_Cleanup( Dct, ArrOnly )
 
        ! Optional argument handling
        DeepClean = .TRUE.
-       IF ( PRESENT( ArrOnly ) DeepClean = ( .not. ArrOnly )
+       IF ( PRESENT( ArrOnly ) ) DeepClean = ( .not. ArrOnly )
 
        ! Clean up FileData object. If DeepClean is true, this
        ! will entirely erase the file data object. Otherwise,