;;;======================================================
;;;   London Weather - certainy factors
;;;     
;;;     
;;;     CLIPS Version 6.0 Example
;;;
;;;     To execute, merely load this and relatives.clp, reset and run.
;;;======================================================

(defrule startup
   =>
   (printout t "we are predicting weather" crlf )
   (assert (today rain)                    ; establish facts about the weather
		(rain low) cf .8
		(temp cold) cf .9
 		(set-fact-duplication TRUE)

           
             )
)