Задано правило на CLIPS:
(deffunction sex-risk (?s ?a ?pm ?et) "sex & age related risk" (if (= 0 (str-compare ?s male)) then (if (>= ?a 45) then (return 1) else (return 0)) else (if (>= ?a 65) then (return 1) else (if (= 0 (str-compare ?pm yes)) then (if (= 0 (str-compare ?et yes)) then (return 1) else (return 0)) else then (return 0)))))
В каком случае достигается повышенный риск для женщин?