changeset 74525 | c960bfcb91db |
parent 74282 | c2ee8d993d6a |
child 82643 | f1c14af17591 |
--- a/src/HOL/TPTP/TPTP_Parser/tptp_reconstruct_library.ML Fri Oct 15 17:45:47 2021 +0200 +++ b/src/HOL/TPTP/TPTP_Parser/tptp_reconstruct_library.ML Fri Oct 15 19:25:31 2021 +0200 @@ -321,7 +321,7 @@ fun strip_top_all_vars acc t = if Logic.is_all t then let - val (v, t') = Logic.dest_all t + val (v, t') = Logic.dest_all_global t (*bound instances in t' are replaced with free vars*) in strip_top_all_vars (v :: acc) t'