19 lines
623 B
Plaintext
19 lines
623 B
Plaintext
:- determination(upgrade/1,date/2).
|
|
:- determination(upgrade/1,time/2).
|
|
:- determination(upgrade/1,value_Carbs/2).
|
|
:- determination(upgrade/1,value_Glucose/2).
|
|
:- determination(upgrade/1,value_Insulin/2).
|
|
|
|
:- modeh(*,upgrade(+iD)).
|
|
:- modeb(*,date(+iD,-date)).
|
|
:- modeb(*,date(+iD,#date)).
|
|
:- modeb(*,time(+iD,-time)).
|
|
:- modeb(*,time(+iD,#time)).
|
|
:- modeb(*,value_Carbs(+iD,-value_Carbs)).
|
|
:- modeb(*,value_Carbs(+iD,#value_Carbs)).
|
|
:- modeb(*,value_Glucose(+iD,-value_Glucose)).
|
|
:- modeb(*,value_Glucose(+iD,#value_Glucose)).
|
|
:- modeb(*,value_Insulin(+iD,-value_Insulin)).
|
|
:- modeb(*,value_Insulin(+iD,#value_Insulin)).
|
|
|