Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
CHARGUERAUD Arthur
cfml
Commits
f37ac489
Commit
f37ac489
authored
Apr 01, 2016
by
charguer
Browse files
demo_works
parent
664f35a2
Changes
1
Hide whitespace changes
Inline
Side-by-side
examples/BasicDemos/Demo.ml
View file @
f37ac489
...
...
@@ -391,14 +391,19 @@ type typereca1 = | Typereca_1 of typereca2
on the fly into a coq mutual inductive
type typerecb1 = | Typerecb_1 of typerecb2
and typerecb2 = { typerecb_2 : typerecb1 }
--> the work around is to break circularity using polymorphism, e.g.:
*)
type
'
a
typerecb2
=
{
typerecb_2
:
'
a
}
type
typerecb1
=
|
Typerecb_1
of
typerecb1
typerecb2
(* not supported: recursive definitions using abbreviation
type typerecb1 = | Typerecb_1 of typerecb2
and typerecb2 = typerecb1 list
work around by inlining, e.g.:
--> the
work around by inlining, e.g.:
*)
type
typerecc1
=
|
Typerecc_1
of
typerecc1
list
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment