# File RPCParameters.ML

    (*
        File:        RPCParameters.ML
        ID:          $Id: RPCParameters.ML,v 1.4 2005/09/07 18:22:43 wenzelm Exp $
        Author:      Stephan Merz
        Copyright:   1997 University of Munich

        RPC-Memory example: RPC parameters (theorems and proofs)
    *)

    Addsimps ([RFNoMemVal, NotAResultNotRF, OKNotRF, BANotRF]
              @ (map (fn x => x RS not_sym) [NotAResultNotRF, OKNotRF, BANotRF]));