M(MA)=86.09
// MA bulk polymerization
// RAFT
[MA] = 11.04 mol/L
[AIBN]=0.01
f(AIBN)=0.64
// RAFT
[RSCS] = 2.5e-2

kiAIBN=2.89e15*exp(-130.222/RT)
kp=3.61e6* exp(-13.893/RT)
kt=1.59e10 * exp(-9.0/RT)

// special RAFT
// ktred = 0.15 * kt
ktred=2.39E+09 * exp(-9.0/RT)
kadd=9.36e+06
kfrac=7.84e+02
kadd_start=3.06e+08
kfrac_start=2.09e+01

temperature = 80.0 °C

// MA polymerization
AIBN --kiAIBN--> I + I
I + MA --kp--> P(n) 
P(n) + MA --kp--> P(n+1) 
P(n) + P(m) --kt--> D(n+m)

// RAFT
//pre Equilibrium
P(n) + RSCS --kadd_start--> RSCSP(n)
RSCSP(n) --kfrac_start --> PSCS(n) + R
R + MA --kp--> P(1)
PSCS(n) + R --kadd_start--> RSCSP(n)
RSCSP(n) --kfrac_start --> P(n) + RSCS

//main Equilibrium
P(n) + PSCS(m) --kadd--> PSCSP(n+m)
PSCSP(n) --kfrac--> P(n-m) + PSCS(m)

// cross termination
P(n) + RSCSP(m) --ktred--> RSCPSP(n+m)
P(n) + PSCSP(m) --ktred--> PSCPSP(n+m)