let a be set ; :: thesis: (*--> a) . 2 = <*a,a*>
thus (*--> a) . 2 = 2 |-> a by FINSEQ_2:def 6
.= <*a,a*> by FINSEQ_2:61 ; :: thesis: verum