Add transition rules.

NREL · Feb 21, 2020 · e3fc456 · e3fc456 · nrel-bot-3 · Feb 21, 2020
1 parent 5e06222
commit e3fc456
Showing 1 changed file with 22 additions and 0 deletions.
diff --git a/src/Transition/CreateNewIDFUsingRulesV9_3_0.f90 b/src/Transition/CreateNewIDFUsingRulesV9_3_0.f90
@@ -1116,6 +1116,28 @@ SUBROUTINE CreateNewIDFUsingRules(EndOfFile,DiffOnly,InLfn,AskForInput,InputFile
 
               ! If your original object starts with S, insert the rules here
 
+              CASE('SHADOWCALCULATION')
+                ObjectName = "ShadowCalculation"
+                CALL GetNewObjectDefInIDD(ObjectName,NwNumArgs,NwAorN,NwReqFld,NwObjMinFlds,NwFldNames,NwFldDefaults,NwFldUnits)
+                IF (SameString(InArgs(6),"ScheduledShading")) THEN
+                  OutArgs(1)="Scheduled"
+                ELSE IF (SameString(InArgs(6),"ImportedShading")) THEN
+                  OutArgs(1)="Imported"
+                ELSE
+                  OutArgs(1)="PolygonClipping"
+                END IF
+                IF (SameString(InArgs(1),"AverageOverDaysInFrequency")) THEN
+                  OutArgs(2)="Periodic"
+                ELSE IF (SameString(InArgs(1),"TimestepFrequency")) THEN
+                  OutArgs(2)="Timestep"
+                END IF
+                OutArgs(3:5) = InArgs(2:4)
+                OutArgs(6) = Blank
+                OutArgs(7) = InArgs(5)
+                OutArgs(8:NwNumArgs) = InArgs(7:NumArgs)
+                CurArgs = CurArgs + 1
+                NoDiff = .false.
+
               ! If your original object starts with T, insert the rules here
 
               ! If your original object starts with U, insert the rules here