Fuzzy objective function

(* 
Input: data set 𝒜 ⊂ (ℝ^n), centers (Subscript[c, 1]),⃛,(Subscript[c, k]) ∈ (ℝ^n), membership matrix U;
Output: objective function value: Φ(c,U);
Submodules: mu[] 
*)

Fz[A_,cen_]:=Module[{m=Length[A],k=Length[cen]},
Return[
Sum[mu[A,cen,i,j]^q Norm[cen[[j]]-A[[i]]]^2,{i,m},{j,k}]
	]
];