From Undecidability Require Export UpToC.
From Undecidability Require Export UpToC.
From Undecidability Require Export GenericNary.
From Undecidability.Shared.Libs.PSL Require FinTypes.
Local Set Universe Polymorphism.

Lemma upToC_c_nary (domain : list Set) c F:
(fun _ => 1) <=c F ->
Const' domain c <=c F.