aboutsummaryrefslogtreecommitdiffhomepage
path: root/library/lib.ml
diff options
context:
space:
mode:
Diffstat (limited to 'library/lib.ml')
-rw-r--r--library/lib.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/library/lib.ml b/library/lib.ml
index 412772e8a..a5a9a0194 100644
--- a/library/lib.ml
+++ b/library/lib.ml
@@ -445,7 +445,7 @@ let extract_hyps (secs,ohyps) =
in aux (secs,ohyps)
let instance_from_variable_context =
- Array.of_list % List.map NamedDecl.get_id % List.filter is_local_assum % List.map fst
+ List.map fst %> List.filter is_local_assum %> List.map NamedDecl.get_id %> Array.of_list
let named_of_variable_context =
List.map fst