LoL

1)cate note sunt cantate in acelasi timp (timestamp,masura,partea)

(length$ (find-all-facts ((?f1 note) (?f2 note)) (and (and (= ?f1:timestamp ?f2:timestamp) (= ?f1:masura ?f2:masura)) (= ?f1:partea ?f2:partea))))


2)cate note sunt de un fel (nota) (do re mi fa sol la si do) , notele sunt de la A la H


(length$ (find-all-facts (?f note) (= f:nota "A")))
(length$ (find-all-facts (?f note) (= f:nota "B")))
(length$ (find-all-facts (?f note) (= f:nota "C")))
(length$ (find-all-facts (?f note) (= f:nota "D")))
(length$ (find-all-facts (?f note) (= f:nota "H")))




3)cate note de o anumita lungima exista(duratie 1 ,0.5 , 0.125 , 0.03125 ) )

(length$ (find-all-facts (?f note) (= f:duratie 1)))
(length$ (find-all-facts (?f note) (= f:duratie 0.5)))
(length$ (find-all-facts (?f note) (= f:duratie 0.125)))
(length$ (find-all-facts (?f note) (= f:duratie 0.03125)))




BIO:
https://www.csie.ntu.edu.tw/~sylee/courses/clips/bpg/node9.7.8.3.html - functia find-all-facts
https://stackoverflow.com/questions/25953986/clips-counting-facts-or-template-instances-that-match-the-pattern - intrebare si functia find-all-facts