make testcases green

VECTOAux/VectoAuxiliariesTests/IntegrationTests/AuxDemandTest.vb

@@ -52,6 +52,7 @@ Namespace IntegrationTests
             aux.Signals.PreExistingAuxPower = (6.1 * 1000).SI(Of Watt)()
             aux.Signals.Idle = False
             aux.Signals.InNeutral = False
+            aux.Signals.SimulationInterval = 1.SI(of Second)
             'aux.Signals.RunningCalc = True
             'aux.Signals.InternalEnginePower = (internalPower * 1000).SI(Of Watt)()        'kW
             Dim internalEnginePower = (internalPower * 1000).SI(Of Watt)()        'kW
@@ -106,6 +107,7 @@ Namespace IntegrationTests
             'aux.Signals.InternalEnginePower = (internalPower * 1000).SI(Of Watt)()       'kW
             Dim internalEnginePower = (internalPower * 1000).SI(Of Watt)()       'kW
             aux.Signals.ExcessiveDragPower = engineMotoringPower + internalEnginePower
+            aux.Signals.SimulationInterval = 1.SI(of Second)
 
             'Dim msg As String = String.Empty
             For i As Integer = 0 To 9

VECTOAux/VectoAuxiliariesTests/UnitTests/M6Tests.vb

@@ -115,6 +115,7 @@ Namespace UnitTests
 			signals.PreExistingAuxPower = (AUX * 1000).SI(Of Watt)()
 			signals.EngineDrivelinePower = (EDP * 1000).SI(Of Watt)()
 			'signals.SmartElectrics = SM
+            signals.ExcessiveDragPower = ((EMP - EDP) * 1000).SI(of Watt)
 
 
 			Dim target As New M06Impl(GetAuxConfigDummy().ElectricalUserInputsConfig, M1, M2, M3, M4, M5, signals)