#
# $Id$
#
.PS

copy "sequence.pic";

# Define the objects
object(S,"s:Switch");
object(P,"p:Pump");
step();
active(S);
active(P);

# Message sequences
message(S,P,"run()");
message(S,P,"stop()");

step();
complete(S);
complete(P);

.PE
