Tidier implementation of forall instantiation