cel(kc,p,a,b)=aRF(0,kc2,1)+13(b-pa)RJ(0,kc2,1,p),