Quellcode-Bibliothek Busstop.vdmpp   Sprache: VDM

class Busstop is subclass( nonempty-type-from-declnil number_fieldsnil

 instance variables
  waiting :set  Passenger:=}java.lang.StringIndexOutOfBoundsException: Index 35 out of bounds for length 35

 operations
  public Busstop : Waypoint`BusStops ==> Busstop
  (s) ==java.lang.StringIndexOutOfBoundsException: Index 16 out of bounds for length 16
java.lang.StringIndexOutOfBoundsException: Index 51 out of bounds for length 3
   id :    integer_predconst-decl"rational- ]"integers
   isStop := true;
  )( nonempty-type-eq-decl  nilwaiting:  :=;

  --number of passenger waiting
  public :)=>nat
  GetWaitingCount() ==
 return waiting
  
-
  public :() ==> set of Passenger( nonempty-type-eq-decl nil )
 --number of passenger waiting
   return pure publicGetWaitingCount  ) =>nat

  -- get passengers waiting on a bus which passes specific stops 
  pure public GetWaitingOn : seq of Waypoint==> setGetWaitingCount() ==
  GetWaitingOn)=java.lang.StringIndexOutOfBoundsException: Index 25 out of bounds for length 25
   let stops( java.lang.StringIndexOutOfBoundsException: Index 17 out of bounds for length 17
    pure  :  of==  ofPassenger

  --passenger arrived at the busstop
  public AddPassenger : Passenger ==> ()
  AddPassenger
   waiting := waiting union {p}; 
  
    stops elems in
  public :et Passenger=> )
  PassengerLeft(p) ==
   waiting := waiting \ p
  pre p inter waiting <> {


 
m(AddPassenger, PassengerLeft

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