Skip to Content.
Sympa Menu

coq-club - Re: [Coq-Club] Non obvious recursion (Issue with Function + Can't unfold Program Fixpoint)

coq-club AT inria.fr

Subject: The Coq mailing list

List archive

Re: [Coq-Club] Non obvious recursion (Issue with Function + Can't unfold Program Fixpoint)


Chronological Thread 
  • From: mukesh tiwari <mukeshtiwari.iiitm AT gmail.com>
  • To: coq-club AT inria.fr
  • Subject: Re: [Coq-Club] Non obvious recursion (Issue with Function + Can't unfold Program Fixpoint)
  • Date: Sat, 2 Sep 2023 12:20:08 +0100
  • Authentication-results: mail3-smtp-sop.national.inria.fr; spf=None smtp.pra=mukeshtiwari.iiitm AT gmail.com; spf=Pass smtp.mailfrom=mukeshtiwari.iiitm AT gmail.com; spf=None smtp.helo=postmaster AT mail-yw1-f174.google.com
  • Ironport-data: A9a23:9Dw08q00w0IZS8qQofbD5cR1kn2cJEfYwER7XKvMYLTBsI5bp2RTy mBNXGnQP62NMzP8ftonYNm0px5Qv5LVnYRjGgtv3Hw8FHgiRejtVY3IdB+oV8+xBpSeFxw/t 512hv3odp1coqr0/0/1WlTZhSAgk/vOHNIQMcacUghpXwhoVSw9vhxqnu89k+ZAjMOwa++3k YqaT/b3Zhn9gVaYDkpOs/jY8EI35qyr0N8llgVWic5j7Ae2e0Y9V8p3yZGZdxPQXoRSF+imc OfPpJnRErTxon/Bovv8+lrKWhViroz6ZWBiuVIKM0SWuSWukwRpukoN2FXwXm8M49mBt4gZJ NygLvVcQy9xVkHHsLx1vxW1j0iSlECJkVPKCSHXjCCd86HJW2fU7fU/NV8WB9c729dUEEJJq qEzDAlYO3hvh8ruqF66Yuxlh8BmPdayeY1G5S0mwjbeAvIrB5vERs0m5/cChGZ21p0IRKyOI ZNGNVKDbzyYC/FLElIKC58lnPupmXDlcntZqVOJoII45mHSyEp6172F3N/9JIDbH58Nxx7wS mTuxj7TBToQKMWljjfVziiM2e/lzQLkR9dHfFG/3qcy3Af7KnYoIBYRTB6wpeSzolWvXspWb U0S4Csn66YonHFHVfH4Vhy85W+b51sSAoUMVeI97w6Jx+zf5APx6nU4oiBpdOQItJ4PWxwQj HyorvD4Jjsw7ZaxcCfInluLlg+aNS8QJG4EQCYLSwoZ/tXuyL3faDqfH76P94bl37XI9SHML yOi93dh2u1C5SIf/+DqogCd2mPESo3hF1Ztvm3qsnSZAhSVjbNJiqSt4FnfqOdfdcOXFwbd+ ncDnMea4aYFCpTleM2xrAclTenBCxWtamW0bbtT838JqW/FF5mLI9w43d2GDB01WvvogBewC KMphStf5YVIIFyhZrJtboS6BqwClPaxTom0DaiPNIISO/CdkTNrGgk+NCZ8OEi9wSARfV0XZ P93jO72XStEVfo5pNZIb7tBjeRDKt8CKZP7HMinlXxLIJKRY3maTbptDbd9RrFR0U9wmy2Mq 4w3H5LSlX13CbSiCgGJq9J7BQ5RdhATW8umw/G7g8bZfWKK7kl6W6GPqV7gEqQ595loehDgp CzsABEBlwSu2BUq62yiMxheVV8mZr4nxVpTAMDmFQ/AN6ELMdj1vpQMPYA6Z6cm/+FFxPt5B atNMcaZD/gFDnyN9z0BZNOv5MZvZTa6tzKoZiCFWTkYe4I/Zgrr/tS/QBDj2hNTBQWKtOw/g Yaa6CXlfbQ5ST5fUfnmMMCU8wvpvFw2uv5DYE/TE9wCJGTu6NdLLgLyvN8WIuYNCxPJ+RWC3 S3LAx1C/ejpiK02+envmqqrgdqIEex/P0wCBEjdz++8Ghf791qZ471rcbi3JGjGdWXW/K6CW 71k/8vkOqdaoGcQ4ptOLbl76Ikfuf3tnuZ+5SZ5Fizpa1+LNOtREkOe15MSipwXl65rgiroa Eeh4dIABK6oPvniG1svJAYISOSP+PUXuzvK58QOP0TIy35rzYWDTHltEUGAuA5FIJtxFbEV8 +MrlcoVyg640xQRIomniAJQ/D+yNXAuafgsmawbJ47JsTAV7G9+T6bSMQLM26HXWe5wahErB hS2mJv9g69twxueUngrSlnI8+lvpbUPnxFoylU9CUyDsYfHjKVv3Tl60zc+fiJKxDppjsNxP WlKMRVuBKOspj1HuulKb1qOKSpgWiLAolfQzXkNn03nF3iYbHTHdjABCLzc7XIn/HJ5VRkF2 rOhkULOcyvgJeP11QsMAX9VkeTpF4FNx1eTifKcPpq3GrchamDYmY6oX20DriXnDe4XhEHqo epL/v56WZbkNBw/8rEKNI2H6Ys+EBy0BnROYfVEzpM7GWvxfDKT2z/XJXuhJeJLBfjBqnGjB +JUe8lgahWZ1QS1lA49O5IiGbFPscAM2MsjYZLufG4PjKuepGFmsbXW7SnPu1UoSNRPz+c4c 4PYSC2eH1yblV9rqn/rvvBZCDDpf+tedAnY2car+t4oDLMGivlnKmsp44u3vlKUEQppxA2Vt wX9fJ3rz/Ru5IBvvon0GJV4GAS/LO3sWNSy8Ayct8pEafXNO5zsszw5h0bGPQMMG5csQPVyy KqwteDo0HP/vLoZV37Tn7+DHfJr4eSwRO9mDdLlHkJFnCetWN7e3DVbwjqWcad2qdJ64tWrY yCaa8HqLN4cZIp79U1vMiNbF04QNrTzYqLevhiClvWrCCZM4TyfeZnjvTXsYHpAfyAFB4zmB 0Wm87yy79Rft8JXCAVCG/hiBIRiLUT+Xbc9Mef8riScEnLil2bqVmEOTvb8wWqj5ri4/MfGD VbtQxH/cFGjp/iNwogG78p9uRoYCHs7iu41Fq7YFxialBjiZFPq78xEWXnFNn2QuiP33ZD8I jrKaQPOzA3jCC9cf0yUDMvLB2+i6y9nBjs9DjMs9kKQLSyxAetsxVenGjhIux9LR9co8A1rx RzyNJE90thdD6yFndou28E=
  • Ironport-hdrordr: A9a23:ntCRNql3D9thZcjK3oaAW6u4oiPpDfIV3DAbv31ZSRFFG/Fw9v re5cjzsCWftN9/YgBEpTntAtjjfZqYz+8X3WBzB9aftWvdyQ+VxehZhOOI/9SjIU3DH4VmpM BdmsZFebvN5JtB4foSIjPULz/t+ra6GWmT69vj8w==
  • Ironport-phdr: A9a23:CXI62RVDOewF0gzVMRlhfreuyWrV8KxBXzF92vMcY1JmTK2v8tzYM VDF4r011RmVB9udsq4YwLGH+4nbGkU4qa6bt34DdJEeHzQksu4x2zIaPcieFEfgJ+TrZSFpV O5LVVti4m3peRMNQJW2aFLduGC94iAPERvjKwV1Ov71GonPhMiryuy+4ZLebxtJiTanfL9/I xq7oQrfu8QSnIBvNrs/xhzVr3VSZu9Y33loJVWdnxb94se/4ptu+DlOtvwi6sBNT7z0c7w3Q rJEAjsmNXs15NDwuhnYUQSP/HocXX4InRdOHgPI8Qv1Xpb1siv9q+p9xCyXNtD4QLwoRTiv6 bpgRRn1gykFKjE56nnahcN+jK1ZoByvqR9xzZPKbo6JL/dxZL/RcMkASGZdQspcVSpMCZ68Y YsVCOoBOP5Vr4zgp1sNsxS+HgmsD/7zyj9JiH75x7c60+U8GgzB2QwgAtEOv2rPrNX1KKcSU O60w7PSzTXCdf9W2Db96InUchAkuvyMUrdwftDQyUkrDQ/KklKQqYn8Mj6Ty+8CvHSV4fB6W uKzl24otRtxoj63y8oxhYfEmp4Zx1LZ+ShkwIg4ON61RUBlbNK4DZZdqT+WOot4T84mXm1lp To3xqAJtJOlfiUHyYoryhDbZvGEbYWF5A/oWuiWITd9nn1lebS/ig698Uih1u38VtS0301Qo iVZldnMs3YA3AHQ5MifUvZx4Fut1DKV2w3Q6uxIO104mbTYJpI737I9lJUevELeFSHsgkr2l rWZdkA89+io9evnZrLmq4eZN4BuiwH+Nr0im8yxAOglKwQOUXWX9Oaz2bH58k35R7JKjvIyk qbHqpzVOcMbpquhDw9U1IYs9Qq/Ai+43NgEmXQLNlFIdRKdg4T0JV3DI+r0Aeq9jlmjiDtrw urJPrzlApXDNHjDl7LhcK54605Bywo808tf55JICrEALvP8QFXxtN3CAh84Mgy0wvrnCNBm2 4MRXGKAGK6ZMKfIvVCU4eIvJvGAZIkOtznlMfgq++bujWMlmV8aZaSlwIMbaGqkEfR+P0WZf X3sj88dHmcNpwoyVfDliFmfUTFIfHuyRKI95jQjCI28F4vDR4atgKaA3CihBJFWaHpGWRiwF iLjcJzBUPMRYgqTJNVgm3oKT+uPUYgkgBSztwLhy/J7L/Xd4CxQ4Zf+19Vu5/HSihgo9Hp1D sWB1kmCSmh1miUDQDpgj/M3mlB01lrWifswuPdfD9EGv5uhMy8/PJ/YlKlhDszqHxnGZpGPQ UqnRdOvBXcwSMgwypkAeRU1AM2s2zbE2SfiGLoJj/qTHpVh97/f0mPxO8diwmzHkqggjkUja sRKPGyiwKV48lubHJbHxn2QjL3ibqEAxGjI/WaHw3CJuRRdTQ19SqXZXG8WfEqQrNX4+kbqQ LqnCLBhOQxEmoaZMqUfTNrvgB1dQev7ftTTZ2Xkg2CrGROB3a+BdqLvcmQZmTTCUQ0Kyl9Pu 3mBMgc6C2GqpGe24CVGM1Xpbgus9OB/rCj+VUoo10SRaFUn0bOp+xkTjPjaSvUJ37tCtj1z4 zNzVE2w2d7bEb/i70JoYblcbNUh4VxGyXORtgpzOYalJrxjgVhWehp+vkfn3RF6Qotals1io HQvxQt0YaWWtTEJPzaF3p3rOqHWNWDo/Vauaq/K33nR1d+X/uEE7/F541TvsQe1F1Yzpm192 oowsTPU7ZHLAQwOFJPpBxxvpl4q+veDOHl7vtyIhhgOeeGuvzTP2swkHr4gwxekJJJENb+cU RT1C4scDtSvL+ojnx6oaAgFNaZc7v1RXYvuev2Y1aqsJOslkiihiDEN5Z1+31mM6ytjQ/TJm ZcEwu2d9gSCXjb4ylymt4qk/OIMLSFXBWe5xSX+UcRUe65/ZoYXCHinOczxx9R/m5vFVHtR9 VrlDFQDkpzMG1Lafxn22gte0l4SqHqslH6jzjB6pDouq7KWwC3Ex+mKmAMvAmdQXyEiiF7tJ dPxlNUGRA2zaBBvkhK55EH8zqwdpaJlLmCVT10aNyTxKmhjVOO3uN/gK4ZK9ZAlqiVLUfu1e 1HcS7/8vx4y3CbqHm8Yzzc+Pz2noZT2mRVmhXnVdi4i6iqEP5gqlVGGu4CUTOU0vHJOXCRij DjLGlWwd8Kk+9mZjdaLs+yzUX6gSowGdCDqyY2asy7ogA8iSRa7nv21hpjmCV1giX69h4QsD H+Y6k+jPtqOtezyK+9sc0h2CUWp7sN7Hto7iY4snNQL3mBcgJyJ/H0BmGO1MNNB2Ku4YmBeI FxDi9PT/gXh31Vua3yTwIesHHCAwcZ6Z8W7fWoM22Q87sFWDY+b6bVFmW1+pV/y/mezKbBt2 ywQz/cj8itQhvwKtREt0iSCC6oTW0hZPDDpvxuN5tG66q5QYSz8FNr4nFo7ltenAraYpwhaU 3usYZYuExh76cBnOU7N2nn+ucn0PcPdZtUJuliIgg/N2qJLfYkpmKNA1k8FcSrt+GcowOkhg Vly0IGm6cKZfn518vvxAwYEZGaoIZpCone30fkYxoHMg8iuBskzRGlNBsCzC6v2SHRK8q22U mTGWDwk9iXFR/yGRVXZsAE+6CiXW5GzayPJej9DkYQkFEHbfAsF2EgVRGlowcR/T1zsnZ27N h8+v2B0hBawqwMQmL00cUClDyGH4l/vM2l8SYDDfkMOvkcbuBiTYYrGqbgqVyBAos/481fLc z3HIVwOVSZQBCnmTxjiJuX8v4GRtbjFQLPkf72WJuzR4e1GC6XSnMzpj9sgpmfWcJ3IZygqD uVniBAaAzYjQJWfwG9JE2tOxkevJ4aNrRO4sEWbt+iZ9/LmEELq7IqLUP5JNMl3vguxmeGFP vKRgyBwLXBZ0IkNzDnG0upX2llakCxoezS3dNZI/SfQUKLdnLNWBB8HemtyMsVP9ac1wghKP 4bSlNr00rdyivN9BU1CUBTtncSgZMpCJG/YVhuPHEGQKLGPPiHG2enyaKK4DKxP1aBa7kLs/ zmcFEDnM3KIkDyoHxGjPOdQjT2KaRxTvIbuF3QlQWPnTd/gdli6KIot1WxwkeBy3ymaczdDb WsZEQsFtLCb4CJGj+8qHmVA6iEgNuyYg2OC6PGeLJ8KsPxtCyAyluRA4X18xaEGiUMMDPFzh ibWqcZj5l+8lezagD96UxdVqipKm4uRvANjOKTF87FPXH/F+FQG6mDaWHFo75N1T8bivaxd0 I2FjKXoNDJL6M7Z5+MZDsnQbdOYaT8vaEW1XjHTCwQBQHigMmSV1Ck/2LmCs3aSqJY9sJ3ln pEDH6RaWFICHfQfEk15HdYGLf+fsRsrlLeaiIgD4n/s9XE5oe1Vu5nGUrSZBvC9cF5xbJFBb hoMhKLndMEdb9KnnUNlbVZ+kcLBHE+CBbhw
  • Ironport-sdr: 64f31a75_6fh35L7QWLMocyHKnpiuBBk/lUIIgJ9kKbW5V7E1KznQ8dP QprMim6kIYwM/v65p4WS1qsIlxc53II+VoJhpcQ==

Hi everyone,

I was under the impression that Agnishom's code is not simplifying because of the opaque proof terms but I was wrong because I have turned every Qed into Defined [1] involved in the proof of wellfounded [3] and it is still not simplifying [2]. Now, I am curious about how to prove this theorem [2].

Best,
Mukesh

[1] https://gist.github.com/mukeshtiwari/09e2278a1b5eb8ac23b47397ec044a12#file-agnishom-v-L13-L122
[2] https://gist.github.com/mukeshtiwari/09e2278a1b5eb8ac23b47397ec044a12#file-agnishom-v-L252
[3] https://gist.github.com/mukeshtiwari/09e2278a1b5eb8ac23b47397ec044a12#file-agnishom-v-L180

On Sat, Sep 2, 2023 at 9:53 AM Castéran Pierre <pierre.casteran AT gmail.com> wrote:
A version using Equations is on https://gist.github.com/Casteran/cb26e7fa8b185aa7f99f8b8048c6658e 

The remaining  Admitted should be trivial (just converting the well-roundedness of your order into an instance).

Pierre


Le 2 sept. 2023 à 03:26, Agnishom Chattopadhyay <agnishom AT cmi.ac.in> a écrit :

Hi all;

I have a function I am trying to define whose well-foundedness is not obvious. I am trying to do it in two different ways: (1) using Program Fixpoint and (2) using Function. In both cases, I am using the fixannot {wf ...}

However,

(1) When I try Program Fixpoint, the function can be defined. But it is opaque to `simpl`. How do I get around this? I need to be able to prove things about this function.
(2) When I use Function, I am getting a strange error message. The error message is not helpful because it references some variable names which I have not used.


Any help with this would be appreciated. I originally posted this on StackExchange, but I am corssposting here because I think this would be better suited for a threaded discussion rather than a Q/A style one.

Thanks!

--Agnishom




Archive powered by MHonArc 2.6.19+.

Top of Page