Step * 1 1 2 1 1 of Lemma eqmod-by-orbits


1. : ℕ
2. Type
3. List
4. List List
5. (||u|| 1 ∈ ℤ) ∨ (p ||u||)
6. (∀orbit∈v.(||orbit|| 1 ∈ ℤ) ∨ (p ||orbit||))
7. l_sum(map(λo.||o||;v)) ≡ ||filter(λo.(||o|| =z 1);v)|| mod p
8. ||u|| 1 ∈ ℤ
⊢ (1 l_sum(map(λo.||o||;v))) ≡ (||filter(λo.(||o|| =z 1);v)|| 1) mod p
BY
(RWO "-2" THEN Auto) }


Latex:


Latex:

1.  p  :  \mBbbN{}
2.  T  :  Type
3.  u  :  T  List
4.  v  :  T  List  List
5.  (||u||  =  1)  \mvee{}  (p  |  ||u||)
6.  (\mforall{}orbit\mmember{}v.(||orbit||  =  1)  \mvee{}  (p  |  ||orbit||))
7.  l\_sum(map(\mlambda{}o.||o||;v))  \mequiv{}  ||filter(\mlambda{}o.(||o||  =\msubz{}  1);v)||  mod  p
8.  ||u||  =  1
\mvdash{}  (1  +  l\_sum(map(\mlambda{}o.||o||;v)))  \mequiv{}  (||filter(\mlambda{}o.(||o||  =\msubz{}  1);v)||  +  1)  mod  p


By


Latex:
(RWO  "-2"  0  THEN  Auto)




Home Index