cp[A]=Det[A-&lgr;*IdentityMatrix[2]]
                2
6 - 5 &lgr; + &lgr;