« first day (1139 days earlier)      last day (531 days later) » 

7:14 PM
frozen(Room) :- messages(Room, Ms), last(Ms, L), date(Now), msg_date(L, Then), Now - Then #> TwoWeeks, seconds_weeks(TwoWeeks, 2).
frozen('Prolog') :- !, false.
I want a SE chat API from prolog :)
 
You could make one
 

« first day (1139 days earlier)      last day (531 days later) »