diff options
| author | Pierre-Marie Pédrot | 2015-02-02 09:30:53 +0100 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2015-02-02 11:17:09 +0100 |
| commit | 777f0ace3d2458cbe1840dcf3d8f350452721e84 (patch) | |
| tree | 84ba577dd35863ca0eb77b7155ca5d81899b85ea /kernel/names.ml | |
| parent | db293d185f8deb091d4b086f327caa0f376d67d7 (diff) | |
Removing dead code.
Diffstat (limited to 'kernel/names.ml')
| -rw-r--r-- | kernel/names.ml | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/kernel/names.ml b/kernel/names.ml index b349ccb009..4ccf5b60ae 100644 --- a/kernel/names.ml +++ b/kernel/names.ml @@ -571,7 +571,6 @@ let constr_modpath (ind,_) = ind_modpath ind let ith_mutual_inductive (mind, _) i = (mind, i) let ith_constructor_of_inductive ind i = (ind, i) -let ith_constructor_of_pinductive (ind,u) i = ((ind,i),u) let inductive_of_constructor (ind, i) = ind let index_of_constructor (ind, i) = i |