let a be set ; :: thesis: (*--> a) . 3 = <*a,a,a*>
thus (*--> a) . 3 = 3 |-> a by PBOOLE:def 20
.= <*a,a,a*> by FINSEQ_2:76 ; :: thesis: verum