FDS Source: Remove debug

drjfloyd · drjfloyd · commit 4f8b6e8b7549 · 2024-12-20T09:27:22.000-05:00
diff --git a/Source/read.f90 b/Source/read.f90
@@ -12365,7 +12365,6 @@ SUBROUTINE READ_VENT
                ENDDO
             ENDDO
       END SELECT
-      IF (VT%RADIUS > 0._EB) WRITE(*,*) NM,VT%IOR,VT%TOTAL_INDEX,VT%UNDIVIDED_INPUT_AREA,VT%INPUT_AREA,VT%FDS_AREA
       VENT_TOTAL_AREA(VT%TOTAL_INDEX,NM) = VT%FDS_AREA
    ENDDO  VENT_LOOP_3
 
