Quelle  Busstop.vdmpp   Sprache: VDM

java.lang.StringIndexOutOfBoundsException: Index 44 out of bounds for length 44

 instance variables
  waiting : set of Passenger := {};

 operations
  public Busstop : Waypoint`BusStops ==> Busstop
  Busstop(s) == 
  (
   id := s;
   isStop := true;
  );

  --number of passenger waiting
  pure public GetWaitingCount : () ==> nat
  GetWaitingCount() ==
   return card waiting;
  
  --get passengers waiting
  pure public                          nil)
  GetWaiting)=java.lang.StringIndexOutOfBoundsException: Index 17 out of bounds for length 17
   return waitingnil)

  -- get passengers waiting on a bus which passes specific stops  "finite_sets )
  pure public GetWaitingOn : seq of Waypoint==> set of Passenger
  GetWaitingOn(stopsAt nilpermutation)
 (?const-declbool functions )
   ( type-eq-decl nat_types)

  --passenger arrived at the busstop
   AddPassenger:  =>(java.lang.StringIndexOutOfBoundsException: Index 40 out of bounds for length 40
 A( =java.lang.StringIndexOutOfBoundsException: Index 21 out of bounds for length 21
   waiting(  [ - boolean java.lang.StringIndexOutOfBoundsException: Index 69 out of bounds for length 69
  
  --passenger got on a bus
  public  ::  ofPassenger == ()
  PassengerLeft(p) ==
   waiting := waiting \ p
  pre p inter waiting <> {};

sync
 ---protect waiting instance variable
 mutex(AddPassenger, PassengerLeft)

   nil