git.fiddlerwoaroof.com
Raw Blame History
> (load "demo/auto.ops")
;;; Loading source file "demo/auto.ops"
;;; Warning: File "demo/auto.ops" does not begin with IN-PACKAGE.  Loading into package "OPS"
Common Lisp OPS5 interpreter, version 14-OCT-92.
******************
#P"/afs/andrew.cmu.edu/scs/cs/15-381/ops5/demo/auto.ops"
> (make ready)
NIL
> (run)


Automobile Diagnosis 


Is this true: key is off [no]  yes

Concluding you must turn the key to start the car 
*End of diagnosis* 


Is this true: key is off [no]  no

Is this true: engine is turning [no]  yes

Concluding problem is in fuel or ignition system 

Is this true: headlights are dim or dead [no]  no

Is this true: fuel gauge shows empty [no]  no

Is this true: carburetor smells like gasoline [no]  yes

Is this true: spark at spark plugs [no]  yes

Concluding engine is flooded: wait 15 minutes 
*End of diagnosis* 


Is this true: key is off [no]  no

Is this true: engine is turning [no]  n

Concluding problem is in starting system 

Is this true: headlights are dim or dead [no]  n

Concluding you have a bad starter 
*End of diagnosis* 


Is this true: key is off [no]  q

end -- explicit halt
 18 productions (108 // 200 nodes)
 50 firings (101 rhs actions)
  5 mean working memory size (9 maximum)
  4 mean conflict set size (8 maximum)
 11 mean token memory size (19 maximum)
NIL