When the external field R=0 things become simple. The following quantities are needed: where if else.