
theorem
for n be non zero Nat, X be non-empty n-element FinSequence,
    S be sigmaFieldFamily of X, m be sigmaMeasureFamily of S,
    f be PartFunc of CarProduct X,ExtREAL,
    g be PartFunc of product X,ExtREAL, A be Element of Prod_Field S
 st g = f*(CarProd X)" & A = dom f & f is A -measurable
 holds Integral(XProd_Measure m,g) = Integral(Prod_Measure m,f)
   by Th12,Th32;
