Skip to content

Commit

Permalink
FDS Source: Fix type definition
Browse files Browse the repository at this point in the history
  • Loading branch information
@mcgratta
mcgratta committed Dec 13, 2024
1 parent b79c357 commit 59534a5
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion Source/hvac.f90
View file
Original file line number Diff line number Diff line change
Expand Up @@ -56,7 +56,7 @@ MODULE HVAC_ROUTINES
REAL(EB), POINTER, DIMENSION(:) :: NODE_TMP !< Area-weighted temperature of each NODE
REAL(EB), POINTER, DIMENSION(:,:) :: NODE_ZZ !< Area-weighted tracked species mass fractions of each NODE

REAL(EB), PUBLIC, ALLOCATABLE, DIMENSION(:) :: NODE_ZONE !< Array of NODEs belonging to each ZONE
INTEGER, PUBLIC, ALLOCATABLE, DIMENSION(:) :: NODE_ZONE !< Array of NODEs belonging to each ZONE

REAL(EB),PUBLIC, ALLOCATABLE, DIMENSION(:,:):: NODE_ZZ_EX !<Area weighted tracked species mass fractions of each NODE per MESH
!< Contains sum of area weighted tracked species mass fractions over all MPI processes for all VENTs assigned to each NODE
Expand Down

0 comments on commit 59534a5

Please sign in to comment.