Code development platform for open source projects from the European Union institutions

Skip to content
Snippets Groups Projects
Commit d8dc5a3d authored by Markus Quaritsch's avatar Markus Quaritsch
Browse files

fix: calculation of rDyn in declaration mode if multiple driven axles

parent 652d4367
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
VECTO/GUI/GearboxForm.vb
+ 3
− 2
View file @ d8dc5a3d
...@@ -911,8 +911,9 @@ Public Class GearboxForm ...@@ -911,8 +911,9 @@ Public Class GearboxForm
If (vehicle.Axles.Count < 2) Then If (vehicle.Axles.Count < 2) Then
Return Nothing Return Nothing
End If End If
'TODO: rdyn = vehicle.Axles.Where(Function(axle) axle.AxleType = AxleType.VehicleDriven) _
rDyn = DeclarationData.Wheels.Lookup(vehicle.Axles(1).Tyre.Dimension).DynamicTyreRadius .Select(Function(da) DeclarationData.Wheels.Lookup(da.Tyre.Dimension).DynamicTyreRadius) _
.Average()
End If End If
If (rDyn.IsEqual(0)) Then If (rDyn.IsEqual(0)) Then
Return Nothing Return Nothing
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment

For further information about the platform and support, please see https://code.europa.eu/info/about