Merge pull request #13165 from mcgratta/master

FDS Source: Remove unused variable
firemodels · Jul 11, 2024 · 5a1e328 · 5a1e328
2 parents a98fb2d + c340eed
commit 5a1e328
Showing 1 changed file with 0 additions and 1 deletion.
diff --git a/Source/init.f90 b/Source/init.f90
@@ -971,7 +971,6 @@ SUBROUTINE CHECK_OVERLAPPING_OBSTRUCTIONS(IERR)
 INTEGER, INTENT(OUT) :: IERR
 INTEGER :: OBST_INDEX_PREVIOUS,OB_SURF_INDEX,OB_PREVIOUS_SURF_INDEX
 TYPE(OBSTRUCTION_TYPE), POINTER :: OB_PREVIOUS
-CHARACTER(MESSAGE_LENGTH) :: MESSAGE
 
 IERR = 0
 RETURN