change all-upper case to pascal-case

NREL · Jul 23, 2024 · 7dd6720 · 7dd6720
1 parent cf3b3c5
commit 7dd6720
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/Transition/CreateNewIDFUsingRulesV24_2_0.f90 b/src/Transition/CreateNewIDFUsingRulesV24_2_0.f90
@@ -578,14 +578,14 @@ SUBROUTINE CreateNewIDFUsingRules(EndOfFile,DiffOnly,InLfn,AskForInput,InputFile
                 OutArgs(1:13) = InArgs(1:13)
                 IF (SameString(InArgs(14), 'FAN:VARIABLEVOLUME')) THEN
                   isVariableVolume = .TRUE.
-                  OutArgs(14) = 'FAN:SYSTEMMODEL'
+                  OutArgs(14) = 'Fan:SystemModel'
                   OutArgs(15) = TRIM(InArgs(15))
                   sysFanName = TRIM(InArgs(15))
                 ELSE
                   OutArgs(14:15) = InArgs(14:15)
                 ENDIF
                 OutArgs(16:CurArgs) = InArgs(16:CurArgs)
-                CALL WriteOutIDFLines(DifLfn, 'ZONEHVAC:TERMINALUNIT:VARIABLEREFRIGERANTFLOW', CurArgs, OutArgs, NwFldNames, NwFldUnits)
+                CALL WriteOutIDFLines(DifLfn, 'ZoneHVAC:TerminalUnit:VariableRefrigerantFlow', CurArgs, OutArgs, NwFldNames, NwFldUnits)
 
                 IF (isVariableVolume) THEN
                   ! create fan system model object