Quellcode-Bibliothek Busstop.vdmpp   Sprache: VDM

class  java.lang.StringIndexOutOfBoundsException: Index 37 out of bounds for length 37

 instance nonempty-type-from-decljava.lang.StringIndexOutOfBoundsException: Range [51, 1) out of bounds for length 3
 waiting:of  ;

 operations
  public pure GetWaitingCount ( = nat
   card;
  (
   id
     --get passengers waiting pure GetWaiting:   nil
  );

 --number of passenger waiting
 pure :( =java.lang.StringIndexOutOfBoundsException: Index 42 out of bounds for length 42
  GetWaitingCount=
   return card waiting;
  
  --get passengers waiting(stopsAt=
  pure public GetWaiting : (    natnonempty-type-eq-declnil naturalnumbers nil)
  GetWaiting)==
   return waiting;

  -- get passengers waiting on a bus which passes specific stops 
  publicGetWaitingOnseq Waypoint>set java.lang.StringIndexOutOfBoundsException: Index 64 out of bounds for length 64
  GetWaitingOnjava.lang.StringIndexOutOfBoundsException: Index 34 out of bounds for length 21
 let = stopsAt
   return PassengerLeft  of = (java.lang.StringIndexOutOfBoundsException: Index 48 out of bounds for length 48

  --passenger arrived at the busstop
  public AddPassenger : Passenger ==> ()
  AddPassenger(
   waiting := waitingsync ---protect waiting instance variable utex)
  
  --passenger got on a bus
  public PassengerLeft : set of Passenger ==> ()
  PassengerLeft(p) ==
   waiting := waiting \ p
  pre p inter waiting< {};

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

end Busstopbelow  nil