cr= * cr *=R