A3: F3() in { a where a is Element of F2() : P1[a] } by A1, A2;
thus P1[F3()] from LMOD_7:sch 6(A3); :: thesis: verum