Abstract Model Specifications:Z Clock - 1
BellStatus: {quiet, ringing}, AlarmStatus: {disabled, enabled}
Clock time, alarm_time: N bell: BellStatusalarm: AlarmStatus
(time? = midnight) ? (bell? = quiet) ? (alarm? = disabled)
(time? = succ(time)) (alarm_time? = time?) ? (alarm? = enabled) => (bell? = ringing)(~((alarm_time? = time?) ? (alarm? = enabled)) => (bell? = bell)(alarm? = alarm) ? (alarm_time? = alarm_time)