consider f being Function such that
A2: ( dom f = F1() & rng f c= F2() ) and
A3: for x being object st x in F1() holds
P1[x,f . x] from FUNCT_1:sch 6(A1);
reconsider f = f as Function of F1(),F2() by A2, Th2;
take f ; :: thesis: for x being object st x in F1() holds
P1[x,f . x]

thus for x being object st x in F1() holds
P1[x,f . x] by A3; :: thesis: verum