#
.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()");
complete(S);
complete(P);
.PE