Direct Coq definition of the semantics. Mainly for trying out Coq
features.