diff --git a/Source/hvac.f90 b/Source/hvac.f90
index a3e57c05bc8..e9b0b86a72d 100644
--- a/Source/hvac.f90
+++ b/Source/hvac.f90
@@ -1889,7 +1889,7 @@ SUBROUTINE DPSTARCALC
          IF (IPZ==IOPZ) CYCLE
          IF (P_ZONE(IOPZ)%N_DUCTNODES==0) CYCLE
          IF (CONNECTED_ZONES(IPZ,IOPZ,1)) THEN
-            IF (P_ZONE(IPOZ)%N_DUCTNODES==0) CYCLE
+            IF (P_ZONE(IOPZ)%N_DUCTNODES==0) CYCLE
             DPSTAR(IOPZ) = DPSTAR(IOPZ)  - DN%DIR(1) * DU%AREA * DU%VEL(OLD) * DT_HV/PSUM_TOT(IPZ)
             IF (DU%FIXED) DPSTAR(IOPZ) = DPSTAR(IOPZ)  + DN%DIR(1) * DU%AREA * DU%VEL(NEW) * DT_HV/PSUM_TOT(IPZ)
          ENDIF