Up to index of Isabelle/HOL/Marvin99-1
RefRels = HOL + consts refsto :: "['a, 'a] => bool" (infixl 42) refeq :: "['a, 'a] => bool" (infixl 42) end