IncentiveStayRight.java
- package org.opentrafficsim.road.gtu.lane.tactical.lmrs;
- import java.util.SortedSet;
- import org.djunits.value.vdouble.scalar.Speed;
- import org.opentrafficsim.base.parameters.ParameterException;
- import org.opentrafficsim.base.parameters.Parameters;
- import org.opentrafficsim.core.gtu.GTUType;
- import org.opentrafficsim.core.gtu.Try;
- import org.opentrafficsim.core.gtu.perception.EgoPerception;
- import org.opentrafficsim.core.gtu.plan.operational.OperationalPlanException;
- import org.opentrafficsim.core.network.NetworkException;
- import org.opentrafficsim.core.network.route.Route;
- import org.opentrafficsim.road.gtu.lane.perception.InfrastructureLaneChangeInfo;
- import org.opentrafficsim.road.gtu.lane.perception.LanePerception;
- import org.opentrafficsim.road.gtu.lane.perception.LaneStructureRecord;
- import org.opentrafficsim.road.gtu.lane.perception.RelativeLane;
- import org.opentrafficsim.road.gtu.lane.perception.categories.InfrastructurePerception;
- import org.opentrafficsim.road.gtu.lane.tactical.following.CarFollowingModel;
- import org.opentrafficsim.road.gtu.lane.tactical.util.lmrs.Desire;
- import org.opentrafficsim.road.gtu.lane.tactical.util.lmrs.VoluntaryIncentive;
- /**
- * Incentive for trucks to remain on the two right-hand lanes, unless the route requires otherwise.
- * <p>
- * Copyright (c) 2013-2018 Delft University of Technology, PO Box 5, 2600 AA, Delft, the Netherlands. All rights reserved. <br>
- * BSD-style license. See <a href="http://opentrafficsim.org/node/13">OpenTrafficSim License</a>.
- * <p>
- * @version $Revision$, $LastChangedDate$, by $Author$, initial version 4 mrt. 2018 <br>
- * @author <a href="http://www.tbm.tudelft.nl/averbraeck">Alexander Verbraeck</a>
- * @author <a href="http://www.tudelft.nl/pknoppers">Peter Knoppers</a>
- * @author <a href="http://www.transport.citg.tudelft.nl">Wouter Schakel</a>
- */
- public class IncentiveStayRight implements VoluntaryIncentive
- {
- /** {@inheritDoc} */
- @Override
- public Desire determineDesire(final Parameters parameters, final LanePerception perception,
- final CarFollowingModel carFollowingModel, final Desire mandatoryDesire, final Desire voluntaryDesire)
- throws ParameterException, OperationalPlanException
- {
- InfrastructurePerception infra = perception.getPerceptionCategory(InfrastructurePerception.class);
- LaneStructureRecord root = perception.getLaneStructure().getRootRecord();
- LaneStructureRecord record = root;
- RelativeLane lane = RelativeLane.CURRENT;
- Route route = Try.assign(() -> perception.getGtu().getStrategicalPlanner().getRoute(), "");
- GTUType gtuType = Try.assign(() -> perception.getGtu().getGTUType(), "");
- Speed speed = perception.getPerceptionCategory(EgoPerception.class).getSpeed();
- // move all the way left
- while (record.physicalLeft())
- {
- lane = lane.getLeft();
- record = record.getLeft();
- }
- // move right until we find 'the right-hand lane',
- double curUrgency = urgency(infra.getInfrastructureLaneChangeInfo(lane), parameters, speed);
- while (true)
- {
- try
- {
- if (!record.physicalRight() || !record.getRight().allowsRoute(route, gtuType))
- {
- // next lane considered not there, we've found 'the right-hand lane'
- break;
- }
- }
- catch (NetworkException exception)
- {
- throw new RuntimeException(exception);
- }
- double rightUrgency = urgency(infra.getInfrastructureLaneChangeInfo(lane.getRight()), parameters, speed);
- if (rightUrgency > curUrgency)
- {
- // next lane is worse for the route, current lane is allowable for the route
- break;
- }
- lane = lane.getRight();
- record = record.getRight();
- curUrgency = rightUrgency;
- }
- if (lane.getLateralDirectionality().isRight() && lane.getNumLanes() > 1)
- {
- // must change right
- return new Desire(root.legalLeft() ? -1.0 : 0.0, 1.0);
- }
- if (lane.isRight())
- {
- // must not change left
- return new Desire(root.legalLeft() ? -1.0 : 0.0, 0.0);
- }
- return new Desire(0.0, 0.0);
- }
- /**
- * Returns the urgency to leave a lane.
- * @param laneChangeInfo SortedSet<InfrastructureLaneChangeInfo>; lane change info on the lane
- * @param parameters Parameters; parameters
- * @param speed Speed; current speed
- * @return double; urgency to leave the lane
- * @throws ParameterException
- */
- private double urgency(final SortedSet<InfrastructureLaneChangeInfo> laneChangeInfo, final Parameters parameters,
- final Speed speed) throws ParameterException
- {
- double urgency = 0.0;
- for (InfrastructureLaneChangeInfo info : laneChangeInfo)
- {
- double nextUrgency = IncentiveRoute.getDesireToLeave(parameters, info.getRemainingDistance(),
- info.getRequiredNumberOfLaneChanges(), speed);
- urgency = urgency > nextUrgency ? urgency : nextUrgency;
- }
- return urgency;
- }
- }