Data: n experts ex: ex[1] **. . . ex**[n]
Data**: A non-decreasing positive function** f Result: Fusion of ex by PCR6f **method :** ep for i *= 1 to* n do foreach c in ex[i] do Append c to cl[i];
foreach ind *in [1, size(*cl[1])] × *[1, size(*cl[2])] × . . .× *[1, size(*cl[n])]
do s ← Θ;
for i *= 1 to* n do s ← s ∩ cl[i][ind[i]];
if s = ∅ **then**
lconf ← 1; sum ← 0; for i *= 1 to* n do lconf ← lconf × ex[i](cl[i][ind[i**]]);** sum ← sum + f(ex[i](cl[i][ind[i**]]));**
for i *= 1 to* n do ep(ex[i][ind[i]]) ← ep(ex[i][ind[i]]) + f(ex[i](cl[i][ind[i**]]))** ∗
lconf /sum; else lconf ← 1; for i *= 1 to* n do lconf ← lconf × ex[i](cl[i][ind[i**]]);**
ep(s) ← ep(s) + **lconf**;