coq-club AT inria.fr
Subject: The Coq mailing list
List archive
- From: Jason Gross <jasongross9 AT gmail.com>
- To: coq-club <coq-club AT inria.fr>
- Subject: [Coq-Club] How can I use [Program Fixpoint] for mutual fixpoints?
- Date: Fri, 26 Dec 2014 16:41:55 -0500
I tried this in Coq 8.4pl4:
Require Import Program.
Inductive Even : nat -> Prop :=
| evenO : Even O
| evenS : forall n, Odd n -> Even (S n)
with Odd : nat -> Prop :=
| oddS : forall n, Even n -> Odd (S n).
Program Fixpoint doubleE {n} (e : Even n) : Even (2 * n)
:= _
with doubleO {n} (o : Odd n) : Odd (S (2 * n))
:= _.
Next Obligation. (* Error: More than one program with unsolved obligations *)
bug got "Error: More than one program with unsolved obligations". Is there a way to fix this? Is this a bug that should be reported?
Thanks,
Jason
- [Coq-Club] How can I use [Program Fixpoint] for mutual fixpoints?, Jason Gross, 12/26/2014
- Re: [Coq-Club] How can I use [Program Fixpoint] for mutual fixpoints?, Matthieu Sozeau, 12/26/2014
Archive powered by MHonArc 2.6.18.