det[A]=Apply[Times,Table[&lgr;[i],{i,3}]]
     0