(
let
((
x
(
:fnord
0
1
2
)))
(
vcase
x
((
:fnord
a
b
c
)
c
)))