Algebraic Specifications: Algebraic CLOCK - 2
relations
time(init) –> midnight
time(tick(C)) –> time(C) + 1
time(setalarm(C,T)) –> time(C)
time(enable(C)) –> time(C)
time(disable(C)) –> time(C)
alarm_ time(init) –> midnight
alarm_ time(tick(C)) –> alarm_ time(C)
alarm_ time(setalarm(C,T)) –> T
alarm_ time(enable(C)) –> alarm_ time(C)
alarm_ time(disable(C)) –> alarm_ time(C)