def P : C → list ℕ :=
λ (c : C), @C.d c ℕ [0]