E   1 : ESRB = ALPH1 * ESURB + ALPH2 * TREND + CONST
E   1 : ESRB = ALPH3 * TREND + CONST
E   1 : ESRB = ALPH4 * ESRB[p-1] + CONST
D   2J: CESRB = ESRB
      :
D   3J: DISRB = ESRB - ESRB[p-1]
D   4J: DUSRB = ESURB - ESURB[p-1]
D   5J: DCSRB = ESRB - CESRB
      :
D   6J: DSRB0 = DISRB
E   7J: DISRB = ALPH5 * DSRB0[p-1] + ALPH6 * DUSRB + GAMMA * DCSRB[p-1]
D   8J: CDCRB = DISRB
D   9J: NEWES = CDCRB + ESRB[p-1]
