From 9d7caa6b47fd21fae362d3288bcb56b581970950 Mon Sep 17 00:00:00 2001 From: mcgratta Date: Mon, 9 Mar 2026 10:39:19 -0400 Subject: [PATCH] FDS Source: Remove PUBLIC attribute for subroutine --- Source/hvac.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Source/hvac.f90 b/Source/hvac.f90 index 9d65515727b..9cd4bb7eaae 100644 --- a/Source/hvac.f90 +++ b/Source/hvac.f90 @@ -38,7 +38,7 @@ MODULE HVAC_ROUTINES LOGICAL :: DUCT_NODE_INIT !< Flag indicating duct nodes have been initialized LOGICAL :: TRANSPORT_PARTICLES !< Flag indicating particles should be transferred across a localized leak path -PUBLIC HVAC_CALC,READ_HVAC,PROC_HVAC,HVAC_BC_IN,FIND_NETWORKS,COLLAPSE_HVAC_BC,SET_INIT_HVAC,INIT_DUCT_NODE,LEAKAGE_HVAC +PUBLIC HVAC_CALC,READ_HVAC,PROC_HVAC,HVAC_BC_IN,COLLAPSE_HVAC_BC,SET_INIT_HVAC,INIT_DUCT_NODE,LEAKAGE_HVAC REAL(EB),PUBLIC, ALLOCATABLE, DIMENSION(:):: NODE_AREA_EX !< Contain sum of area over all MESHES of all VENTs assigned to each NODE REAL(EB),PUBLIC, ALLOCATABLE, DIMENSION(:):: NODE_TMP_EX