let x be set ; :: thesis: ( x in PARTITIONS Y implies ex z being set st S1[x,z] )
assume A2: x in PARTITIONS Y ; :: thesis: ex z being set st S1[x,z]
reconsider x = x as a_partition of Y by A2, Def3;
take ERl x ; :: thesis: S1[x, ERl x]
thus S1[x, ERl x] ; :: thesis: verum