CA::CA(A)
CA::CA(B)
$A->p=Kuk
$B->p=Juj