Executed from: TOM-PROLOG VALIDATION
/l3i.event.opendata/corpus/rmm2_relaxnews_new/ptom/rmm2_37.xmi.periodicaltime
pti(from(ate([(14,hour),(0,day)])),to(ate([(20,hour),(0,day)]))),R,M).
OK
pti(from(ate([(10,hour),(0,day)])),to(ate([(20,hour),(0,day)]))),R,M).
OK
pti(from(ate([(6,day),(0,week)])),to(ate([(7,day),(0,week)]))),R,M).
OK