mentor/derived/BinpackIE.i3

 Copyright (C) 1995, Digital Equipment Corporation.       
 All rights reserved.                                     
 See the file COPYRIGHT for a full description.           
                                                          
 Last modified on Thu Feb  9 08:50:12 PST 1995 by kalsow  
      modified on Sun Jun  5 21:58:07 PDT 1994 by mhb     
      modified on Wed Feb 17 16:46:35 PST 1993 by johnh   


********************************************************************

      *  NOTE: This file is generated automatically from the event
      *        definition file Binpack.evt.
      ********************************************************************



<* PRAGMA LL *>

INTERFACE BinpackIE;

<*NOWARN*> IMPORT IntList, BinpackAux, RealList, Algorithm, View;
<*NOWARN*> IMPORT Thread;

 call the following to generate an event: 


PROCEDURE Setup (
      initiator: Algorithm.T;
       nBins, nWts: INTEGER
    ) RAISES {Thread.Alerted};
    <* LL = {} *>

PROCEDURE NewWeight (
      initiator: Algorithm.T;
       id: INTEGER; wt: REAL
    ) RAISES {Thread.Alerted};
    <* LL = {} *>

PROCEDURE Pack (
      initiator: Algorithm.T;
       bin: INTEGER; total: REAL
    ) RAISES {Thread.Alerted};
    <* LL = {} *>

PROCEDURE Ignore (
      initiator: Algorithm.T;

    ) RAISES {Thread.Alerted};
    <* LL = {} *>

PROCEDURE Probe (
      initiator: Algorithm.T;
       bin: INTEGER; total: REAL
    ) RAISES {Thread.Alerted};
    <* LL = {} *>

PROCEDURE TryToDeleteWeight (
      initiator: View.T;
       id: INTEGER
    ) RAISES {Thread.Alerted};
    <* LL = VBT.mu *>

PROCEDURE TryToEmptyBin (
      initiator: View.T;
       bin: INTEGER
    ) RAISES {Thread.Alerted};
    <* LL = VBT.mu *>

PROCEDURE RepackBin (
      initiator: Algorithm.T;
       bin: INTEGER; old, new: IntList.T; amts: RealList.T
    ) RAISES {Thread.Alerted};
    <* LL = VBT.mu *>

END BinpackIE.





interface View is in: