Adjust slip control conditions

peternewell · peternewell · commit 43f6ee9fc74e · 2023-10-29T19:39:13.000+11:00
diff --git a/Source/Orts.Simulation/Simulation/RollingStocks/MSTSLocomotive.cs b/Source/Orts.Simulation/Simulation/RollingStocks/MSTSLocomotive.cs
@@ -2466,7 +2466,7 @@ protected virtual void UpdateAxleDriveForce()
                         // Simple slip control
                         // Motive force is reduced to the maximum adhesive force
                         // In wheelslip situations, motive force is set to zero
-                        axle.DriveForceN = Math.Sign(axle.DriveForceN) * Math.Min(axle.AdhesionLimit * axle.AxleWeightN, Math.Abs(axle.DriveForceN));
+                        axle.DriveForceN = Math.Sign(axle.DriveForceN) * Math.Min(axle.MaximumPolachWheelAdhesion * axle.AxleWeightN, Math.Abs(axle.DriveForceN));
                         if (axle.IsWheelSlip) axle.DriveForceN = 0;
                     }
                 }

Original file line number	Diff line number	Diff line change
`@@ -2466,7 +2466,7 @@ protected virtual void UpdateAxleDriveForce()`
`2466`	`2466`	`// Simple slip control`
`2467`	`2467`	`// Motive force is reduced to the maximum adhesive force`
`2468`	`2468`	`// In wheelslip situations, motive force is set to zero`
`2469`		`- axle.DriveForceN = Math.Sign(axle.DriveForceN) * Math.Min(axle.AdhesionLimit * axle.AxleWeightN, Math.Abs(axle.DriveForceN));`
	`2469`	`+ axle.DriveForceN = Math.Sign(axle.DriveForceN) * Math.Min(axle.MaximumPolachWheelAdhesion * axle.AxleWeightN, Math.Abs(axle.DriveForceN));`
`2470`	`2470`	`if (axle.IsWheelSlip) axle.DriveForceN = 0;`
`2471`	`2471`	`}`
`2472`	`2472`	`}`