my_state=default0+spin0
This state tracks with a cavity and spin but without radiation. The eternal states are defined as follows:
TYPE(INTERNAL_STATE),PARAMETER::DEFAULT0=INTERNAL_STATE (0,f,f,f,f,f,f,f,f,f,f,f) TYPE(INTERNAL_STATE),PARAMETER::TOTALPATH0=INTERNAL_STATE (1,f,f,f,f,f,f,f,f,f,f,f) TYPE(INTERNAL_STATE),PARAMETER::TIME0=INTERNAL_STATE (0,t,f,f,f,f,f,f,f,f,f,f) TYPE(INTERNAL_STATE),PARAMETER::RADIATION0=INTERNAL_STATE (0,f,t,f,f,f,f,f,f,f,f,f) TYPE(INTERNAL_STATE),PARAMETER::NOCAVITY0=INTERNAL_STATE (0,f,f,t,f,f,f,f,f,f,f,f) TYPE(INTERNAL_STATE),PARAMETER::FRINGE0=INTERNAL_STATE (0,f,f,f,t,f,f,f,f,f,f,f) TYPE(INTERNAL_STATE),PARAMETER::STOCHASTIC0=INTERNAL_STATE(0,f,f,f,f,t,f,f,f,f,f,f) TYPE(INTERNAL_STATE),PARAMETER::ENVELOPE0=INTERNAL_STATE (0,f,f,f,f,f,t,f,f,f,f,f) TYPE(INTERNAL_STATE),PARAMETER::ONLY_4d0=INTERNAL_STATE (0,f,f,t,f,f,f,f,t,f,f,f) TYPE(INTERNAL_STATE),PARAMETER::DELTA0=INTERNAL_STATE (0,f,f,t,f,f,f,f,t,t,f,f) TYPE(INTERNAL_STATE),PARAMETER::SPIN0=INTERNAL_STATE (0,f,f,f,f,f,f,f,f,f,t,f) TYPE(INTERNAL_STATE),PARAMETER::MODULATION0=INTERNAL_STATE(0,f,f,f,f,f,f,f,f,f,f,t)