yvern/not_ok.clj

Created January 20, 2023 19:02

Star (0) You must be signed in to star a gist
Fork (0) You must be signed in to fork a gist

Learn more about clone URLs
Clone this repository at <script src="https://gist.github.com/yvern/2c09555633703f81a55db68f1396d761.js"></script>
Save yvern/2c09555633703f81a55db68f1396d761 to your computer and use it in GitHub Desktop.

Download ZIP

Raw

	(defrule not-ok
	[:a]
	=>
	(when (< 0.5 (rand))
	(insert! {:fact-type :b})))

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment