Weighted objective function for generalized circle

Input: partition Π={(Subscript[π, 1]),⃛,(Subscript[π, k])} of the set 𝒜 ⊂ (ℝ^n), (in case of WFmin[] only the set 𝒜), circle centers ;
Output: weighted objective function value;
Submodules: none needed

WGLS[PI_,Circ_]:=Module[{},
Return[
Sum[Sum[PI[[j,s,1]]DGcir[PI[[j,s,2]],Circ[[j,1]],Circ[[j,2]]],{s,Length[PI[[j]]]}]
,{j,Length[PI]}]
]]