(**************************************)
(* In the beginning there was the set *)
(**************************************)

Definition Fn_set (F : Setoid) (n : Nat) : SET := seq n F.Definition Fn_plus :
  forall (F : sgroup) (n : Nat), law_of_composition (Fn_set F n).

Lemma Fn_plus_associative : forall (F : sgroup) (n : Nat), associative (Fn_plus F n).