SimUV4.1: Limit skid/slip force for tire wear too

git-svn-id: https://svn.code.sf.net/p/speed-dreams/code/trunk@9351 30fe4595-0a0c-4342-8851-515496e4dcbd
This commit is contained in:
harunasan 2024-02-29 06:57:27 +00:00
parent e400a6e8f3
commit a635893799
1 changed files with 10 additions and 1 deletions

View File

@ -914,6 +914,15 @@ void SimWheelUpdateTire(tCar *car, int index)
slip = slip;
}
if (normalForce >= wheel->opLoad * 2)
{
normalForce = wheel->opLoad * 2;
}
else
{
normalForce = normalForce;
}
// Calculate factor for energy which is turned into heat, according papers this seems to be pretty constant
// for a specific construction and constant slip (empiric value with model validation, called hysteresis).
// A value of 0.1 is available in papers, so for 10% slip I head for 0.1, where 0.05 come from rolling and
@ -1004,7 +1013,7 @@ void SimWheelUpdateTire(tCar *car, int index)
wheel->currentPressure = wheel->Ttire / Tair * wheel->pressure;
// Wear
double deltaWear = (wheel->currentPressure - SimAirPressure) * skidSlip * wheelSpeed * SimDeltaTime * normalForce
double deltaWear = (wheel->currentPressure - SimAirPressure) * slip * wheelSpeed * SimDeltaTime * normalForce
* wheel->wearFactor * 0.00000000000009;
wheel->currentWear += deltaWear;