 [nondet]current_alarm(?Time, 
:Goal, ?Id, ?Status)Enumerate the alarms in the schedule. Time is the absolute 
time the event is scheduled for (see also get_time/1). Goal 
is the goal to execute, Id is the identifier and Status 
is the scheduling status. It takes the value
[nondet]current_alarm(?Time, 
:Goal, ?Id, ?Status)Enumerate the alarms in the schedule. Time is the absolute 
time the event is scheduled for (see also get_time/1). Goal 
is the goal to execute, Id is the identifier and Status 
is the scheduling status. It takes the value done if the 
alarm has been fired, next if the event is the next to be 
executed and
scheduled otherwise.