* :foo
:FOO
* (unintern :foo :keyword)
T
* ** 
#:FOO
* (find-symbol "FOO" "KEYWORD")
NIL
NIL
* (unintern :keyword :keyword)
T
* (lisp-implementation-version)
"2.0.2"
* (lisp-implementation-type)
"SBCL"
* (find-symbol "KEYWORD" "KEYWORD")
NIL
NIL