Recursive_Component.thy