daily pastebin goal
4%
SHARE
TWEET

Untitled

a guest Oct 23rd, 2018 91 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. (type-case ISE-Value (vals-val result)
  2. [numV (n) (not (= 0 n))]
  3. [else #t])))
  4. ;not (= 0 (numV-n (vals-val (interp-helper body (anEnv param num cEnv) evaled-dist-state))))))
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top