<p dir="auto">I isolated the issue <a class="issue-link js-issue-link" data-error-text="Failed to load title" data-id="330446777" data-permission-text="Title is private" data-url="https://github.com/SciML/DifferentialEquations.jl/issues/303" data-hovercard-type="issue" data-hovercard-url="/SciML/DifferentialEquations.jl/issues/303/hovercard" href="https://github.com/SciML/DifferentialEquations.jl/issues/303">SciML/DifferentialEquations.jl#303</a> at least down to ForwardDiff on a large nonlinear function.</p>
<div class="highlight highlight-source-julia notranslate position-relative overflow-auto" dir="auto" data-snippet-clipboard-copy-content="P2D2c = function(dy,y,pars,t)
    Dbulk = pars[1]
    Dsn = pars[2]
    Dsp = pars[3]
    F = 96487.000000
    R = 8.314300
    Rpn = pars[4]
    Rpp = pars[5]
    Tr = 298.150000
    brugn = pars[6]
    brugp = pars[7]
    brugs = pars[8]
    c0 = pars[9]
    ctn = pars[10]
    ctp = pars[11]
    efn = pars[12]
    efp = pars[13]
    en = pars[14]
    ep = pars[15]
    es = pars[16]
    kn = pars[17]
    kp = pars[18]
    ln1 = pars[19]
    lp = pars[20]
    ls = pars[21]
    sigmn = pars[22]
    sigmp = pars[23]
    socn = pars[24]
    socp = pars[25]
    t1 = pars[26]


    current = -1.0
    capacity=17.5
    rate=-2.
    iapp=capacity*rate
    up=[0.,0.]
    Kr = pars[27]


    ap = 3/Rpp*(1-ep-efp)

    an = 3/Rpn*(1-en-efn)

    sigmap = sigmp*(1-ep-efp)

    sigman = sigmn*(1-en-efn)

    D2pos = ep^brugp*Dbulk

    D2sep = es^brugs*Dbulk

    D2neg = en^brugn*Dbulk

    dy[1] = 1/ep*(64.*D2pos/lp^2*(y[60]-2.*y[1]+y[2])+2.*ap*(1.-1.*t1)*kp*(y[1]*c0)^.5*(-1.*y[110]*ctp+ctp)^.5*(y[110]*ctp)^.5*sinh(.5*F/R/Tr*(y[86]-1.*y[65]-1.*ocp_cathode(y[110],up)))/c0)
    dy[2] = 1/ep*(64.*D2pos/lp^2*(y[1]-2.*y[2]+y[3])+2.*ap*(1.-1.*t1)*kp*(y[2]*c0)^.5*(-1.*y[111]*ctp+ctp)^.5*(y[111]*ctp)^.5*sinh(.5*F/R/Tr*(y[87]-1.*y[66]-1.*ocp_cathode(y[111],up)))/c0)
    dy[3] = 1/ep*(64.*D2pos/lp^2*(y[2]-2.*y[3]+y[4])+2.*ap*(1.-1.*t1)*kp*(y[3]*c0)^.5*(-1.*y[112]*ctp+ctp)^.5*(y[112]*ctp)^.5*sinh(.5*F/R/Tr*(y[88]-1.*y[67]-1.*ocp_cathode(y[112],up)))/c0)
    dy[4] = 1/ep*(64.*D2pos/lp^2*(y[3]-2.*y[4]+y[5])+2.*ap*(1.-1.*t1)*kp*(y[4]*c0)^.5*(-1.*y[113]*ctp+ctp)^.5*(y[113]*ctp)^.5*sinh(.5*F/R/Tr*(y[89]-1.*y[68]-1.*ocp_cathode(y[113],up)))/c0)
    dy[5] = 1/ep*(64.*D2pos/lp^2*(y[4]-2.*y[5]+y[6])+2.*ap*(1.-1.*t1)*kp*(y[5]*c0)^.5*(-1.*y[114]*ctp+ctp)^.5*(y[114]*ctp)^.5*sinh(.5*F/R/Tr*(y[90]-1.*y[69]-1.*ocp_cathode(y[114],up)))/c0)
    dy[6] = 1/ep*(64.*D2pos/lp^2*(y[5]-2.*y[6]+y[7])+2.*ap*(1.-1.*t1)*kp*(y[6]*c0)^.5*(-1.*y[115]*ctp+ctp)^.5*(y[115]*ctp)^.5*sinh(.5*F/R/Tr*(y[91]-1.*y[70]-1.*ocp_cathode(y[115],up)))/c0)
    dy[7] = 1/ep*(64.*D2pos/lp^2*(y[6]-2.*y[7]+y[61])+2.*ap*(1.-1.*t1)*kp*(y[7]*c0)^.5*(-1.*y[116]*ctp+ctp)^.5*(y[116]*ctp)^.5*sinh(.5*F/R/Tr*(y[92]-1.*y[71]-1.*ocp_cathode(y[116],up)))/c0)
    dy[8] = 16./es*D2sep/ls^2*(y[61]-2.*y[8]+y[9])
    dy[9] = 16./es*D2sep/ls^2*(y[8]-2.*y[9]+y[10])
    dy[10] = 16./es*D2sep/ls^2*(y[9]-2.*y[10]+y[62])
    dy[11] = 1/en*(64.*D2neg/ln1^2*(y[62]-2.*y[11]+y[12])+2.*an*(1.-1.*t1)*kn*(y[11]*c0)^.5*(-1.*y[124]*ctn+ctn)^.5*(y[124]*ctn)^.5*sinh(.5*F/R/Tr*(y[95]-1.*y[77]+.5e-1-2.325*exp(-100.*y[124]^1.15)+.1721*tanh(20.000000*y[124]-21.000000)+.25e-2*tanh(39.347962*y[124]-37.241379)+.34e-1*tanh(89.411765*y[124]-6.0294118)+.2e-2*tanh(7.0422535*y[124]-1.3661972)+.155e-1*tanh(77.519380*y[124]-8.1395349)))/c0)
    dy[12] = 1/en*(64.*D2neg/ln1^2*(y[11]-2.*y[12]+y[13])+2.*an*(1.-1.*t1)*kn*(y[12]*c0)^.5*(-1.*y[125]*ctn+ctn)^.5*(y[125]*ctn)^.5*sinh(.5*F/R/Tr*(y[96]-1.*y[78]+.5e-1-2.325*exp(-100.*y[125]^1.15)+.1721*tanh(20.000000*y[125]-21.000000)+.25e-2*tanh(39.347962*y[125]-37.241379)+.34e-1*tanh(89.411765*y[125]-6.0294118)+.2e-2*tanh(7.0422535*y[125]-1.3661972)+.155e-1*tanh(77.519380*y[125]-8.1395349)))/c0)
    dy[13] = 1/en*(64.*D2neg/ln1^2*(y[12]-2.*y[13]+y[14])+2.*an*(1.-1.*t1)*kn*(y[13]*c0)^.5*(-1.*y[126]*ctn+ctn)^.5*(y[126]*ctn)^.5*sinh(.5*F/R/Tr*(y[97]-1.*y[79]+.5e-1-2.325*exp(-100.*y[126]^1.15)+.1721*tanh(20.000000*y[126]-21.000000)+.25e-2*tanh(39.347962*y[126]-37.241379)+.34e-1*tanh(89.411765*y[126]-6.0294118)+.2e-2*tanh(7.0422535*y[126]-1.3661972)+.155e-1*tanh(77.519380*y[126]-8.1395349)))/c0)
    dy[14] = 1/en*(64.*D2neg/ln1^2*(y[13]-2.*y[14]+y[15])+2.*an*(1.-1.*t1)*kn*(y[14]*c0)^.5*(-1.*y[127]*ctn+ctn)^.5*(y[127]*ctn)^.5*sinh(.5*F/R/Tr*(y[98]-1.*y[80]+.5e-1-2.325*exp(-100.*y[127]^1.15)+.1721*tanh(20.000000*y[127]-21.000000)+.25e-2*tanh(39.347962*y[127]-37.241379)+.34e-1*tanh(89.411765*y[127]-6.0294118)+.2e-2*tanh(7.0422535*y[127]-1.3661972)+.155e-1*tanh(77.519380*y[127]-8.1395349)))/c0)
    dy[15] = 1/en*(64.*D2neg/ln1^2*(y[14]-2.*y[15]+y[16])+2.*an*(1.-1.*t1)*kn*(y[15]*c0)^.5*(-1.*y[128]*ctn+ctn)^.5*(y[128]*ctn)^.5*sinh(.5*F/R/Tr*(y[99]-1.*y[81]+.5e-1-2.325*exp(-100.*y[128]^1.15)+.1721*tanh(20.000000*y[128]-21.000000)+.25e-2*tanh(39.347962*y[128]-37.241379)+.34e-1*tanh(89.411765*y[128]-6.0294118)+.2e-2*tanh(7.0422535*y[128]-1.3661972)+.155e-1*tanh(77.519380*y[128]-8.1395349)))/c0)
    dy[16] = 1/en*(64.*D2neg/ln1^2*(y[15]-2.*y[16]+y[17])+2.*an*(1.-1.*t1)*kn*(y[16]*c0)^.5*(-1.*y[129]*ctn+ctn)^.5*(y[129]*ctn)^.5*sinh(.5*F/R/Tr*(y[100]-1.*y[82]+.5e-1-2.325*exp(-100.*y[129]^1.15)+.1721*tanh(20.000000*y[129]-21.000000)+.25e-2*tanh(39.347962*y[129]-37.241379)+.34e-1*tanh(89.411765*y[129]-6.0294118)+.2e-2*tanh(7.0422535*y[129]-1.3661972)+.155e-1*tanh(77.519380*y[129]-8.1395349)))/c0)
    dy[17] = 1/en*(64.*D2neg/ln1^2*(y[16]-2.*y[17]+y[63])+2.*an*(1.-1.*t1)*kn*(y[17]*c0)^.5*(-1.*y[130]*ctn+ctn)^.5*(y[130]*ctn)^.5*sinh(.5*F/R/Tr*(y[101]-1.*y[83]+.5e-1-2.325*exp(-100.*y[130]^1.15)+.1721*tanh(20.000000*y[130]-21.000000)+.25e-2*tanh(39.347962*y[130]-37.241379)+.34e-1*tanh(89.411765*y[130]-6.0294118)+.2e-2*tanh(7.0422535*y[130]-1.3661972)+.155e-1*tanh(77.519380*y[130]-8.1395349)))/c0)
    dy[18] = 16.*(Dsp*(y[25]-1.*y[103])+Dsp*(y[103]-2.*y[18]+y[25]))/Rpp^2
    dy[19] = 16.*(Dsp*(y[26]-1.*y[104])+Dsp*(y[104]-2.*y[19]+y[26]))/Rpp^2
    dy[20] = 16.*(Dsp*(y[27]-1.*y[105])+Dsp*(y[105]-2.*y[20]+y[27]))/Rpp^2
    dy[21] = 16.*(Dsp*(y[28]-1.*y[106])+Dsp*(y[106]-2.*y[21]+y[28]))/Rpp^2
    dy[22] = 16.*(Dsp*(y[29]-1.*y[107])+Dsp*(y[107]-2.*y[22]+y[29]))/Rpp^2
    dy[23] = 16.*(Dsp*(y[30]-1.*y[108])+Dsp*(y[108]-2.*y[23]+y[30]))/Rpp^2
    dy[24] = 16.*(Dsp*(y[31]-1.*y[109])+Dsp*(y[109]-2.*y[24]+y[31]))/Rpp^2
    dy[25] = 4.*(2.*Dsp*(y[32]-1.*y[18])+4.*Dsp*(y[18]-2.*y[25]+y[32]))/Rpp^2
    dy[26] = 4.*(2.*Dsp*(y[33]-1.*y[19])+4.*Dsp*(y[19]-2.*y[26]+y[33]))/Rpp^2
    dy[27] = 4.*(2.*Dsp*(y[34]-1.*y[20])+4.*Dsp*(y[20]-2.*y[27]+y[34]))/Rpp^2
    dy[28] = 4.*(2.*Dsp*(y[35]-1.*y[21])+4.*Dsp*(y[21]-2.*y[28]+y[35]))/Rpp^2
    dy[29] = 4.*(2.*Dsp*(y[36]-1.*y[22])+4.*Dsp*(y[22]-2.*y[29]+y[36]))/Rpp^2
    dy[30] = 4.*(2.*Dsp*(y[37]-1.*y[23])+4.*Dsp*(y[23]-2.*y[30]+y[37]))/Rpp^2
    dy[31] = 4.*(2.*Dsp*(y[38]-1.*y[24])+4.*Dsp*(y[24]-2.*y[31]+y[38]))/Rpp^2
    dy[32] = 1.777777778*(3.*Dsp*(y[110]-1.*y[25])+9.*Dsp*(y[25]-2.*y[32]+y[110]))/Rpp^2
    dy[33] = 1.777777778*(3.*Dsp*(y[111]-1.*y[26])+9.*Dsp*(y[26]-2.*y[33]+y[111]))/Rpp^2
    dy[34] = 1.777777778*(3.*Dsp*(y[112]-1.*y[27])+9.*Dsp*(y[27]-2.*y[34]+y[112]))/Rpp^2
    dy[35] = 1.777777778*(3.*Dsp*(y[113]-1.*y[28])+9.*Dsp*(y[28]-2.*y[35]+y[113]))/Rpp^2
    dy[36] = 1.777777778*(3.*Dsp*(y[114]-1.*y[29])+9.*Dsp*(y[29]-2.*y[36]+y[114]))/Rpp^2
    dy[37] = 1.777777778*(3.*Dsp*(y[115]-1.*y[30])+9.*Dsp*(y[30]-2.*y[37]+y[115]))/Rpp^2
    dy[38] = 1.777777778*(3.*Dsp*(y[116]-1.*y[31])+9.*Dsp*(y[31]-2.*y[38]+y[116]))/Rpp^2
    dy[39] = 16.*Dsn*(2.*y[46]-2.*y[39])/Rpn^2
    dy[40] = 16.*Dsn*(2.*y[47]-2.*y[40])/Rpn^2
    dy[41] = 16.*Dsn*(2.*y[48]-2.*y[41])/Rpn^2
    dy[42] = 16.*Dsn*(2.*y[49]-2.*y[42])/Rpn^2
    dy[43] = 16.*Dsn*(2.*y[50]-2.*y[43])/Rpn^2
    dy[44] = 16.*Dsn*(2.*y[51]-2.*y[44])/Rpn^2
    dy[45] = 16.*Dsn*(2.*y[52]-2.*y[45])/Rpn^2
    dy[46] = 4.*Dsn*(6.*y[53]+2.*y[39]-8.*y[46])/Rpn^2
    dy[47] = 4.*Dsn*(6.*y[54]+2.*y[40]-8.*y[47])/Rpn^2
    dy[48] = 4.*Dsn*(6.*y[55]+2.*y[41]-8.*y[48])/Rpn^2
    dy[49] = 4.*Dsn*(6.*y[56]+2.*y[42]-8.*y[49])/Rpn^2
    dy[50] = 4.*Dsn*(6.*y[57]+2.*y[43]-8.*y[50])/Rpn^2
    dy[51] = 4.*Dsn*(6.*y[58]+2.*y[44]-8.*y[51])/Rpn^2
    dy[52] = 4.*Dsn*(6.*y[59]+2.*y[45]-8.*y[52])/Rpn^2
    dy[53] = 1.777777778*Dsn*(12.*y[124]+6.*y[46]-18.*y[53])/Rpn^2
    dy[54] = 1.777777778*Dsn*(12.*y[125]+6.*y[47]-18.*y[54])/Rpn^2
    dy[55] = 1.777777778*Dsn*(12.*y[126]+6.*y[48]-18.*y[55])/Rpn^2
    dy[56] = 1.777777778*Dsn*(12.*y[127]+6.*y[49]-18.*y[56])/Rpn^2
    dy[57] = 1.777777778*Dsn*(12.*y[128]+6.*y[50]-18.*y[57])/Rpn^2
    dy[58] = 1.777777778*Dsn*(12.*y[129]+6.*y[51]-18.*y[58])/Rpn^2
    dy[59] = 1.777777778*Dsn*(12.*y[130]+6.*y[52]-18.*y[59])/Rpn^2
    dy[60] = 4.*D2pos*(-1.*y[2]-3.*y[60]+4.*y[1])/lp
    dy[61] = 4.*D2pos*(y[6]+3.*y[61]-4.*y[7])/lp-2.*D2sep*(-1.*y[9]-3.*y[61]+4.*y[8])/ls
    dy[62] = 2.*D2sep*(y[9]+3.*y[62]-4.*y[10])/ls-4.*D2neg*(-1.*y[12]-3.*y[62]+4.*y[11])/ln1
    dy[63] = 4.*D2neg*(y[16]+3.*y[63]-4.*y[17])/ln1
    dy[64] = 4.*(-1.*y[66]-3.*y[64]+4.*y[65])/lp
    dy[65] = -4.*sigmap/lp*(y[87]-1.*y[85])-4.*ep^brugp*(.41253e-1+.5007e-3*y[1]-.47212e-6*y[1]^2+.15904e-9*y[1]^3-.16018e-13*y[1]^4)/lp*(y[66]-1.*y[64])+8.*ep^brugp*(.41253e-1+.5007e-3*y[1]-.47212e-6*y[1]^2+.15904e-9*y[1]^3-.16018e-13*y[1]^4)*R*Tr/F*(1.-1.*t1)/lp*(y[2]-1.*y[60])/y[1]-iapp
    dy[66] = -4.*sigmap/lp*(y[88]-1.*y[86])-4.*ep^brugp*(.41253e-1+.5007e-3*y[2]-.47212e-6*y[2]^2+.15904e-9*y[2]^3-.16018e-13*y[2]^4)/lp*(y[67]-1.*y[65])+8.*ep^brugp*(.41253e-1+.5007e-3*y[2]-.47212e-6*y[2]^2+.15904e-9*y[2]^3-.16018e-13*y[2]^4)*R*Tr/F*(1.-1.*t1)/lp*(y[3]-1.*y[1])/y[2]-iapp
    dy[67] = -4.*sigmap/lp*(y[89]-1.*y[87])-4.*ep^brugp*(.41253e-1+.5007e-3*y[3]-.47212e-6*y[3]^2+.15904e-9*y[3]^3-.16018e-13*y[3]^4)/lp*(y[68]-1.*y[66])+8.*ep^brugp*(.41253e-1+.5007e-3*y[3]-.47212e-6*y[3]^2+.15904e-9*y[3]^3-.16018e-13*y[3]^4)*R*Tr/F*(1.-1.*t1)/lp*(y[4]-1.*y[2])/y[3]-iapp
    dy[68] = -4.*sigmap/lp*(y[90]-1.*y[88])-4.*ep^brugp*(.41253e-1+.5007e-3*y[4]-.47212e-6*y[4]^2+.15904e-9*y[4]^3-.16018e-13*y[4]^4)/lp*(y[69]-1.*y[67])+8.*ep^brugp*(.41253e-1+.5007e-3*y[4]-.47212e-6*y[4]^2+.15904e-9*y[4]^3-.16018e-13*y[4]^4)*R*Tr/F*(1.-1.*t1)/lp*(y[5]-1.*y[3])/y[4]-iapp
    dy[69] = -4.*sigmap/lp*(y[91]-1.*y[89])-4.*ep^brugp*(.41253e-1+.5007e-3*y[5]-.47212e-6*y[5]^2+.15904e-9*y[5]^3-.16018e-13*y[5]^4)/lp*(y[70]-1.*y[68])+8.*ep^brugp*(.41253e-1+.5007e-3*y[5]-.47212e-6*y[5]^2+.15904e-9*y[5]^3-.16018e-13*y[5]^4)*R*Tr/F*(1.-1.*t1)/lp*(y[6]-1.*y[4])/y[5]-iapp
    dy[70] = -4.*sigmap/lp*(y[92]-1.*y[90])-4.*ep^brugp*(.41253e-1+.5007e-3*y[6]-.47212e-6*y[6]^2+.15904e-9*y[6]^3-.16018e-13*y[6]^4)/lp*(y[71]-1.*y[69])+8.*ep^brugp*(.41253e-1+.5007e-3*y[6]-.47212e-6*y[6]^2+.15904e-9*y[6]^3-.16018e-13*y[6]^4)*R*Tr/F*(1.-1.*t1)/lp*(y[7]-1.*y[5])/y[6]-iapp
    dy[71] = -4.*sigmap/lp*(y[93]-1.*y[91])-4.*ep^brugp*(.41253e-1+.5007e-3*y[7]-.47212e-6*y[7]^2+.15904e-9*y[7]^3-.16018e-13*y[7]^4)/lp*(y[72]-1.*y[70])+8.*ep^brugp*(.41253e-1+.5007e-3*y[7]-.47212e-6*y[7]^2+.15904e-9*y[7]^3-.16018e-13*y[7]^4)*R*Tr/F*(1.-1.*t1)/lp*(y[61]-1.*y[6])/y[7]-iapp
    dy[72] = 4.*ep^brugp*(.41253e-1+.5007e-3*y[61]-.47212e-6*y[61]^2+.15904e-9*y[61]^3-.16018e-13*y[61]^4)*(y[70]+3.*y[72]-4.*y[71])/lp-2.*es^brugs*(.41253e-1+.5007e-3*y[61]-.47212e-6*y[61]^2+.15904e-9*y[61]^3-.16018e-13*y[61]^4)*(-1.*y[74]-3.*y[72]+4.*y[73])/ls
    dy[73] = -2.*es^brugs*(.41253e-1+.5007e-3*y[8]-.47212e-6*y[8]^2+.15904e-9*y[8]^3-.16018e-13*y[8]^4)/ls*(y[74]-1.*y[72])+4.*es^brugs*(.41253e-1+.5007e-3*y[8]-.47212e-6*y[8]^2+.15904e-9*y[8]^3-.16018e-13*y[8]^4)*R*Tr/F*(1.-1.*t1)/ls*(y[9]-1.*y[61])/y[8]-iapp
    dy[74] = -2.*es^brugs*(.41253e-1+.5007e-3*y[9]-.47212e-6*y[9]^2+.15904e-9*y[9]^3-.16018e-13*y[9]^4)/ls*(y[75]-1.*y[73])+4.*es^brugs*(.41253e-1+.5007e-3*y[9]-.47212e-6*y[9]^2+.15904e-9*y[9]^3-.16018e-13*y[9]^4)*R*Tr/F*(1.-1.*t1)/ls*(y[10]-1.*y[8])/y[9]-iapp
    dy[75] = -2.*es^brugs*(.41253e-1+.5007e-3*y[10]-.47212e-6*y[10]^2+.15904e-9*y[10]^3-.16018e-13*y[10]^4)/ls*(y[76]-1.*y[74])+4.*es^brugs*(.41253e-1+.5007e-3*y[10]-.47212e-6*y[10]^2+.15904e-9*y[10]^3-.16018e-13*y[10]^4)*R*Tr/F*(1.-1.*t1)/ls*(y[62]-1.*y[9])/y[10]-iapp
    dy[76] = 2.*es^brugs*(.41253e-1+.5007e-3*y[62]-.47212e-6*y[62]^2+.15904e-9*y[62]^3-.16018e-13*y[62]^4)*(y[74]+3.*y[76]-4.*y[75])/ls-4.*en^brugn*(.41253e-1+.5007e-3*y[62]-.47212e-6*y[62]^2+.15904e-9*y[62]^3-.16018e-13*y[62]^4)*(-1.*y[78]-3.*y[76]+4.*y[77])/ln1
    dy[77] = -4.*sigman/ln1*(y[96]-1.*y[94])-4.*en^brugn*(.41253e-1+.5007e-3*y[11]-.47212e-6*y[11]^2+.15904e-9*y[11]^3-.16018e-13*y[11]^4)/ln1*(y[78]-1.*y[76])+8.*en^brugn*(.41253e-1+.5007e-3*y[11]-.47212e-6*y[11]^2+.15904e-9*y[11]^3-.16018e-13*y[11]^4)*R*Tr/F*(1.-1.*t1)/ln1*(y[12]-1.*y[62])/y[11]-iapp
    dy[78] = -4.*sigman/ln1*(y[97]-1.*y[95])-4.*en^brugn*(.41253e-1+.5007e-3*y[12]-.47212e-6*y[12]^2+.15904e-9*y[12]^3-.16018e-13*y[12]^4)/ln1*(y[79]-1.*y[77])+8.*en^brugn*(.41253e-1+.5007e-3*y[12]-.47212e-6*y[12]^2+.15904e-9*y[12]^3-.16018e-13*y[12]^4)*R*Tr/F*(1.-1.*t1)/ln1*(y[13]-1.*y[11])/y[12]-iapp
    dy[79] = -4.*sigman/ln1*(y[98]-1.*y[96])-4.*en^brugn*(.41253e-1+.5007e-3*y[13]-.47212e-6*y[13]^2+.15904e-9*y[13]^3-.16018e-13*y[13]^4)/ln1*(y[80]-1.*y[78])+8.*en^brugn*(.41253e-1+.5007e-3*y[13]-.47212e-6*y[13]^2+.15904e-9*y[13]^3-.16018e-13*y[13]^4)*R*Tr/F*(1.-1.*t1)/ln1*(y[14]-1.*y[12])/y[13]-iapp
    dy[80] = -4.*sigman/ln1*(y[99]-1.*y[97])-4.*en^brugn*(.41253e-1+.5007e-3*y[14]-.47212e-6*y[14]^2+.15904e-9*y[14]^3-.16018e-13*y[14]^4)/ln1*(y[81]-1.*y[79])+8.*en^brugn*(.41253e-1+.5007e-3*y[14]-.47212e-6*y[14]^2+.15904e-9*y[14]^3-.16018e-13*y[14]^4)*R*Tr/F*(1.-1.*t1)/ln1*(y[15]-1.*y[13])/y[14]-iapp
    dy[81] = -4.*sigman/ln1*(y[100]-1.*y[98])-4.*en^brugn*(.41253e-1+.5007e-3*y[15]-.47212e-6*y[15]^2+.15904e-9*y[15]^3-.16018e-13*y[15]^4)/ln1*(y[82]-1.*y[80])+8.*en^brugn*(.41253e-1+.5007e-3*y[15]-.47212e-6*y[15]^2+.15904e-9*y[15]^3-.16018e-13*y[15]^4)*R*Tr/F*(1.-1.*t1)/ln1*(y[16]-1.*y[14])/y[15]-iapp
    dy[82] = -4.*sigman/ln1*(y[101]-1.*y[99])-4.*en^brugn*(.41253e-1+.5007e-3*y[16]-.47212e-6*y[16]^2+.15904e-9*y[16]^3-.16018e-13*y[16]^4)/ln1*(y[83]-1.*y[81])+8.*en^brugn*(.41253e-1+.5007e-3*y[16]-.47212e-6*y[16]^2+.15904e-9*y[16]^3-.16018e-13*y[16]^4)*R*Tr/F*(1.-1.*t1)/ln1*(y[17]-1.*y[15])/y[16]-iapp
    dy[83] = -4.*sigman/ln1*(y[102]-1.*y[100])-4.*en^brugn*(.41253e-1+.5007e-3*y[17]-.47212e-6*y[17]^2+.15904e-9*y[17]^3-.16018e-13*y[17]^4)/ln1*(y[84]-1.*y[82])+8.*en^brugn*(.41253e-1+.5007e-3*y[17]-.47212e-6*y[17]^2+.15904e-9*y[17]^3-.16018e-13*y[17]^4)*R*Tr/F*(1.-1.*t1)/ln1*(y[63]-1.*y[16])/y[17]-iapp
    dy[84] = y[84]
    dy[85] = 4.*(-1.*y[87]-3.*y[85]+4.*y[86])/lp+1.*iapp/sigmap
    dy[86] = 64.*sigmap/lp^2*(y[85]-2.*y[86]+y[87])-2.*ap*F*kp*(y[1]*c0)^.5*(-1.*y[110]*ctp+ctp)^.5*(y[110]*ctp)^.5*sinh(.5*F/R/Tr*(y[86]-1.*y[65]-1.*ocp_cathode(y[110],up)))
    dy[87] = 64.*sigmap/lp^2*(y[86]-2.*y[87]+y[88])-2.*ap*F*kp*(y[2]*c0)^.5*(-1.*y[111]*ctp+ctp)^.5*(y[111]*ctp)^.5*sinh(.5*F/R/Tr*(y[87]-1.*y[66]-1.*ocp_cathode(y[111],up)))
    dy[88] = 64.*sigmap/lp^2*(y[87]-2.*y[88]+y[89])-2.*ap*F*kp*(y[3]*c0)^.5*(-1.*y[112]*ctp+ctp)^.5*(y[112]*ctp)^.5*sinh(.5*F/R/Tr*(y[88]-1.*y[67]-1.*ocp_cathode(y[112],up)))
    dy[89] = 64.*sigmap/lp^2*(y[88]-2.*y[89]+y[90])-2.*ap*F*kp*(y[4]*c0)^.5*(-1.*y[113]*ctp+ctp)^.5*(y[113]*ctp)^.5*sinh(.5*F/R/Tr*(y[89]-1.*y[68]-1.*ocp_cathode(y[113],up)))
    dy[90] = 64.*sigmap/lp^2*(y[89]-2.*y[90]+y[91])-2.*ap*F*kp*(y[5]*c0)^.5*(-1.*y[114]*ctp+ctp)^.5*(y[114]*ctp)^.5*sinh(.5*F/R/Tr*(y[90]-1.*y[69]-1.*ocp_cathode(y[114],up)))
    dy[91] = 64.*sigmap/lp^2*(y[90]-2.*y[91]+y[92])-2.*ap*F*kp*(y[6]*c0)^.5*(-1.*y[115]*ctp+ctp)^.5*(y[115]*ctp)^.5*sinh(.5*F/R/Tr*(y[91]-1.*y[70]-1.*ocp_cathode(y[115],up)))
    dy[92] = 64.*sigmap/lp^2*(y[91]-2.*y[92]+y[93])-2.*ap*F*kp*(y[7]*c0)^.5*(-1.*y[116]*ctp+ctp)^.5*(y[116]*ctp)^.5*sinh(.5*F/R/Tr*(y[92]-1.*y[71]-1.*ocp_cathode(y[116],up)))
    dy[93] = 4.*(y[91]+3.*y[93]-4.*y[92])/lp
    dy[94] = 4.*(-1.*y[96]-3.*y[94]+4.*y[95])/ln1
    dy[95] = 64.*sigman/ln1^2*(y[94]-2.*y[95]+y[96])-2.*an*F*kn*(y[11]*c0)^.5*(-1.*y[124]*ctn+ctn)^.5*(y[124]*ctn)^.5*sinh(.5*F/R/Tr*(y[95]-1.*y[77]+.5e-1-2.325*exp(-100.*y[124]^1.15)+.1721*tanh(20.000000*y[124]-21.000000)+.25e-2*tanh(39.347962*y[124]-37.241379)+.34e-1*tanh(89.411765*y[124]-6.0294118)+.2e-2*tanh(7.0422535*y[124]-1.3661972)+.155e-1*tanh(77.519380*y[124]-8.1395349)))
    dy[96] = 64.*sigman/ln1^2*(y[95]-2.*y[96]+y[97])-2.*an*F*kn*(y[12]*c0)^.5*(-1.*y[125]*ctn+ctn)^.5*(y[125]*ctn)^.5*sinh(.5*F/R/Tr*(y[96]-1.*y[78]+.5e-1-2.325*exp(-100.*y[125]^1.15)+.1721*tanh(20.000000*y[125]-21.000000)+.25e-2*tanh(39.347962*y[125]-37.241379)+.34e-1*tanh(89.411765*y[125]-6.0294118)+.2e-2*tanh(7.0422535*y[125]-1.3661972)+.155e-1*tanh(77.519380*y[125]-8.1395349)))
    dy[97] = 64.*sigman/ln1^2*(y[96]-2.*y[97]+y[98])-2.*an*F*kn*(y[13]*c0)^.5*(-1.*y[126]*ctn+ctn)^.5*(y[126]*ctn)^.5*sinh(.5*F/R/Tr*(y[97]-1.*y[79]+.5e-1-2.325*exp(-100.*y[126]^1.15)+.1721*tanh(20.000000*y[126]-21.000000)+.25e-2*tanh(39.347962*y[126]-37.241379)+.34e-1*tanh(89.411765*y[126]-6.0294118)+.2e-2*tanh(7.0422535*y[126]-1.3661972)+.155e-1*tanh(77.519380*y[126]-8.1395349)))
    dy[98] = 64.*sigman/ln1^2*(y[97]-2.*y[98]+y[99])-2.*an*F*kn*(y[14]*c0)^.5*(-1.*y[127]*ctn+ctn)^.5*(y[127]*ctn)^.5*sinh(.5*F/R/Tr*(y[98]-1.*y[80]+.5e-1-2.325*exp(-100.*y[127]^1.15)+.1721*tanh(20.000000*y[127]-21.000000)+.25e-2*tanh(39.347962*y[127]-37.241379)+.34e-1*tanh(89.411765*y[127]-6.0294118)+.2e-2*tanh(7.0422535*y[127]-1.3661972)+.155e-1*tanh(77.519380*y[127]-8.1395349)))
    dy[99] = 64.*sigman/ln1^2*(y[98]-2.*y[99]+y[100])-2.*an*F*kn*(y[15]*c0)^.5*(-1.*y[128]*ctn+ctn)^.5*(y[128]*ctn)^.5*sinh(.5*F/R/Tr*(y[99]-1.*y[81]+.5e-1-2.325*exp(-100.*y[128]^1.15)+.1721*tanh(20.000000*y[128]-21.000000)+.25e-2*tanh(39.347962*y[128]-37.241379)+.34e-1*tanh(89.411765*y[128]-6.0294118)+.2e-2*tanh(7.0422535*y[128]-1.3661972)+.155e-1*tanh(77.519380*y[128]-8.1395349)))
    dy[100] = 64.*sigman/ln1^2*(y[99]-2.*y[100]+y[101])-2.*an*F*kn*(y[16]*c0)^.5*(-1.*y[129]*ctn+ctn)^.5*(y[129]*ctn)^.5*sinh(.5*F/R/Tr*(y[100]-1.*y[82]+.5e-1-2.325*exp(-100.*y[129]^1.15)+.1721*tanh(20.000000*y[129]-21.000000)+.25e-2*tanh(39.347962*y[129]-37.241379)+.34e-1*tanh(89.411765*y[129]-6.0294118)+.2e-2*tanh(7.0422535*y[129]-1.3661972)+.155e-1*tanh(77.519380*y[129]-8.1395349)))
    dy[101] = 64.*sigman/ln1^2*(y[100]-2.*y[101]+y[102])-2.*an*F*kn*(y[17]*c0)^.5*(-1.*y[130]*ctn+ctn)^.5*(y[130]*ctn)^.5*sinh(.5*F/R/Tr*(y[101]-1.*y[83]+.5e-1-2.325*exp(-100.*y[130]^1.15)+.1721*tanh(20.000000*y[130]-21.000000)+.25e-2*tanh(39.347962*y[130]-37.241379)+.34e-1*tanh(89.411765*y[130]-6.0294118)+.2e-2*tanh(7.0422535*y[130]-1.3661972)+.155e-1*tanh(77.519380*y[130]-8.1395349)))
    dy[102] = 4.*(y[100]+3.*y[102]-4.*y[101])/ln1+1.*iapp/sigman
    dy[103] = -2.*(-1.*y[25]-3.*y[103]+4.*y[18])/Rpp
    dy[104] = -2.*(-1.*y[26]-3.*y[104]+4.*y[19])/Rpp
    dy[105] = -2.*(-1.*y[27]-3.*y[105]+4.*y[20])/Rpp
    dy[106] = -2.*(-1.*y[28]-3.*y[106]+4.*y[21])/Rpp
    dy[107] = -2.*(-1.*y[29]-3.*y[107]+4.*y[22])/Rpp
    dy[108] = -2.*(-1.*y[30]-3.*y[108]+4.*y[23])/Rpp
    dy[109] = -2.*(-1.*y[31]-3.*y[109]+4.*y[24])/Rpp
    dy[110] = 2.*Dsp*(y[25]+3.*y[110]-4.*y[32])/Rpp+2.*kp*(y[1]*c0)^.5*(-1.*y[110]*ctp+ctp)^.5*(y[110]*ctp)^.5*sinh(.5*F/R/Tr*(y[86]-1.*y[65]-1.*ocp_cathode(y[110],up)))/ctp
    dy[111] = 2.*Dsp*(y[26]+3.*y[111]-4.*y[33])/Rpp+2.*kp*(y[2]*c0)^.5*(-1.*y[111]*ctp+ctp)^.5*(y[111]*ctp)^.5*sinh(.5*F/R/Tr*(y[87]-1.*y[66]-1.*ocp_cathode(y[111],up)))/ctp
    dy[112] = 2.*Dsp*(y[27]+3.*y[112]-4.*y[34])/Rpp+2.*kp*(y[3]*c0)^.5*(-1.*y[112]*ctp+ctp)^.5*(y[112]*ctp)^.5*sinh(.5*F/R/Tr*(y[88]-1.*y[67]-1.*ocp_cathode(y[112],up)))/ctp
    dy[113] = 2.*Dsp*(y[28]+3.*y[113]-4.*y[35])/Rpp+2.*kp*(y[4]*c0)^.5*(-1.*y[113]*ctp+ctp)^.5*(y[113]*ctp)^.5*sinh(.5*F/R/Tr*(y[89]-1.*y[68]-1.*ocp_cathode(y[113],up)))/ctp
    dy[114] = 2.*Dsp*(y[29]+3.*y[114]-4.*y[36])/Rpp+2.*kp*(y[5]*c0)^.5*(-1.*y[114]*ctp+ctp)^.5*(y[114]*ctp)^.5*sinh(.5*F/R/Tr*(y[90]-1.*y[69]-1.*ocp_cathode(y[114],up)))/ctp
    dy[115] = 2.*Dsp*(y[30]+3.*y[115]-4.*y[37])/Rpp+2.*kp*(y[6]*c0)^.5*(-1.*y[115]*ctp+ctp)^.5*(y[115]*ctp)^.5*sinh(.5*F/R/Tr*(y[91]-1.*y[70]-1.*ocp_cathode(y[115],up)))/ctp
    dy[116] = 2.*Dsp*(y[31]+3.*y[116]-4.*y[38])/Rpp+2.*kp*(y[7]*c0)^.5*(-1.*y[116]*ctp+ctp)^.5*(y[116]*ctp)^.5*sinh(.5*F/R/Tr*(y[92]-1.*y[71]-1.*ocp_cathode(y[116],up)))/ctp
    dy[117] = -2.*(-1.*y[46]-3.*y[117]+4.*y[39])/Rpn
    dy[118] = -2.*(-1.*y[47]-3.*y[118]+4.*y[40])/Rpn
    dy[119] = -2.*(-1.*y[48]-3.*y[119]+4.*y[41])/Rpn
    dy[120] = -2.*(-1.*y[49]-3.*y[120]+4.*y[42])/Rpn
    dy[121] = -2.*(-1.*y[50]-3.*y[121]+4.*y[43])/Rpn
    dy[122] = -2.*(-1.*y[51]-3.*y[122]+4.*y[44])/Rpn
    dy[123] = -2.*(-1.*y[52]-3.*y[123]+4.*y[45])/Rpn
    dy[124] = 2.*Dsn*(y[46]+3.*y[124]-4.*y[53])/Rpn+2.*kn*(y[11]*c0)^.5*(-1.*y[124]*ctn+ctn)^.5*(y[124]*ctn)^.5*sinh(.5*F/R/Tr*(y[95]-1.*y[77]+.5e-1-2.325*exp(-100.*y[124]^1.15)+.1721*tanh(20.000000*y[124]-21.000000)+.25e-2*tanh(39.347962*y[124]-37.241379)+.34e-1*tanh(89.411765*y[124]-6.0294118)+.2e-2*tanh(7.0422535*y[124]-1.3661972)+.155e-1*tanh(77.519380*y[124]-8.1395349)))/ctn
    dy[125] = 2.*Dsn*(y[47]+3.*y[125]-4.*y[54])/Rpn+2.*kn*(y[12]*c0)^.5*(-1.*y[125]*ctn+ctn)^.5*(y[125]*ctn)^.5*sinh(.5*F/R/Tr*(y[96]-1.*y[78]+.5e-1-2.325*exp(-100.*y[125]^1.15)+.1721*tanh(20.000000*y[125]-21.000000)+.25e-2*tanh(39.347962*y[125]-37.241379)+.34e-1*tanh(89.411765*y[125]-6.0294118)+.2e-2*tanh(7.0422535*y[125]-1.3661972)+.155e-1*tanh(77.519380*y[125]-8.1395349)))/ctn
    dy[126] = 2.*Dsn*(y[48]+3.*y[126]-4.*y[55])/Rpn+2.*kn*(y[13]*c0)^.5*(-1.*y[126]*ctn+ctn)^.5*(y[126]*ctn)^.5*sinh(.5*F/R/Tr*(y[97]-1.*y[79]+.5e-1-2.325*exp(-100.*y[126]^1.15)+.1721*tanh(20.000000*y[126]-21.000000)+.25e-2*tanh(39.347962*y[126]-37.241379)+.34e-1*tanh(89.411765*y[126]-6.0294118)+.2e-2*tanh(7.0422535*y[126]-1.3661972)+.155e-1*tanh(77.519380*y[126]-8.1395349)))/ctn
    dy[127] = 2.*Dsn*(y[49]+3.*y[127]-4.*y[56])/Rpn+2.*kn*(y[14]*c0)^.5*(-1.*y[127]*ctn+ctn)^.5*(y[127]*ctn)^.5*sinh(.5*F/R/Tr*(y[98]-1.*y[80]+.5e-1-2.325*exp(-100.*y[127]^1.15)+.1721*tanh(20.000000*y[127]-21.000000)+.25e-2*tanh(39.347962*y[127]-37.241379)+.34e-1*tanh(89.411765*y[127]-6.0294118)+.2e-2*tanh(7.0422535*y[127]-1.3661972)+.155e-1*tanh(77.519380*y[127]-8.1395349)))/ctn
    dy[128] = 2.*Dsn*(y[50]+3.*y[128]-4.*y[57])/Rpn+2.*kn*(y[15]*c0)^.5*(-1.*y[128]*ctn+ctn)^.5*(y[128]*ctn)^.5*sinh(.5*F/R/Tr*(y[99]-1.*y[81]+.5e-1-2.325*exp(-100.*y[128]^1.15)+.1721*tanh(20.000000*y[128]-21.000000)+.25e-2*tanh(39.347962*y[128]-37.241379)+.34e-1*tanh(89.411765*y[128]-6.0294118)+.2e-2*tanh(7.0422535*y[128]-1.3661972)+.155e-1*tanh(77.519380*y[128]-8.1395349)))/ctn
    dy[129] = 2.*Dsn*(y[51]+3.*y[129]-4.*y[58])/Rpn+2.*kn*(y[16]*c0)^.5*(-1.*y[129]*ctn+ctn)^.5*(y[129]*ctn)^.5*sinh(.5*F/R/Tr*(y[100]-1.*y[82]+.5e-1-2.325*exp(-100.*y[129]^1.15)+.1721*tanh(20.000000*y[129]-21.000000)+.25e-2*tanh(39.347962*y[129]-37.241379)+.34e-1*tanh(89.411765*y[129]-6.0294118)+.2e-2*tanh(7.0422535*y[129]-1.3661972)+.155e-1*tanh(77.519380*y[129]-8.1395349)))/ctn
    dy[130] = 2.*Dsn*(y[52]+3.*y[130]-4.*y[59])/Rpn+2.*kn*(y[17]*c0)^.5*(-1.*y[130]*ctn+ctn)^.5*(y[130]*ctn)^.5*sinh(.5*F/R/Tr*(y[101]-1.*y[83]+.5e-1-2.325*exp(-100.*y[130]^1.15)+.1721*tanh(20.000000*y[130]-21.000000)+.25e-2*tanh(39.347962*y[130]-37.241379)+.34e-1*tanh(89.411765*y[130]-6.0294118)+.2e-2*tanh(7.0422535*y[130]-1.3661972)+.155e-1*tanh(77.519380*y[130]-8.1395349)))/ctn
    dy[131] = y[131]-y[85]+y[102]+ (current*Kr)

end
function ocp_cathode(theta_p,up)
    Up = (-5.057-13.6*theta_p^2+121.6*theta_p^4-185.1*theta_p^6-45.43*theta_p^8+127.7*theta_p^10)/(-1-5.04*theta_p^2+32.3*theta_p^4-40.95*theta_p^6-25.94*theta_p^8+40.63*theta_p^10)

end
yyy = function(pars::Array{Float64})
    socn=pars[24]
    socp=pars[25]
    y0 = [1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,(-0.5057e1 - 0.136e2 * socp ^ 2 + 0.1216e3 * socp ^ 4 - 0.1851e3 * socp ^ 6 - 0.4543e2 * socp ^ 8 + 0.1277e3 * socp ^ 10) / (-0.1e1 - 0.504e1 * socp ^ 2 + 0.323e2 * socp ^ 4 - 0.4095e2 * socp ^ 6 - 0.2594e2 * socp ^ 8 + 0.4063e2 * socp ^ 10),(-0.5057e1 - 0.136e2 * socp ^ 2 + 0.1216e3 * socp ^ 4 - 0.1851e3 * socp ^ 6 - 0.4543e2 * socp ^ 8 + 0.1277e3 * socp ^ 10) / (-0.1e1 - 0.504e1 * socp ^ 2 + 0.323e2 * socp ^ 4 - 0.4095e2 * socp ^ 6 - 0.2594e2 * socp ^ 8 + 0.4063e2 * socp ^ 10),(-0.5057e1 - 0.136e2 * socp ^ 2 + 0.1216e3 * socp ^ 4 - 0.1851e3 * socp ^ 6 - 0.4543e2 * socp ^ 8 + 0.1277e3 * socp ^ 10) / (-0.1e1 - 0.504e1 * socp ^ 2 + 0.323e2 * socp ^ 4 - 0.4095e2 * socp ^ 6 - 0.2594e2 * socp ^ 8 + 0.4063e2 * socp ^ 10),(-0.5057e1 - 0.136e2 * socp ^ 2 + 0.1216e3 * socp ^ 4 - 0.1851e3 * socp ^ 6 - 0.4543e2 * socp ^ 8 + 0.1277e3 * socp ^ 10) / (-0.1e1 - 0.504e1 * socp ^ 2 + 0.323e2 * socp ^ 4 - 0.4095e2 * socp ^ 6 - 0.2594e2 * socp ^ 8 + 0.4063e2 * socp ^ 10),(-0.5057e1 - 0.136e2 * socp ^ 2 + 0.1216e3 * socp ^ 4 - 0.1851e3 * socp ^ 6 - 0.4543e2 * socp ^ 8 + 0.1277e3 * socp ^ 10) / (-0.1e1 - 0.504e1 * socp ^ 2 + 0.323e2 * socp ^ 4 - 0.4095e2 * socp ^ 6 - 0.2594e2 * socp ^ 8 + 0.4063e2 * socp ^ 10),(-0.5057e1 - 0.136e2 * socp ^ 2 + 0.1216e3 * socp ^ 4 - 0.1851e3 * socp ^ 6 - 0.4543e2 * socp ^ 8 + 0.1277e3 * socp ^ 10) / (-0.1e1 - 0.504e1 * socp ^ 2 + 0.323e2 * socp ^ 4 - 0.4095e2 * socp ^ 6 - 0.2594e2 * socp ^ 8 + 0.4063e2 * socp ^ 10),(-0.5057e1 - 0.136e2 * socp ^ 2 + 0.1216e3 * socp ^ 4 - 0.1851e3 * socp ^ 6 - 0.4543e2 * socp ^ 8 + 0.1277e3 * socp ^ 10) / (-0.1e1 - 0.504e1 * socp ^ 2 + 0.323e2 * socp ^ 4 - 0.4095e2 * socp ^ 6 - 0.2594e2 * socp ^ 8 + 0.4063e2 * socp ^ 10),(-0.5057e1 - 0.136e2 * socp ^ 2 + 0.1216e3 * socp ^ 4 - 0.1851e3 * socp ^ 6 - 0.4543e2 * socp ^ 8 + 0.1277e3 * socp ^ 10) / (-0.1e1 - 0.504e1 * socp ^ 2 + 0.323e2 * socp ^ 4 - 0.4095e2 * socp ^ 6 - 0.2594e2 * socp ^ 8 + 0.4063e2 * socp ^ 10),(-0.5057e1 - 0.136e2 * socp ^ 2 + 0.1216e3 * socp ^ 4 - 0.1851e3 * socp ^ 6 - 0.4543e2 * socp ^ 8 + 0.1277e3 * socp ^ 10) / (-0.1e1 - 0.504e1 * socp ^ 2 + 0.323e2 * socp ^ 4 - 0.4095e2 * socp ^ 6 - 0.2594e2 * socp ^ 8 + 0.4063e2 * socp ^ 10),-0.5e-1 + 0.2325e1 * exp(-0.100e3 * socn ^ 0.115e1) - 0.1721e0 * tanh(0.20000000e2 * socn - 0.21000000e2) - 0.25e-2 * tanh(0.39347962e2 * socn - 0.37241379e2) - 0.34e-1 * tanh(0.89411765e2 * socn - 0.60294118e1) - 0.2e-2 * tanh(0.70422535e1 * socn - 0.13661972e1) - 0.155e-1 * tanh(0.77519380e2 * socn - 0.81395349e1),-0.5e-1 + 0.2325e1 * exp(-0.100e3 * socn ^ 0.115e1) - 0.1721e0 * tanh(0.20000000e2 * socn - 0.21000000e2) - 0.25e-2 * tanh(0.39347962e2 * socn - 0.37241379e2) - 0.34e-1 * tanh(0.89411765e2 * socn - 0.60294118e1) - 0.2e-2 * tanh(0.70422535e1 * socn - 0.13661972e1) - 0.155e-1 * tanh(0.77519380e2 * socn - 0.81395349e1),-0.5e-1 + 0.2325e1 * exp(-0.100e3 * socn ^ 0.115e1) - 0.1721e0 * tanh(0.20000000e2 * socn - 0.21000000e2) - 0.25e-2 * tanh(0.39347962e2 * socn - 0.37241379e2) - 0.34e-1 * tanh(0.89411765e2 * socn - 0.60294118e1) - 0.2e-2 * tanh(0.70422535e1 * socn - 0.13661972e1) - 0.155e-1 * tanh(0.77519380e2 * socn - 0.81395349e1),-0.5e-1 + 0.2325e1 * exp(-0.100e3 * socn ^ 0.115e1) - 0.1721e0 * tanh(0.20000000e2 * socn - 0.21000000e2) - 0.25e-2 * tanh(0.39347962e2 * socn - 0.37241379e2) - 0.34e-1 * tanh(0.89411765e2 * socn - 0.60294118e1) - 0.2e-2 * tanh(0.70422535e1 * socn - 0.13661972e1) - 0.155e-1 * tanh(0.77519380e2 * socn - 0.81395349e1),-0.5e-1 + 0.2325e1 * exp(-0.100e3 * socn ^ 0.115e1) - 0.1721e0 * tanh(0.20000000e2 * socn - 0.21000000e2) - 0.25e-2 * tanh(0.39347962e2 * socn - 0.37241379e2) - 0.34e-1 * tanh(0.89411765e2 * socn - 0.60294118e1) - 0.2e-2 * tanh(0.70422535e1 * socn - 0.13661972e1) - 0.155e-1 * tanh(0.77519380e2 * socn - 0.81395349e1),-0.5e-1 + 0.2325e1 * exp(-0.100e3 * socn ^ 0.115e1) - 0.1721e0 * tanh(0.20000000e2 * socn - 0.21000000e2) - 0.25e-2 * tanh(0.39347962e2 * socn - 0.37241379e2) - 0.34e-1 * tanh(0.89411765e2 * socn - 0.60294118e1) - 0.2e-2 * tanh(0.70422535e1 * socn - 0.13661972e1) - 0.155e-1 * tanh(0.77519380e2 * socn - 0.81395349e1),-0.5e-1 + 0.2325e1 * exp(-0.100e3 * socn ^ 0.115e1) - 0.1721e0 * tanh(0.20000000e2 * socn - 0.21000000e2) - 0.25e-2 * tanh(0.39347962e2 * socn - 0.37241379e2) - 0.34e-1 * tanh(0.89411765e2 * socn - 0.60294118e1) - 0.2e-2 * tanh(0.70422535e1 * socn - 0.13661972e1) - 0.155e-1 * tanh(0.77519380e2 * socn - 0.81395349e1),-0.5e-1 + 0.2325e1 * exp(-0.100e3 * socn ^ 0.115e1) - 0.1721e0 * tanh(0.20000000e2 * socn - 0.21000000e2) - 0.25e-2 * tanh(0.39347962e2 * socn - 0.37241379e2) - 0.34e-1 * tanh(0.89411765e2 * socn - 0.60294118e1) - 0.2e-2 * tanh(0.70422535e1 * socn - 0.13661972e1) - 0.155e-1 * tanh(0.77519380e2 * socn - 0.81395349e1),-0.5e-1 + 0.2325e1 * exp(-0.100e3 * socn ^ 0.115e1) - 0.1721e0 * tanh(0.20000000e2 * socn - 0.21000000e2) - 0.25e-2 * tanh(0.39347962e2 * socn - 0.37241379e2) - 0.34e-1 * tanh(0.89411765e2 * socn - 0.60294118e1) - 0.2e-2 * tanh(0.70422535e1 * socn - 0.13661972e1) - 0.155e-1 * tanh(0.77519380e2 * socn - 0.81395349e1),socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,(-0.5057e1 - 0.136e2 * socp ^ 2 + 0.1216e3 * socp ^ 4 - 0.1851e3 * socp ^ 6 - 0.4543e2 * socp ^ 8 + 0.1277e3 * socp ^ 10) / (-0.1e1 - 0.504e1 * socp ^ 2 + 0.323e2 * socp ^ 4 - 0.4095e2 * socp ^ 6 - 0.2594e2 * socp ^ 8 + 0.4063e2 * socp ^ 10) + 0.5e-1 - 0.2325e1 * exp(-0.100e3 * socn ^ 0.115e1) + 0.1721e0 * tanh(0.20000000e2 * socn - 0.21000000e2) + 0.25e-2 * tanh(0.39347962e2 * socn - 0.37241379e2) + 0.34e-1 * tanh(0.89411765e2 * socn - 0.60294118e1) + 0.2e-2 * tanh(0.70422535e1 * socn - 0.13661972e1) + 0.155e-1 * tanh(0.77519380e2 * socn - 0.81395349e1)]

end
y0=zeros(131)

n=length(y0)
MM=zeros((n,n))
node = 59

for i in 1:node
    MM[i,i]=1.
end

pars = [7.33234842e-08,6.40146313e-12,1.56954148e-13,1.65301662e-06,
  1.28277079e-05,1.39115369e+00,1.70413971e+00,1.93944836e+00,
  1.15245117e+03,3.46144727e+04,4.02951641e+04,3.24118063e-02,
  2.70097144e-02,5.20209372e-01,3.74625146e-01,4.16417062e-01,
  5.51529622e-09,6.95793778e-09,4.91284482e-05,4.88584483e-05,
  1.28054144e-05,1.38146591e+02,9.15019798e+00,9.78830695e-01,
  4.58723247e-01,4.32648301e-01,0.02]
y0 = yyy(pars)
dy = zeros(n)
f = (dy,y) -&gt; P2D2c(zeros(n),y,pars,0.)
using ForwardDiff

# Really long compile time
ForwardDiff.jacobian(f,dy,y0)"><pre class="notranslate">P2D2c <span class="pl-k">=</span> <span class="pl-k">function</span>(dy,y,pars,t)
    Dbulk <span class="pl-k">=</span> pars[<span class="pl-c1">1</span>]
    Dsn <span class="pl-k">=</span> pars[<span class="pl-c1">2</span>]
    Dsp <span class="pl-k">=</span> pars[<span class="pl-c1">3</span>]
    F <span class="pl-k">=</span> <span class="pl-c1">96487.000000</span>
    R <span class="pl-k">=</span> <span class="pl-c1">8.314300</span>
    Rpn <span class="pl-k">=</span> pars[<span class="pl-c1">4</span>]
    Rpp <span class="pl-k">=</span> pars[<span class="pl-c1">5</span>]
    Tr <span class="pl-k">=</span> <span class="pl-c1">298.150000</span>
    brugn <span class="pl-k">=</span> pars[<span class="pl-c1">6</span>]
    brugp <span class="pl-k">=</span> pars[<span class="pl-c1">7</span>]
    brugs <span class="pl-k">=</span> pars[<span class="pl-c1">8</span>]
    c0 <span class="pl-k">=</span> pars[<span class="pl-c1">9</span>]
    ctn <span class="pl-k">=</span> pars[<span class="pl-c1">10</span>]
    ctp <span class="pl-k">=</span> pars[<span class="pl-c1">11</span>]
    efn <span class="pl-k">=</span> pars[<span class="pl-c1">12</span>]
    efp <span class="pl-k">=</span> pars[<span class="pl-c1">13</span>]
    en <span class="pl-k">=</span> pars[<span class="pl-c1">14</span>]
    ep <span class="pl-k">=</span> pars[<span class="pl-c1">15</span>]
    es <span class="pl-k">=</span> pars[<span class="pl-c1">16</span>]
    kn <span class="pl-k">=</span> pars[<span class="pl-c1">17</span>]
    kp <span class="pl-k">=</span> pars[<span class="pl-c1">18</span>]
    ln1 <span class="pl-k">=</span> pars[<span class="pl-c1">19</span>]
    lp <span class="pl-k">=</span> pars[<span class="pl-c1">20</span>]
    ls <span class="pl-k">=</span> pars[<span class="pl-c1">21</span>]
    sigmn <span class="pl-k">=</span> pars[<span class="pl-c1">22</span>]
    sigmp <span class="pl-k">=</span> pars[<span class="pl-c1">23</span>]
    socn <span class="pl-k">=</span> pars[<span class="pl-c1">24</span>]
    socp <span class="pl-k">=</span> pars[<span class="pl-c1">25</span>]
    t1 <span class="pl-k">=</span> pars[<span class="pl-c1">26</span>]


    current <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">1.0</span>
    capacity<span class="pl-k">=</span><span class="pl-c1">17.5</span>
    rate<span class="pl-k">=</span><span class="pl-k">-</span><span class="pl-c1">2.</span>
    iapp<span class="pl-k">=</span>capacity<span class="pl-k">*</span>rate
    up<span class="pl-k">=</span>[<span class="pl-c1">0.</span>,<span class="pl-c1">0.</span>]
    Kr <span class="pl-k">=</span> pars[<span class="pl-c1">27</span>]


    ap <span class="pl-k">=</span> <span class="pl-c1">3</span><span class="pl-k">/</span>Rpp<span class="pl-k">*</span>(<span class="pl-c1">1</span><span class="pl-k">-</span>ep<span class="pl-k">-</span>efp)

    an <span class="pl-k">=</span> <span class="pl-c1">3</span><span class="pl-k">/</span>Rpn<span class="pl-k">*</span>(<span class="pl-c1">1</span><span class="pl-k">-</span>en<span class="pl-k">-</span>efn)

    sigmap <span class="pl-k">=</span> sigmp<span class="pl-k">*</span>(<span class="pl-c1">1</span><span class="pl-k">-</span>ep<span class="pl-k">-</span>efp)

    sigman <span class="pl-k">=</span> sigmn<span class="pl-k">*</span>(<span class="pl-c1">1</span><span class="pl-k">-</span>en<span class="pl-k">-</span>efn)

    D2pos <span class="pl-k">=</span> ep<span class="pl-k">^</span>brugp<span class="pl-k">*</span>Dbulk

    D2sep <span class="pl-k">=</span> es<span class="pl-k">^</span>brugs<span class="pl-k">*</span>Dbulk

    D2neg <span class="pl-k">=</span> en<span class="pl-k">^</span>brugn<span class="pl-k">*</span>Dbulk

    dy[<span class="pl-c1">1</span>] <span class="pl-k">=</span> <span class="pl-c1">1</span><span class="pl-k">/</span>ep<span class="pl-k">*</span>(<span class="pl-c1">64.</span><span class="pl-k">*</span>D2pos<span class="pl-k">/</span>lp<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">60</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">1</span>]<span class="pl-k">+</span>y[<span class="pl-c1">2</span>])<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>ap<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">*</span>kp<span class="pl-k">*</span>(y[<span class="pl-c1">1</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">110</span>]<span class="pl-k">*</span>ctp<span class="pl-k">+</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">110</span>]<span class="pl-k">*</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">86</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">65</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span><span class="pl-c1">ocp_cathode</span>(y[<span class="pl-c1">110</span>],up)))<span class="pl-k">/</span>c0)
    dy[<span class="pl-c1">2</span>] <span class="pl-k">=</span> <span class="pl-c1">1</span><span class="pl-k">/</span>ep<span class="pl-k">*</span>(<span class="pl-c1">64.</span><span class="pl-k">*</span>D2pos<span class="pl-k">/</span>lp<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">1</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">2</span>]<span class="pl-k">+</span>y[<span class="pl-c1">3</span>])<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>ap<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">*</span>kp<span class="pl-k">*</span>(y[<span class="pl-c1">2</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">111</span>]<span class="pl-k">*</span>ctp<span class="pl-k">+</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">111</span>]<span class="pl-k">*</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">87</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">66</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span><span class="pl-c1">ocp_cathode</span>(y[<span class="pl-c1">111</span>],up)))<span class="pl-k">/</span>c0)
    dy[<span class="pl-c1">3</span>] <span class="pl-k">=</span> <span class="pl-c1">1</span><span class="pl-k">/</span>ep<span class="pl-k">*</span>(<span class="pl-c1">64.</span><span class="pl-k">*</span>D2pos<span class="pl-k">/</span>lp<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">2</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">3</span>]<span class="pl-k">+</span>y[<span class="pl-c1">4</span>])<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>ap<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">*</span>kp<span class="pl-k">*</span>(y[<span class="pl-c1">3</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">112</span>]<span class="pl-k">*</span>ctp<span class="pl-k">+</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">112</span>]<span class="pl-k">*</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">88</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">67</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span><span class="pl-c1">ocp_cathode</span>(y[<span class="pl-c1">112</span>],up)))<span class="pl-k">/</span>c0)
    dy[<span class="pl-c1">4</span>] <span class="pl-k">=</span> <span class="pl-c1">1</span><span class="pl-k">/</span>ep<span class="pl-k">*</span>(<span class="pl-c1">64.</span><span class="pl-k">*</span>D2pos<span class="pl-k">/</span>lp<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">3</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">4</span>]<span class="pl-k">+</span>y[<span class="pl-c1">5</span>])<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>ap<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">*</span>kp<span class="pl-k">*</span>(y[<span class="pl-c1">4</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">113</span>]<span class="pl-k">*</span>ctp<span class="pl-k">+</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">113</span>]<span class="pl-k">*</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">89</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">68</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span><span class="pl-c1">ocp_cathode</span>(y[<span class="pl-c1">113</span>],up)))<span class="pl-k">/</span>c0)
    dy[<span class="pl-c1">5</span>] <span class="pl-k">=</span> <span class="pl-c1">1</span><span class="pl-k">/</span>ep<span class="pl-k">*</span>(<span class="pl-c1">64.</span><span class="pl-k">*</span>D2pos<span class="pl-k">/</span>lp<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">4</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">5</span>]<span class="pl-k">+</span>y[<span class="pl-c1">6</span>])<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>ap<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">*</span>kp<span class="pl-k">*</span>(y[<span class="pl-c1">5</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">114</span>]<span class="pl-k">*</span>ctp<span class="pl-k">+</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">114</span>]<span class="pl-k">*</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">90</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">69</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span><span class="pl-c1">ocp_cathode</span>(y[<span class="pl-c1">114</span>],up)))<span class="pl-k">/</span>c0)
    dy[<span class="pl-c1">6</span>] <span class="pl-k">=</span> <span class="pl-c1">1</span><span class="pl-k">/</span>ep<span class="pl-k">*</span>(<span class="pl-c1">64.</span><span class="pl-k">*</span>D2pos<span class="pl-k">/</span>lp<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">5</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">6</span>]<span class="pl-k">+</span>y[<span class="pl-c1">7</span>])<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>ap<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">*</span>kp<span class="pl-k">*</span>(y[<span class="pl-c1">6</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">115</span>]<span class="pl-k">*</span>ctp<span class="pl-k">+</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">115</span>]<span class="pl-k">*</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">91</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">70</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span><span class="pl-c1">ocp_cathode</span>(y[<span class="pl-c1">115</span>],up)))<span class="pl-k">/</span>c0)
    dy[<span class="pl-c1">7</span>] <span class="pl-k">=</span> <span class="pl-c1">1</span><span class="pl-k">/</span>ep<span class="pl-k">*</span>(<span class="pl-c1">64.</span><span class="pl-k">*</span>D2pos<span class="pl-k">/</span>lp<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">6</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">7</span>]<span class="pl-k">+</span>y[<span class="pl-c1">61</span>])<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>ap<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">*</span>kp<span class="pl-k">*</span>(y[<span class="pl-c1">7</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">116</span>]<span class="pl-k">*</span>ctp<span class="pl-k">+</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">116</span>]<span class="pl-k">*</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">92</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">71</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span><span class="pl-c1">ocp_cathode</span>(y[<span class="pl-c1">116</span>],up)))<span class="pl-k">/</span>c0)
    dy[<span class="pl-c1">8</span>] <span class="pl-k">=</span> <span class="pl-c1">16.</span><span class="pl-k">/</span>es<span class="pl-k">*</span>D2sep<span class="pl-k">/</span>ls<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">61</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">8</span>]<span class="pl-k">+</span>y[<span class="pl-c1">9</span>])
    dy[<span class="pl-c1">9</span>] <span class="pl-k">=</span> <span class="pl-c1">16.</span><span class="pl-k">/</span>es<span class="pl-k">*</span>D2sep<span class="pl-k">/</span>ls<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">8</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">9</span>]<span class="pl-k">+</span>y[<span class="pl-c1">10</span>])
    dy[<span class="pl-c1">10</span>] <span class="pl-k">=</span> <span class="pl-c1">16.</span><span class="pl-k">/</span>es<span class="pl-k">*</span>D2sep<span class="pl-k">/</span>ls<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">9</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">10</span>]<span class="pl-k">+</span>y[<span class="pl-c1">62</span>])
    dy[<span class="pl-c1">11</span>] <span class="pl-k">=</span> <span class="pl-c1">1</span><span class="pl-k">/</span>en<span class="pl-k">*</span>(<span class="pl-c1">64.</span><span class="pl-k">*</span>D2neg<span class="pl-k">/</span>ln1<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">62</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">11</span>]<span class="pl-k">+</span>y[<span class="pl-c1">12</span>])<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>an<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">*</span>kn<span class="pl-k">*</span>(y[<span class="pl-c1">11</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">124</span>]<span class="pl-k">*</span>ctn<span class="pl-k">+</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">124</span>]<span class="pl-k">*</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">95</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">77</span>]<span class="pl-k">+</span>.<span class="pl-c1">5e-1</span><span class="pl-k">-</span><span class="pl-c1">2.325</span><span class="pl-k">*</span><span class="pl-c1">exp</span>(<span class="pl-k">-</span><span class="pl-c1">100.</span><span class="pl-k">*</span>y[<span class="pl-c1">124</span>]<span class="pl-k">^</span><span class="pl-c1">1.15</span>)<span class="pl-k">+</span>.<span class="pl-c1">1721</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">20.000000</span><span class="pl-k">*</span>y[<span class="pl-c1">124</span>]<span class="pl-k">-</span><span class="pl-c1">21.000000</span>)<span class="pl-k">+</span>.<span class="pl-c1">25e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">39.347962</span><span class="pl-k">*</span>y[<span class="pl-c1">124</span>]<span class="pl-k">-</span><span class="pl-c1">37.241379</span>)<span class="pl-k">+</span>.<span class="pl-c1">34e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">89.411765</span><span class="pl-k">*</span>y[<span class="pl-c1">124</span>]<span class="pl-k">-</span><span class="pl-c1">6.0294118</span>)<span class="pl-k">+</span>.<span class="pl-c1">2e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">7.0422535</span><span class="pl-k">*</span>y[<span class="pl-c1">124</span>]<span class="pl-k">-</span><span class="pl-c1">1.3661972</span>)<span class="pl-k">+</span>.<span class="pl-c1">155e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">77.519380</span><span class="pl-k">*</span>y[<span class="pl-c1">124</span>]<span class="pl-k">-</span><span class="pl-c1">8.1395349</span>)))<span class="pl-k">/</span>c0)
    dy[<span class="pl-c1">12</span>] <span class="pl-k">=</span> <span class="pl-c1">1</span><span class="pl-k">/</span>en<span class="pl-k">*</span>(<span class="pl-c1">64.</span><span class="pl-k">*</span>D2neg<span class="pl-k">/</span>ln1<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">11</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">12</span>]<span class="pl-k">+</span>y[<span class="pl-c1">13</span>])<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>an<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">*</span>kn<span class="pl-k">*</span>(y[<span class="pl-c1">12</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">125</span>]<span class="pl-k">*</span>ctn<span class="pl-k">+</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">125</span>]<span class="pl-k">*</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">96</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">78</span>]<span class="pl-k">+</span>.<span class="pl-c1">5e-1</span><span class="pl-k">-</span><span class="pl-c1">2.325</span><span class="pl-k">*</span><span class="pl-c1">exp</span>(<span class="pl-k">-</span><span class="pl-c1">100.</span><span class="pl-k">*</span>y[<span class="pl-c1">125</span>]<span class="pl-k">^</span><span class="pl-c1">1.15</span>)<span class="pl-k">+</span>.<span class="pl-c1">1721</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">20.000000</span><span class="pl-k">*</span>y[<span class="pl-c1">125</span>]<span class="pl-k">-</span><span class="pl-c1">21.000000</span>)<span class="pl-k">+</span>.<span class="pl-c1">25e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">39.347962</span><span class="pl-k">*</span>y[<span class="pl-c1">125</span>]<span class="pl-k">-</span><span class="pl-c1">37.241379</span>)<span class="pl-k">+</span>.<span class="pl-c1">34e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">89.411765</span><span class="pl-k">*</span>y[<span class="pl-c1">125</span>]<span class="pl-k">-</span><span class="pl-c1">6.0294118</span>)<span class="pl-k">+</span>.<span class="pl-c1">2e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">7.0422535</span><span class="pl-k">*</span>y[<span class="pl-c1">125</span>]<span class="pl-k">-</span><span class="pl-c1">1.3661972</span>)<span class="pl-k">+</span>.<span class="pl-c1">155e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">77.519380</span><span class="pl-k">*</span>y[<span class="pl-c1">125</span>]<span class="pl-k">-</span><span class="pl-c1">8.1395349</span>)))<span class="pl-k">/</span>c0)
    dy[<span class="pl-c1">13</span>] <span class="pl-k">=</span> <span class="pl-c1">1</span><span class="pl-k">/</span>en<span class="pl-k">*</span>(<span class="pl-c1">64.</span><span class="pl-k">*</span>D2neg<span class="pl-k">/</span>ln1<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">12</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">13</span>]<span class="pl-k">+</span>y[<span class="pl-c1">14</span>])<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>an<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">*</span>kn<span class="pl-k">*</span>(y[<span class="pl-c1">13</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">126</span>]<span class="pl-k">*</span>ctn<span class="pl-k">+</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">126</span>]<span class="pl-k">*</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">97</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">79</span>]<span class="pl-k">+</span>.<span class="pl-c1">5e-1</span><span class="pl-k">-</span><span class="pl-c1">2.325</span><span class="pl-k">*</span><span class="pl-c1">exp</span>(<span class="pl-k">-</span><span class="pl-c1">100.</span><span class="pl-k">*</span>y[<span class="pl-c1">126</span>]<span class="pl-k">^</span><span class="pl-c1">1.15</span>)<span class="pl-k">+</span>.<span class="pl-c1">1721</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">20.000000</span><span class="pl-k">*</span>y[<span class="pl-c1">126</span>]<span class="pl-k">-</span><span class="pl-c1">21.000000</span>)<span class="pl-k">+</span>.<span class="pl-c1">25e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">39.347962</span><span class="pl-k">*</span>y[<span class="pl-c1">126</span>]<span class="pl-k">-</span><span class="pl-c1">37.241379</span>)<span class="pl-k">+</span>.<span class="pl-c1">34e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">89.411765</span><span class="pl-k">*</span>y[<span class="pl-c1">126</span>]<span class="pl-k">-</span><span class="pl-c1">6.0294118</span>)<span class="pl-k">+</span>.<span class="pl-c1">2e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">7.0422535</span><span class="pl-k">*</span>y[<span class="pl-c1">126</span>]<span class="pl-k">-</span><span class="pl-c1">1.3661972</span>)<span class="pl-k">+</span>.<span class="pl-c1">155e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">77.519380</span><span class="pl-k">*</span>y[<span class="pl-c1">126</span>]<span class="pl-k">-</span><span class="pl-c1">8.1395349</span>)))<span class="pl-k">/</span>c0)
    dy[<span class="pl-c1">14</span>] <span class="pl-k">=</span> <span class="pl-c1">1</span><span class="pl-k">/</span>en<span class="pl-k">*</span>(<span class="pl-c1">64.</span><span class="pl-k">*</span>D2neg<span class="pl-k">/</span>ln1<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">13</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">14</span>]<span class="pl-k">+</span>y[<span class="pl-c1">15</span>])<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>an<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">*</span>kn<span class="pl-k">*</span>(y[<span class="pl-c1">14</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">127</span>]<span class="pl-k">*</span>ctn<span class="pl-k">+</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">127</span>]<span class="pl-k">*</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">98</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">80</span>]<span class="pl-k">+</span>.<span class="pl-c1">5e-1</span><span class="pl-k">-</span><span class="pl-c1">2.325</span><span class="pl-k">*</span><span class="pl-c1">exp</span>(<span class="pl-k">-</span><span class="pl-c1">100.</span><span class="pl-k">*</span>y[<span class="pl-c1">127</span>]<span class="pl-k">^</span><span class="pl-c1">1.15</span>)<span class="pl-k">+</span>.<span class="pl-c1">1721</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">20.000000</span><span class="pl-k">*</span>y[<span class="pl-c1">127</span>]<span class="pl-k">-</span><span class="pl-c1">21.000000</span>)<span class="pl-k">+</span>.<span class="pl-c1">25e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">39.347962</span><span class="pl-k">*</span>y[<span class="pl-c1">127</span>]<span class="pl-k">-</span><span class="pl-c1">37.241379</span>)<span class="pl-k">+</span>.<span class="pl-c1">34e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">89.411765</span><span class="pl-k">*</span>y[<span class="pl-c1">127</span>]<span class="pl-k">-</span><span class="pl-c1">6.0294118</span>)<span class="pl-k">+</span>.<span class="pl-c1">2e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">7.0422535</span><span class="pl-k">*</span>y[<span class="pl-c1">127</span>]<span class="pl-k">-</span><span class="pl-c1">1.3661972</span>)<span class="pl-k">+</span>.<span class="pl-c1">155e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">77.519380</span><span class="pl-k">*</span>y[<span class="pl-c1">127</span>]<span class="pl-k">-</span><span class="pl-c1">8.1395349</span>)))<span class="pl-k">/</span>c0)
    dy[<span class="pl-c1">15</span>] <span class="pl-k">=</span> <span class="pl-c1">1</span><span class="pl-k">/</span>en<span class="pl-k">*</span>(<span class="pl-c1">64.</span><span class="pl-k">*</span>D2neg<span class="pl-k">/</span>ln1<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">14</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">15</span>]<span class="pl-k">+</span>y[<span class="pl-c1">16</span>])<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>an<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">*</span>kn<span class="pl-k">*</span>(y[<span class="pl-c1">15</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">128</span>]<span class="pl-k">*</span>ctn<span class="pl-k">+</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">128</span>]<span class="pl-k">*</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">99</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">81</span>]<span class="pl-k">+</span>.<span class="pl-c1">5e-1</span><span class="pl-k">-</span><span class="pl-c1">2.325</span><span class="pl-k">*</span><span class="pl-c1">exp</span>(<span class="pl-k">-</span><span class="pl-c1">100.</span><span class="pl-k">*</span>y[<span class="pl-c1">128</span>]<span class="pl-k">^</span><span class="pl-c1">1.15</span>)<span class="pl-k">+</span>.<span class="pl-c1">1721</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">20.000000</span><span class="pl-k">*</span>y[<span class="pl-c1">128</span>]<span class="pl-k">-</span><span class="pl-c1">21.000000</span>)<span class="pl-k">+</span>.<span class="pl-c1">25e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">39.347962</span><span class="pl-k">*</span>y[<span class="pl-c1">128</span>]<span class="pl-k">-</span><span class="pl-c1">37.241379</span>)<span class="pl-k">+</span>.<span class="pl-c1">34e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">89.411765</span><span class="pl-k">*</span>y[<span class="pl-c1">128</span>]<span class="pl-k">-</span><span class="pl-c1">6.0294118</span>)<span class="pl-k">+</span>.<span class="pl-c1">2e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">7.0422535</span><span class="pl-k">*</span>y[<span class="pl-c1">128</span>]<span class="pl-k">-</span><span class="pl-c1">1.3661972</span>)<span class="pl-k">+</span>.<span class="pl-c1">155e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">77.519380</span><span class="pl-k">*</span>y[<span class="pl-c1">128</span>]<span class="pl-k">-</span><span class="pl-c1">8.1395349</span>)))<span class="pl-k">/</span>c0)
    dy[<span class="pl-c1">16</span>] <span class="pl-k">=</span> <span class="pl-c1">1</span><span class="pl-k">/</span>en<span class="pl-k">*</span>(<span class="pl-c1">64.</span><span class="pl-k">*</span>D2neg<span class="pl-k">/</span>ln1<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">15</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">16</span>]<span class="pl-k">+</span>y[<span class="pl-c1">17</span>])<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>an<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">*</span>kn<span class="pl-k">*</span>(y[<span class="pl-c1">16</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">129</span>]<span class="pl-k">*</span>ctn<span class="pl-k">+</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">129</span>]<span class="pl-k">*</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">100</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">82</span>]<span class="pl-k">+</span>.<span class="pl-c1">5e-1</span><span class="pl-k">-</span><span class="pl-c1">2.325</span><span class="pl-k">*</span><span class="pl-c1">exp</span>(<span class="pl-k">-</span><span class="pl-c1">100.</span><span class="pl-k">*</span>y[<span class="pl-c1">129</span>]<span class="pl-k">^</span><span class="pl-c1">1.15</span>)<span class="pl-k">+</span>.<span class="pl-c1">1721</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">20.000000</span><span class="pl-k">*</span>y[<span class="pl-c1">129</span>]<span class="pl-k">-</span><span class="pl-c1">21.000000</span>)<span class="pl-k">+</span>.<span class="pl-c1">25e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">39.347962</span><span class="pl-k">*</span>y[<span class="pl-c1">129</span>]<span class="pl-k">-</span><span class="pl-c1">37.241379</span>)<span class="pl-k">+</span>.<span class="pl-c1">34e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">89.411765</span><span class="pl-k">*</span>y[<span class="pl-c1">129</span>]<span class="pl-k">-</span><span class="pl-c1">6.0294118</span>)<span class="pl-k">+</span>.<span class="pl-c1">2e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">7.0422535</span><span class="pl-k">*</span>y[<span class="pl-c1">129</span>]<span class="pl-k">-</span><span class="pl-c1">1.3661972</span>)<span class="pl-k">+</span>.<span class="pl-c1">155e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">77.519380</span><span class="pl-k">*</span>y[<span class="pl-c1">129</span>]<span class="pl-k">-</span><span class="pl-c1">8.1395349</span>)))<span class="pl-k">/</span>c0)
    dy[<span class="pl-c1">17</span>] <span class="pl-k">=</span> <span class="pl-c1">1</span><span class="pl-k">/</span>en<span class="pl-k">*</span>(<span class="pl-c1">64.</span><span class="pl-k">*</span>D2neg<span class="pl-k">/</span>ln1<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">16</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">17</span>]<span class="pl-k">+</span>y[<span class="pl-c1">63</span>])<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>an<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">*</span>kn<span class="pl-k">*</span>(y[<span class="pl-c1">17</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">130</span>]<span class="pl-k">*</span>ctn<span class="pl-k">+</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">130</span>]<span class="pl-k">*</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">101</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">83</span>]<span class="pl-k">+</span>.<span class="pl-c1">5e-1</span><span class="pl-k">-</span><span class="pl-c1">2.325</span><span class="pl-k">*</span><span class="pl-c1">exp</span>(<span class="pl-k">-</span><span class="pl-c1">100.</span><span class="pl-k">*</span>y[<span class="pl-c1">130</span>]<span class="pl-k">^</span><span class="pl-c1">1.15</span>)<span class="pl-k">+</span>.<span class="pl-c1">1721</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">20.000000</span><span class="pl-k">*</span>y[<span class="pl-c1">130</span>]<span class="pl-k">-</span><span class="pl-c1">21.000000</span>)<span class="pl-k">+</span>.<span class="pl-c1">25e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">39.347962</span><span class="pl-k">*</span>y[<span class="pl-c1">130</span>]<span class="pl-k">-</span><span class="pl-c1">37.241379</span>)<span class="pl-k">+</span>.<span class="pl-c1">34e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">89.411765</span><span class="pl-k">*</span>y[<span class="pl-c1">130</span>]<span class="pl-k">-</span><span class="pl-c1">6.0294118</span>)<span class="pl-k">+</span>.<span class="pl-c1">2e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">7.0422535</span><span class="pl-k">*</span>y[<span class="pl-c1">130</span>]<span class="pl-k">-</span><span class="pl-c1">1.3661972</span>)<span class="pl-k">+</span>.<span class="pl-c1">155e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">77.519380</span><span class="pl-k">*</span>y[<span class="pl-c1">130</span>]<span class="pl-k">-</span><span class="pl-c1">8.1395349</span>)))<span class="pl-k">/</span>c0)
    dy[<span class="pl-c1">18</span>] <span class="pl-k">=</span> <span class="pl-c1">16.</span><span class="pl-k">*</span>(Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">25</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">103</span>])<span class="pl-k">+</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">103</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">18</span>]<span class="pl-k">+</span>y[<span class="pl-c1">25</span>]))<span class="pl-k">/</span>Rpp<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">19</span>] <span class="pl-k">=</span> <span class="pl-c1">16.</span><span class="pl-k">*</span>(Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">26</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">104</span>])<span class="pl-k">+</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">104</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">19</span>]<span class="pl-k">+</span>y[<span class="pl-c1">26</span>]))<span class="pl-k">/</span>Rpp<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">20</span>] <span class="pl-k">=</span> <span class="pl-c1">16.</span><span class="pl-k">*</span>(Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">27</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">105</span>])<span class="pl-k">+</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">105</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">20</span>]<span class="pl-k">+</span>y[<span class="pl-c1">27</span>]))<span class="pl-k">/</span>Rpp<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">21</span>] <span class="pl-k">=</span> <span class="pl-c1">16.</span><span class="pl-k">*</span>(Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">28</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">106</span>])<span class="pl-k">+</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">106</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">21</span>]<span class="pl-k">+</span>y[<span class="pl-c1">28</span>]))<span class="pl-k">/</span>Rpp<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">22</span>] <span class="pl-k">=</span> <span class="pl-c1">16.</span><span class="pl-k">*</span>(Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">29</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">107</span>])<span class="pl-k">+</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">107</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">22</span>]<span class="pl-k">+</span>y[<span class="pl-c1">29</span>]))<span class="pl-k">/</span>Rpp<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">23</span>] <span class="pl-k">=</span> <span class="pl-c1">16.</span><span class="pl-k">*</span>(Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">30</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">108</span>])<span class="pl-k">+</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">108</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">23</span>]<span class="pl-k">+</span>y[<span class="pl-c1">30</span>]))<span class="pl-k">/</span>Rpp<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">24</span>] <span class="pl-k">=</span> <span class="pl-c1">16.</span><span class="pl-k">*</span>(Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">31</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">109</span>])<span class="pl-k">+</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">109</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">24</span>]<span class="pl-k">+</span>y[<span class="pl-c1">31</span>]))<span class="pl-k">/</span>Rpp<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">25</span>] <span class="pl-k">=</span> <span class="pl-c1">4.</span><span class="pl-k">*</span>(<span class="pl-c1">2.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">32</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">18</span>])<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">18</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">25</span>]<span class="pl-k">+</span>y[<span class="pl-c1">32</span>]))<span class="pl-k">/</span>Rpp<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">26</span>] <span class="pl-k">=</span> <span class="pl-c1">4.</span><span class="pl-k">*</span>(<span class="pl-c1">2.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">33</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">19</span>])<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">19</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">26</span>]<span class="pl-k">+</span>y[<span class="pl-c1">33</span>]))<span class="pl-k">/</span>Rpp<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">27</span>] <span class="pl-k">=</span> <span class="pl-c1">4.</span><span class="pl-k">*</span>(<span class="pl-c1">2.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">34</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">20</span>])<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">20</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">27</span>]<span class="pl-k">+</span>y[<span class="pl-c1">34</span>]))<span class="pl-k">/</span>Rpp<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">28</span>] <span class="pl-k">=</span> <span class="pl-c1">4.</span><span class="pl-k">*</span>(<span class="pl-c1">2.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">35</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">21</span>])<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">21</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">28</span>]<span class="pl-k">+</span>y[<span class="pl-c1">35</span>]))<span class="pl-k">/</span>Rpp<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">29</span>] <span class="pl-k">=</span> <span class="pl-c1">4.</span><span class="pl-k">*</span>(<span class="pl-c1">2.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">36</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">22</span>])<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">22</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">29</span>]<span class="pl-k">+</span>y[<span class="pl-c1">36</span>]))<span class="pl-k">/</span>Rpp<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">30</span>] <span class="pl-k">=</span> <span class="pl-c1">4.</span><span class="pl-k">*</span>(<span class="pl-c1">2.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">37</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">23</span>])<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">23</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">30</span>]<span class="pl-k">+</span>y[<span class="pl-c1">37</span>]))<span class="pl-k">/</span>Rpp<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">31</span>] <span class="pl-k">=</span> <span class="pl-c1">4.</span><span class="pl-k">*</span>(<span class="pl-c1">2.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">38</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">24</span>])<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">24</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">31</span>]<span class="pl-k">+</span>y[<span class="pl-c1">38</span>]))<span class="pl-k">/</span>Rpp<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">32</span>] <span class="pl-k">=</span> <span class="pl-c1">1.777777778</span><span class="pl-k">*</span>(<span class="pl-c1">3.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">110</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">25</span>])<span class="pl-k">+</span><span class="pl-c1">9.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">25</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">32</span>]<span class="pl-k">+</span>y[<span class="pl-c1">110</span>]))<span class="pl-k">/</span>Rpp<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">33</span>] <span class="pl-k">=</span> <span class="pl-c1">1.777777778</span><span class="pl-k">*</span>(<span class="pl-c1">3.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">111</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">26</span>])<span class="pl-k">+</span><span class="pl-c1">9.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">26</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">33</span>]<span class="pl-k">+</span>y[<span class="pl-c1">111</span>]))<span class="pl-k">/</span>Rpp<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">34</span>] <span class="pl-k">=</span> <span class="pl-c1">1.777777778</span><span class="pl-k">*</span>(<span class="pl-c1">3.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">112</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">27</span>])<span class="pl-k">+</span><span class="pl-c1">9.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">27</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">34</span>]<span class="pl-k">+</span>y[<span class="pl-c1">112</span>]))<span class="pl-k">/</span>Rpp<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">35</span>] <span class="pl-k">=</span> <span class="pl-c1">1.777777778</span><span class="pl-k">*</span>(<span class="pl-c1">3.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">113</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">28</span>])<span class="pl-k">+</span><span class="pl-c1">9.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">28</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">35</span>]<span class="pl-k">+</span>y[<span class="pl-c1">113</span>]))<span class="pl-k">/</span>Rpp<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">36</span>] <span class="pl-k">=</span> <span class="pl-c1">1.777777778</span><span class="pl-k">*</span>(<span class="pl-c1">3.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">114</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">29</span>])<span class="pl-k">+</span><span class="pl-c1">9.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">29</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">36</span>]<span class="pl-k">+</span>y[<span class="pl-c1">114</span>]))<span class="pl-k">/</span>Rpp<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">37</span>] <span class="pl-k">=</span> <span class="pl-c1">1.777777778</span><span class="pl-k">*</span>(<span class="pl-c1">3.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">115</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">30</span>])<span class="pl-k">+</span><span class="pl-c1">9.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">30</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">37</span>]<span class="pl-k">+</span>y[<span class="pl-c1">115</span>]))<span class="pl-k">/</span>Rpp<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">38</span>] <span class="pl-k">=</span> <span class="pl-c1">1.777777778</span><span class="pl-k">*</span>(<span class="pl-c1">3.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">116</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">31</span>])<span class="pl-k">+</span><span class="pl-c1">9.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">31</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">38</span>]<span class="pl-k">+</span>y[<span class="pl-c1">116</span>]))<span class="pl-k">/</span>Rpp<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">39</span>] <span class="pl-k">=</span> <span class="pl-c1">16.</span><span class="pl-k">*</span>Dsn<span class="pl-k">*</span>(<span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">46</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">39</span>])<span class="pl-k">/</span>Rpn<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">40</span>] <span class="pl-k">=</span> <span class="pl-c1">16.</span><span class="pl-k">*</span>Dsn<span class="pl-k">*</span>(<span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">47</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">40</span>])<span class="pl-k">/</span>Rpn<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">41</span>] <span class="pl-k">=</span> <span class="pl-c1">16.</span><span class="pl-k">*</span>Dsn<span class="pl-k">*</span>(<span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">48</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">41</span>])<span class="pl-k">/</span>Rpn<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">42</span>] <span class="pl-k">=</span> <span class="pl-c1">16.</span><span class="pl-k">*</span>Dsn<span class="pl-k">*</span>(<span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">49</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">42</span>])<span class="pl-k">/</span>Rpn<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">43</span>] <span class="pl-k">=</span> <span class="pl-c1">16.</span><span class="pl-k">*</span>Dsn<span class="pl-k">*</span>(<span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">50</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">43</span>])<span class="pl-k">/</span>Rpn<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">44</span>] <span class="pl-k">=</span> <span class="pl-c1">16.</span><span class="pl-k">*</span>Dsn<span class="pl-k">*</span>(<span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">51</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">44</span>])<span class="pl-k">/</span>Rpn<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">45</span>] <span class="pl-k">=</span> <span class="pl-c1">16.</span><span class="pl-k">*</span>Dsn<span class="pl-k">*</span>(<span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">52</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">45</span>])<span class="pl-k">/</span>Rpn<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">46</span>] <span class="pl-k">=</span> <span class="pl-c1">4.</span><span class="pl-k">*</span>Dsn<span class="pl-k">*</span>(<span class="pl-c1">6.</span><span class="pl-k">*</span>y[<span class="pl-c1">53</span>]<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">39</span>]<span class="pl-k">-</span><span class="pl-c1">8.</span><span class="pl-k">*</span>y[<span class="pl-c1">46</span>])<span class="pl-k">/</span>Rpn<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">47</span>] <span class="pl-k">=</span> <span class="pl-c1">4.</span><span class="pl-k">*</span>Dsn<span class="pl-k">*</span>(<span class="pl-c1">6.</span><span class="pl-k">*</span>y[<span class="pl-c1">54</span>]<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">40</span>]<span class="pl-k">-</span><span class="pl-c1">8.</span><span class="pl-k">*</span>y[<span class="pl-c1">47</span>])<span class="pl-k">/</span>Rpn<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">48</span>] <span class="pl-k">=</span> <span class="pl-c1">4.</span><span class="pl-k">*</span>Dsn<span class="pl-k">*</span>(<span class="pl-c1">6.</span><span class="pl-k">*</span>y[<span class="pl-c1">55</span>]<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">41</span>]<span class="pl-k">-</span><span class="pl-c1">8.</span><span class="pl-k">*</span>y[<span class="pl-c1">48</span>])<span class="pl-k">/</span>Rpn<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">49</span>] <span class="pl-k">=</span> <span class="pl-c1">4.</span><span class="pl-k">*</span>Dsn<span class="pl-k">*</span>(<span class="pl-c1">6.</span><span class="pl-k">*</span>y[<span class="pl-c1">56</span>]<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">42</span>]<span class="pl-k">-</span><span class="pl-c1">8.</span><span class="pl-k">*</span>y[<span class="pl-c1">49</span>])<span class="pl-k">/</span>Rpn<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">50</span>] <span class="pl-k">=</span> <span class="pl-c1">4.</span><span class="pl-k">*</span>Dsn<span class="pl-k">*</span>(<span class="pl-c1">6.</span><span class="pl-k">*</span>y[<span class="pl-c1">57</span>]<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">43</span>]<span class="pl-k">-</span><span class="pl-c1">8.</span><span class="pl-k">*</span>y[<span class="pl-c1">50</span>])<span class="pl-k">/</span>Rpn<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">51</span>] <span class="pl-k">=</span> <span class="pl-c1">4.</span><span class="pl-k">*</span>Dsn<span class="pl-k">*</span>(<span class="pl-c1">6.</span><span class="pl-k">*</span>y[<span class="pl-c1">58</span>]<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">44</span>]<span class="pl-k">-</span><span class="pl-c1">8.</span><span class="pl-k">*</span>y[<span class="pl-c1">51</span>])<span class="pl-k">/</span>Rpn<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">52</span>] <span class="pl-k">=</span> <span class="pl-c1">4.</span><span class="pl-k">*</span>Dsn<span class="pl-k">*</span>(<span class="pl-c1">6.</span><span class="pl-k">*</span>y[<span class="pl-c1">59</span>]<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">45</span>]<span class="pl-k">-</span><span class="pl-c1">8.</span><span class="pl-k">*</span>y[<span class="pl-c1">52</span>])<span class="pl-k">/</span>Rpn<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">53</span>] <span class="pl-k">=</span> <span class="pl-c1">1.777777778</span><span class="pl-k">*</span>Dsn<span class="pl-k">*</span>(<span class="pl-c1">12.</span><span class="pl-k">*</span>y[<span class="pl-c1">124</span>]<span class="pl-k">+</span><span class="pl-c1">6.</span><span class="pl-k">*</span>y[<span class="pl-c1">46</span>]<span class="pl-k">-</span><span class="pl-c1">18.</span><span class="pl-k">*</span>y[<span class="pl-c1">53</span>])<span class="pl-k">/</span>Rpn<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">54</span>] <span class="pl-k">=</span> <span class="pl-c1">1.777777778</span><span class="pl-k">*</span>Dsn<span class="pl-k">*</span>(<span class="pl-c1">12.</span><span class="pl-k">*</span>y[<span class="pl-c1">125</span>]<span class="pl-k">+</span><span class="pl-c1">6.</span><span class="pl-k">*</span>y[<span class="pl-c1">47</span>]<span class="pl-k">-</span><span class="pl-c1">18.</span><span class="pl-k">*</span>y[<span class="pl-c1">54</span>])<span class="pl-k">/</span>Rpn<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">55</span>] <span class="pl-k">=</span> <span class="pl-c1">1.777777778</span><span class="pl-k">*</span>Dsn<span class="pl-k">*</span>(<span class="pl-c1">12.</span><span class="pl-k">*</span>y[<span class="pl-c1">126</span>]<span class="pl-k">+</span><span class="pl-c1">6.</span><span class="pl-k">*</span>y[<span class="pl-c1">48</span>]<span class="pl-k">-</span><span class="pl-c1">18.</span><span class="pl-k">*</span>y[<span class="pl-c1">55</span>])<span class="pl-k">/</span>Rpn<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">56</span>] <span class="pl-k">=</span> <span class="pl-c1">1.777777778</span><span class="pl-k">*</span>Dsn<span class="pl-k">*</span>(<span class="pl-c1">12.</span><span class="pl-k">*</span>y[<span class="pl-c1">127</span>]<span class="pl-k">+</span><span class="pl-c1">6.</span><span class="pl-k">*</span>y[<span class="pl-c1">49</span>]<span class="pl-k">-</span><span class="pl-c1">18.</span><span class="pl-k">*</span>y[<span class="pl-c1">56</span>])<span class="pl-k">/</span>Rpn<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">57</span>] <span class="pl-k">=</span> <span class="pl-c1">1.777777778</span><span class="pl-k">*</span>Dsn<span class="pl-k">*</span>(<span class="pl-c1">12.</span><span class="pl-k">*</span>y[<span class="pl-c1">128</span>]<span class="pl-k">+</span><span class="pl-c1">6.</span><span class="pl-k">*</span>y[<span class="pl-c1">50</span>]<span class="pl-k">-</span><span class="pl-c1">18.</span><span class="pl-k">*</span>y[<span class="pl-c1">57</span>])<span class="pl-k">/</span>Rpn<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">58</span>] <span class="pl-k">=</span> <span class="pl-c1">1.777777778</span><span class="pl-k">*</span>Dsn<span class="pl-k">*</span>(<span class="pl-c1">12.</span><span class="pl-k">*</span>y[<span class="pl-c1">129</span>]<span class="pl-k">+</span><span class="pl-c1">6.</span><span class="pl-k">*</span>y[<span class="pl-c1">51</span>]<span class="pl-k">-</span><span class="pl-c1">18.</span><span class="pl-k">*</span>y[<span class="pl-c1">58</span>])<span class="pl-k">/</span>Rpn<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">59</span>] <span class="pl-k">=</span> <span class="pl-c1">1.777777778</span><span class="pl-k">*</span>Dsn<span class="pl-k">*</span>(<span class="pl-c1">12.</span><span class="pl-k">*</span>y[<span class="pl-c1">130</span>]<span class="pl-k">+</span><span class="pl-c1">6.</span><span class="pl-k">*</span>y[<span class="pl-c1">52</span>]<span class="pl-k">-</span><span class="pl-c1">18.</span><span class="pl-k">*</span>y[<span class="pl-c1">59</span>])<span class="pl-k">/</span>Rpn<span class="pl-k">^</span><span class="pl-c1">2</span>
    dy[<span class="pl-c1">60</span>] <span class="pl-k">=</span> <span class="pl-c1">4.</span><span class="pl-k">*</span>D2pos<span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">2</span>]<span class="pl-k">-</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">60</span>]<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">1</span>])<span class="pl-k">/</span>lp
    dy[<span class="pl-c1">61</span>] <span class="pl-k">=</span> <span class="pl-c1">4.</span><span class="pl-k">*</span>D2pos<span class="pl-k">*</span>(y[<span class="pl-c1">6</span>]<span class="pl-k">+</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">61</span>]<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">7</span>])<span class="pl-k">/</span>lp<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>D2sep<span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">9</span>]<span class="pl-k">-</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">61</span>]<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">8</span>])<span class="pl-k">/</span>ls
    dy[<span class="pl-c1">62</span>] <span class="pl-k">=</span> <span class="pl-c1">2.</span><span class="pl-k">*</span>D2sep<span class="pl-k">*</span>(y[<span class="pl-c1">9</span>]<span class="pl-k">+</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">62</span>]<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">10</span>])<span class="pl-k">/</span>ls<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>D2neg<span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">12</span>]<span class="pl-k">-</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">62</span>]<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">11</span>])<span class="pl-k">/</span>ln1
    dy[<span class="pl-c1">63</span>] <span class="pl-k">=</span> <span class="pl-c1">4.</span><span class="pl-k">*</span>D2neg<span class="pl-k">*</span>(y[<span class="pl-c1">16</span>]<span class="pl-k">+</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">63</span>]<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">17</span>])<span class="pl-k">/</span>ln1
    dy[<span class="pl-c1">64</span>] <span class="pl-k">=</span> <span class="pl-c1">4.</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">66</span>]<span class="pl-k">-</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">64</span>]<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">65</span>])<span class="pl-k">/</span>lp
    dy[<span class="pl-c1">65</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>sigmap<span class="pl-k">/</span>lp<span class="pl-k">*</span>(y[<span class="pl-c1">87</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">85</span>])<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>ep<span class="pl-k">^</span>brugp<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">1</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">1</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">1</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">1</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">/</span>lp<span class="pl-k">*</span>(y[<span class="pl-c1">66</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">64</span>])<span class="pl-k">+</span><span class="pl-c1">8.</span><span class="pl-k">*</span>ep<span class="pl-k">^</span>brugp<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">1</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">1</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">1</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">1</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">*</span>R<span class="pl-k">*</span>Tr<span class="pl-k">/</span>F<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">/</span>lp<span class="pl-k">*</span>(y[<span class="pl-c1">2</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">60</span>])<span class="pl-k">/</span>y[<span class="pl-c1">1</span>]<span class="pl-k">-</span>iapp
    dy[<span class="pl-c1">66</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>sigmap<span class="pl-k">/</span>lp<span class="pl-k">*</span>(y[<span class="pl-c1">88</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">86</span>])<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>ep<span class="pl-k">^</span>brugp<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">2</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">2</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">2</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">2</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">/</span>lp<span class="pl-k">*</span>(y[<span class="pl-c1">67</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">65</span>])<span class="pl-k">+</span><span class="pl-c1">8.</span><span class="pl-k">*</span>ep<span class="pl-k">^</span>brugp<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">2</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">2</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">2</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">2</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">*</span>R<span class="pl-k">*</span>Tr<span class="pl-k">/</span>F<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">/</span>lp<span class="pl-k">*</span>(y[<span class="pl-c1">3</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">1</span>])<span class="pl-k">/</span>y[<span class="pl-c1">2</span>]<span class="pl-k">-</span>iapp
    dy[<span class="pl-c1">67</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>sigmap<span class="pl-k">/</span>lp<span class="pl-k">*</span>(y[<span class="pl-c1">89</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">87</span>])<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>ep<span class="pl-k">^</span>brugp<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">3</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">3</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">3</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">3</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">/</span>lp<span class="pl-k">*</span>(y[<span class="pl-c1">68</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">66</span>])<span class="pl-k">+</span><span class="pl-c1">8.</span><span class="pl-k">*</span>ep<span class="pl-k">^</span>brugp<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">3</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">3</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">3</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">3</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">*</span>R<span class="pl-k">*</span>Tr<span class="pl-k">/</span>F<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">/</span>lp<span class="pl-k">*</span>(y[<span class="pl-c1">4</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">2</span>])<span class="pl-k">/</span>y[<span class="pl-c1">3</span>]<span class="pl-k">-</span>iapp
    dy[<span class="pl-c1">68</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>sigmap<span class="pl-k">/</span>lp<span class="pl-k">*</span>(y[<span class="pl-c1">90</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">88</span>])<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>ep<span class="pl-k">^</span>brugp<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">4</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">4</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">4</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">4</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">/</span>lp<span class="pl-k">*</span>(y[<span class="pl-c1">69</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">67</span>])<span class="pl-k">+</span><span class="pl-c1">8.</span><span class="pl-k">*</span>ep<span class="pl-k">^</span>brugp<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">4</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">4</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">4</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">4</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">*</span>R<span class="pl-k">*</span>Tr<span class="pl-k">/</span>F<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">/</span>lp<span class="pl-k">*</span>(y[<span class="pl-c1">5</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">3</span>])<span class="pl-k">/</span>y[<span class="pl-c1">4</span>]<span class="pl-k">-</span>iapp
    dy[<span class="pl-c1">69</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>sigmap<span class="pl-k">/</span>lp<span class="pl-k">*</span>(y[<span class="pl-c1">91</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">89</span>])<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>ep<span class="pl-k">^</span>brugp<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">5</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">5</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">5</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">5</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">/</span>lp<span class="pl-k">*</span>(y[<span class="pl-c1">70</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">68</span>])<span class="pl-k">+</span><span class="pl-c1">8.</span><span class="pl-k">*</span>ep<span class="pl-k">^</span>brugp<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">5</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">5</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">5</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">5</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">*</span>R<span class="pl-k">*</span>Tr<span class="pl-k">/</span>F<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">/</span>lp<span class="pl-k">*</span>(y[<span class="pl-c1">6</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">4</span>])<span class="pl-k">/</span>y[<span class="pl-c1">5</span>]<span class="pl-k">-</span>iapp
    dy[<span class="pl-c1">70</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>sigmap<span class="pl-k">/</span>lp<span class="pl-k">*</span>(y[<span class="pl-c1">92</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">90</span>])<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>ep<span class="pl-k">^</span>brugp<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">6</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">6</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">6</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">6</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">/</span>lp<span class="pl-k">*</span>(y[<span class="pl-c1">71</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">69</span>])<span class="pl-k">+</span><span class="pl-c1">8.</span><span class="pl-k">*</span>ep<span class="pl-k">^</span>brugp<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">6</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">6</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">6</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">6</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">*</span>R<span class="pl-k">*</span>Tr<span class="pl-k">/</span>F<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">/</span>lp<span class="pl-k">*</span>(y[<span class="pl-c1">7</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">5</span>])<span class="pl-k">/</span>y[<span class="pl-c1">6</span>]<span class="pl-k">-</span>iapp
    dy[<span class="pl-c1">71</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>sigmap<span class="pl-k">/</span>lp<span class="pl-k">*</span>(y[<span class="pl-c1">93</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">91</span>])<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>ep<span class="pl-k">^</span>brugp<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">7</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">7</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">7</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">7</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">/</span>lp<span class="pl-k">*</span>(y[<span class="pl-c1">72</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">70</span>])<span class="pl-k">+</span><span class="pl-c1">8.</span><span class="pl-k">*</span>ep<span class="pl-k">^</span>brugp<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">7</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">7</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">7</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">7</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">*</span>R<span class="pl-k">*</span>Tr<span class="pl-k">/</span>F<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">/</span>lp<span class="pl-k">*</span>(y[<span class="pl-c1">61</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">6</span>])<span class="pl-k">/</span>y[<span class="pl-c1">7</span>]<span class="pl-k">-</span>iapp
    dy[<span class="pl-c1">72</span>] <span class="pl-k">=</span> <span class="pl-c1">4.</span><span class="pl-k">*</span>ep<span class="pl-k">^</span>brugp<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">61</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">61</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">61</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">61</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">*</span>(y[<span class="pl-c1">70</span>]<span class="pl-k">+</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">72</span>]<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">71</span>])<span class="pl-k">/</span>lp<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>es<span class="pl-k">^</span>brugs<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">61</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">61</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">61</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">61</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">74</span>]<span class="pl-k">-</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">72</span>]<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">73</span>])<span class="pl-k">/</span>ls
    dy[<span class="pl-c1">73</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>es<span class="pl-k">^</span>brugs<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">8</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">8</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">8</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">8</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">/</span>ls<span class="pl-k">*</span>(y[<span class="pl-c1">74</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">72</span>])<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>es<span class="pl-k">^</span>brugs<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">8</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">8</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">8</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">8</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">*</span>R<span class="pl-k">*</span>Tr<span class="pl-k">/</span>F<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">/</span>ls<span class="pl-k">*</span>(y[<span class="pl-c1">9</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">61</span>])<span class="pl-k">/</span>y[<span class="pl-c1">8</span>]<span class="pl-k">-</span>iapp
    dy[<span class="pl-c1">74</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>es<span class="pl-k">^</span>brugs<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">9</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">9</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">9</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">9</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">/</span>ls<span class="pl-k">*</span>(y[<span class="pl-c1">75</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">73</span>])<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>es<span class="pl-k">^</span>brugs<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">9</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">9</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">9</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">9</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">*</span>R<span class="pl-k">*</span>Tr<span class="pl-k">/</span>F<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">/</span>ls<span class="pl-k">*</span>(y[<span class="pl-c1">10</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">8</span>])<span class="pl-k">/</span>y[<span class="pl-c1">9</span>]<span class="pl-k">-</span>iapp
    dy[<span class="pl-c1">75</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>es<span class="pl-k">^</span>brugs<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">10</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">10</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">10</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">10</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">/</span>ls<span class="pl-k">*</span>(y[<span class="pl-c1">76</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">74</span>])<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>es<span class="pl-k">^</span>brugs<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">10</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">10</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">10</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">10</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">*</span>R<span class="pl-k">*</span>Tr<span class="pl-k">/</span>F<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">/</span>ls<span class="pl-k">*</span>(y[<span class="pl-c1">62</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">9</span>])<span class="pl-k">/</span>y[<span class="pl-c1">10</span>]<span class="pl-k">-</span>iapp
    dy[<span class="pl-c1">76</span>] <span class="pl-k">=</span> <span class="pl-c1">2.</span><span class="pl-k">*</span>es<span class="pl-k">^</span>brugs<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">62</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">62</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">62</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">62</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">*</span>(y[<span class="pl-c1">74</span>]<span class="pl-k">+</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">76</span>]<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">75</span>])<span class="pl-k">/</span>ls<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>en<span class="pl-k">^</span>brugn<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">62</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">62</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">62</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">62</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">78</span>]<span class="pl-k">-</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">76</span>]<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">77</span>])<span class="pl-k">/</span>ln1
    dy[<span class="pl-c1">77</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>sigman<span class="pl-k">/</span>ln1<span class="pl-k">*</span>(y[<span class="pl-c1">96</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">94</span>])<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>en<span class="pl-k">^</span>brugn<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">11</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">11</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">11</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">11</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">/</span>ln1<span class="pl-k">*</span>(y[<span class="pl-c1">78</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">76</span>])<span class="pl-k">+</span><span class="pl-c1">8.</span><span class="pl-k">*</span>en<span class="pl-k">^</span>brugn<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">11</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">11</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">11</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">11</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">*</span>R<span class="pl-k">*</span>Tr<span class="pl-k">/</span>F<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">/</span>ln1<span class="pl-k">*</span>(y[<span class="pl-c1">12</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">62</span>])<span class="pl-k">/</span>y[<span class="pl-c1">11</span>]<span class="pl-k">-</span>iapp
    dy[<span class="pl-c1">78</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>sigman<span class="pl-k">/</span>ln1<span class="pl-k">*</span>(y[<span class="pl-c1">97</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">95</span>])<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>en<span class="pl-k">^</span>brugn<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">12</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">12</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">12</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">12</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">/</span>ln1<span class="pl-k">*</span>(y[<span class="pl-c1">79</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">77</span>])<span class="pl-k">+</span><span class="pl-c1">8.</span><span class="pl-k">*</span>en<span class="pl-k">^</span>brugn<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">12</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">12</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">12</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">12</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">*</span>R<span class="pl-k">*</span>Tr<span class="pl-k">/</span>F<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">/</span>ln1<span class="pl-k">*</span>(y[<span class="pl-c1">13</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">11</span>])<span class="pl-k">/</span>y[<span class="pl-c1">12</span>]<span class="pl-k">-</span>iapp
    dy[<span class="pl-c1">79</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>sigman<span class="pl-k">/</span>ln1<span class="pl-k">*</span>(y[<span class="pl-c1">98</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">96</span>])<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>en<span class="pl-k">^</span>brugn<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">13</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">13</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">13</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">13</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">/</span>ln1<span class="pl-k">*</span>(y[<span class="pl-c1">80</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">78</span>])<span class="pl-k">+</span><span class="pl-c1">8.</span><span class="pl-k">*</span>en<span class="pl-k">^</span>brugn<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">13</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">13</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">13</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">13</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">*</span>R<span class="pl-k">*</span>Tr<span class="pl-k">/</span>F<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">/</span>ln1<span class="pl-k">*</span>(y[<span class="pl-c1">14</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">12</span>])<span class="pl-k">/</span>y[<span class="pl-c1">13</span>]<span class="pl-k">-</span>iapp
    dy[<span class="pl-c1">80</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>sigman<span class="pl-k">/</span>ln1<span class="pl-k">*</span>(y[<span class="pl-c1">99</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">97</span>])<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>en<span class="pl-k">^</span>brugn<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">14</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">14</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">14</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">14</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">/</span>ln1<span class="pl-k">*</span>(y[<span class="pl-c1">81</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">79</span>])<span class="pl-k">+</span><span class="pl-c1">8.</span><span class="pl-k">*</span>en<span class="pl-k">^</span>brugn<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">14</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">14</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">14</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">14</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">*</span>R<span class="pl-k">*</span>Tr<span class="pl-k">/</span>F<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">/</span>ln1<span class="pl-k">*</span>(y[<span class="pl-c1">15</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">13</span>])<span class="pl-k">/</span>y[<span class="pl-c1">14</span>]<span class="pl-k">-</span>iapp
    dy[<span class="pl-c1">81</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>sigman<span class="pl-k">/</span>ln1<span class="pl-k">*</span>(y[<span class="pl-c1">100</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">98</span>])<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>en<span class="pl-k">^</span>brugn<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">15</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">15</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">15</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">15</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">/</span>ln1<span class="pl-k">*</span>(y[<span class="pl-c1">82</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">80</span>])<span class="pl-k">+</span><span class="pl-c1">8.</span><span class="pl-k">*</span>en<span class="pl-k">^</span>brugn<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">15</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">15</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">15</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">15</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">*</span>R<span class="pl-k">*</span>Tr<span class="pl-k">/</span>F<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">/</span>ln1<span class="pl-k">*</span>(y[<span class="pl-c1">16</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">14</span>])<span class="pl-k">/</span>y[<span class="pl-c1">15</span>]<span class="pl-k">-</span>iapp
    dy[<span class="pl-c1">82</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>sigman<span class="pl-k">/</span>ln1<span class="pl-k">*</span>(y[<span class="pl-c1">101</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">99</span>])<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>en<span class="pl-k">^</span>brugn<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">16</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">16</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">16</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">16</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">/</span>ln1<span class="pl-k">*</span>(y[<span class="pl-c1">83</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">81</span>])<span class="pl-k">+</span><span class="pl-c1">8.</span><span class="pl-k">*</span>en<span class="pl-k">^</span>brugn<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">16</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">16</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">16</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">16</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">*</span>R<span class="pl-k">*</span>Tr<span class="pl-k">/</span>F<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">/</span>ln1<span class="pl-k">*</span>(y[<span class="pl-c1">17</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">15</span>])<span class="pl-k">/</span>y[<span class="pl-c1">16</span>]<span class="pl-k">-</span>iapp
    dy[<span class="pl-c1">83</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>sigman<span class="pl-k">/</span>ln1<span class="pl-k">*</span>(y[<span class="pl-c1">102</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">100</span>])<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>en<span class="pl-k">^</span>brugn<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">17</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">17</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">17</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">17</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">/</span>ln1<span class="pl-k">*</span>(y[<span class="pl-c1">84</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">82</span>])<span class="pl-k">+</span><span class="pl-c1">8.</span><span class="pl-k">*</span>en<span class="pl-k">^</span>brugn<span class="pl-k">*</span>(.<span class="pl-c1">41253e-1</span><span class="pl-k">+</span>.<span class="pl-c1">5007e-3</span><span class="pl-k">*</span>y[<span class="pl-c1">17</span>]<span class="pl-k">-</span>.<span class="pl-c1">47212e-6</span><span class="pl-k">*</span>y[<span class="pl-c1">17</span>]<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span>.<span class="pl-c1">15904e-9</span><span class="pl-k">*</span>y[<span class="pl-c1">17</span>]<span class="pl-k">^</span><span class="pl-c1">3</span><span class="pl-k">-</span>.<span class="pl-c1">16018e-13</span><span class="pl-k">*</span>y[<span class="pl-c1">17</span>]<span class="pl-k">^</span><span class="pl-c1">4</span>)<span class="pl-k">*</span>R<span class="pl-k">*</span>Tr<span class="pl-k">/</span>F<span class="pl-k">*</span>(<span class="pl-c1">1.</span><span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>t1)<span class="pl-k">/</span>ln1<span class="pl-k">*</span>(y[<span class="pl-c1">63</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">16</span>])<span class="pl-k">/</span>y[<span class="pl-c1">17</span>]<span class="pl-k">-</span>iapp
    dy[<span class="pl-c1">84</span>] <span class="pl-k">=</span> y[<span class="pl-c1">84</span>]
    dy[<span class="pl-c1">85</span>] <span class="pl-k">=</span> <span class="pl-c1">4.</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">87</span>]<span class="pl-k">-</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">85</span>]<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">86</span>])<span class="pl-k">/</span>lp<span class="pl-k">+</span><span class="pl-c1">1.</span><span class="pl-k">*</span>iapp<span class="pl-k">/</span>sigmap
    dy[<span class="pl-c1">86</span>] <span class="pl-k">=</span> <span class="pl-c1">64.</span><span class="pl-k">*</span>sigmap<span class="pl-k">/</span>lp<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">85</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">86</span>]<span class="pl-k">+</span>y[<span class="pl-c1">87</span>])<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>ap<span class="pl-k">*</span>F<span class="pl-k">*</span>kp<span class="pl-k">*</span>(y[<span class="pl-c1">1</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">110</span>]<span class="pl-k">*</span>ctp<span class="pl-k">+</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">110</span>]<span class="pl-k">*</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">86</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">65</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span><span class="pl-c1">ocp_cathode</span>(y[<span class="pl-c1">110</span>],up)))
    dy[<span class="pl-c1">87</span>] <span class="pl-k">=</span> <span class="pl-c1">64.</span><span class="pl-k">*</span>sigmap<span class="pl-k">/</span>lp<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">86</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">87</span>]<span class="pl-k">+</span>y[<span class="pl-c1">88</span>])<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>ap<span class="pl-k">*</span>F<span class="pl-k">*</span>kp<span class="pl-k">*</span>(y[<span class="pl-c1">2</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">111</span>]<span class="pl-k">*</span>ctp<span class="pl-k">+</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">111</span>]<span class="pl-k">*</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">87</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">66</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span><span class="pl-c1">ocp_cathode</span>(y[<span class="pl-c1">111</span>],up)))
    dy[<span class="pl-c1">88</span>] <span class="pl-k">=</span> <span class="pl-c1">64.</span><span class="pl-k">*</span>sigmap<span class="pl-k">/</span>lp<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">87</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">88</span>]<span class="pl-k">+</span>y[<span class="pl-c1">89</span>])<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>ap<span class="pl-k">*</span>F<span class="pl-k">*</span>kp<span class="pl-k">*</span>(y[<span class="pl-c1">3</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">112</span>]<span class="pl-k">*</span>ctp<span class="pl-k">+</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">112</span>]<span class="pl-k">*</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">88</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">67</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span><span class="pl-c1">ocp_cathode</span>(y[<span class="pl-c1">112</span>],up)))
    dy[<span class="pl-c1">89</span>] <span class="pl-k">=</span> <span class="pl-c1">64.</span><span class="pl-k">*</span>sigmap<span class="pl-k">/</span>lp<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">88</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">89</span>]<span class="pl-k">+</span>y[<span class="pl-c1">90</span>])<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>ap<span class="pl-k">*</span>F<span class="pl-k">*</span>kp<span class="pl-k">*</span>(y[<span class="pl-c1">4</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">113</span>]<span class="pl-k">*</span>ctp<span class="pl-k">+</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">113</span>]<span class="pl-k">*</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">89</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">68</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span><span class="pl-c1">ocp_cathode</span>(y[<span class="pl-c1">113</span>],up)))
    dy[<span class="pl-c1">90</span>] <span class="pl-k">=</span> <span class="pl-c1">64.</span><span class="pl-k">*</span>sigmap<span class="pl-k">/</span>lp<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">89</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">90</span>]<span class="pl-k">+</span>y[<span class="pl-c1">91</span>])<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>ap<span class="pl-k">*</span>F<span class="pl-k">*</span>kp<span class="pl-k">*</span>(y[<span class="pl-c1">5</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">114</span>]<span class="pl-k">*</span>ctp<span class="pl-k">+</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">114</span>]<span class="pl-k">*</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">90</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">69</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span><span class="pl-c1">ocp_cathode</span>(y[<span class="pl-c1">114</span>],up)))
    dy[<span class="pl-c1">91</span>] <span class="pl-k">=</span> <span class="pl-c1">64.</span><span class="pl-k">*</span>sigmap<span class="pl-k">/</span>lp<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">90</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">91</span>]<span class="pl-k">+</span>y[<span class="pl-c1">92</span>])<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>ap<span class="pl-k">*</span>F<span class="pl-k">*</span>kp<span class="pl-k">*</span>(y[<span class="pl-c1">6</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">115</span>]<span class="pl-k">*</span>ctp<span class="pl-k">+</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">115</span>]<span class="pl-k">*</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">91</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">70</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span><span class="pl-c1">ocp_cathode</span>(y[<span class="pl-c1">115</span>],up)))
    dy[<span class="pl-c1">92</span>] <span class="pl-k">=</span> <span class="pl-c1">64.</span><span class="pl-k">*</span>sigmap<span class="pl-k">/</span>lp<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">91</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">92</span>]<span class="pl-k">+</span>y[<span class="pl-c1">93</span>])<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>ap<span class="pl-k">*</span>F<span class="pl-k">*</span>kp<span class="pl-k">*</span>(y[<span class="pl-c1">7</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">116</span>]<span class="pl-k">*</span>ctp<span class="pl-k">+</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">116</span>]<span class="pl-k">*</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">92</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">71</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span><span class="pl-c1">ocp_cathode</span>(y[<span class="pl-c1">116</span>],up)))
    dy[<span class="pl-c1">93</span>] <span class="pl-k">=</span> <span class="pl-c1">4.</span><span class="pl-k">*</span>(y[<span class="pl-c1">91</span>]<span class="pl-k">+</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">93</span>]<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">92</span>])<span class="pl-k">/</span>lp
    dy[<span class="pl-c1">94</span>] <span class="pl-k">=</span> <span class="pl-c1">4.</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">96</span>]<span class="pl-k">-</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">94</span>]<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">95</span>])<span class="pl-k">/</span>ln1
    dy[<span class="pl-c1">95</span>] <span class="pl-k">=</span> <span class="pl-c1">64.</span><span class="pl-k">*</span>sigman<span class="pl-k">/</span>ln1<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">94</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">95</span>]<span class="pl-k">+</span>y[<span class="pl-c1">96</span>])<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>an<span class="pl-k">*</span>F<span class="pl-k">*</span>kn<span class="pl-k">*</span>(y[<span class="pl-c1">11</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">124</span>]<span class="pl-k">*</span>ctn<span class="pl-k">+</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">124</span>]<span class="pl-k">*</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">95</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">77</span>]<span class="pl-k">+</span>.<span class="pl-c1">5e-1</span><span class="pl-k">-</span><span class="pl-c1">2.325</span><span class="pl-k">*</span><span class="pl-c1">exp</span>(<span class="pl-k">-</span><span class="pl-c1">100.</span><span class="pl-k">*</span>y[<span class="pl-c1">124</span>]<span class="pl-k">^</span><span class="pl-c1">1.15</span>)<span class="pl-k">+</span>.<span class="pl-c1">1721</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">20.000000</span><span class="pl-k">*</span>y[<span class="pl-c1">124</span>]<span class="pl-k">-</span><span class="pl-c1">21.000000</span>)<span class="pl-k">+</span>.<span class="pl-c1">25e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">39.347962</span><span class="pl-k">*</span>y[<span class="pl-c1">124</span>]<span class="pl-k">-</span><span class="pl-c1">37.241379</span>)<span class="pl-k">+</span>.<span class="pl-c1">34e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">89.411765</span><span class="pl-k">*</span>y[<span class="pl-c1">124</span>]<span class="pl-k">-</span><span class="pl-c1">6.0294118</span>)<span class="pl-k">+</span>.<span class="pl-c1">2e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">7.0422535</span><span class="pl-k">*</span>y[<span class="pl-c1">124</span>]<span class="pl-k">-</span><span class="pl-c1">1.3661972</span>)<span class="pl-k">+</span>.<span class="pl-c1">155e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">77.519380</span><span class="pl-k">*</span>y[<span class="pl-c1">124</span>]<span class="pl-k">-</span><span class="pl-c1">8.1395349</span>)))
    dy[<span class="pl-c1">96</span>] <span class="pl-k">=</span> <span class="pl-c1">64.</span><span class="pl-k">*</span>sigman<span class="pl-k">/</span>ln1<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">95</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">96</span>]<span class="pl-k">+</span>y[<span class="pl-c1">97</span>])<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>an<span class="pl-k">*</span>F<span class="pl-k">*</span>kn<span class="pl-k">*</span>(y[<span class="pl-c1">12</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">125</span>]<span class="pl-k">*</span>ctn<span class="pl-k">+</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">125</span>]<span class="pl-k">*</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">96</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">78</span>]<span class="pl-k">+</span>.<span class="pl-c1">5e-1</span><span class="pl-k">-</span><span class="pl-c1">2.325</span><span class="pl-k">*</span><span class="pl-c1">exp</span>(<span class="pl-k">-</span><span class="pl-c1">100.</span><span class="pl-k">*</span>y[<span class="pl-c1">125</span>]<span class="pl-k">^</span><span class="pl-c1">1.15</span>)<span class="pl-k">+</span>.<span class="pl-c1">1721</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">20.000000</span><span class="pl-k">*</span>y[<span class="pl-c1">125</span>]<span class="pl-k">-</span><span class="pl-c1">21.000000</span>)<span class="pl-k">+</span>.<span class="pl-c1">25e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">39.347962</span><span class="pl-k">*</span>y[<span class="pl-c1">125</span>]<span class="pl-k">-</span><span class="pl-c1">37.241379</span>)<span class="pl-k">+</span>.<span class="pl-c1">34e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">89.411765</span><span class="pl-k">*</span>y[<span class="pl-c1">125</span>]<span class="pl-k">-</span><span class="pl-c1">6.0294118</span>)<span class="pl-k">+</span>.<span class="pl-c1">2e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">7.0422535</span><span class="pl-k">*</span>y[<span class="pl-c1">125</span>]<span class="pl-k">-</span><span class="pl-c1">1.3661972</span>)<span class="pl-k">+</span>.<span class="pl-c1">155e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">77.519380</span><span class="pl-k">*</span>y[<span class="pl-c1">125</span>]<span class="pl-k">-</span><span class="pl-c1">8.1395349</span>)))
    dy[<span class="pl-c1">97</span>] <span class="pl-k">=</span> <span class="pl-c1">64.</span><span class="pl-k">*</span>sigman<span class="pl-k">/</span>ln1<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">96</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">97</span>]<span class="pl-k">+</span>y[<span class="pl-c1">98</span>])<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>an<span class="pl-k">*</span>F<span class="pl-k">*</span>kn<span class="pl-k">*</span>(y[<span class="pl-c1">13</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">126</span>]<span class="pl-k">*</span>ctn<span class="pl-k">+</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">126</span>]<span class="pl-k">*</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">97</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">79</span>]<span class="pl-k">+</span>.<span class="pl-c1">5e-1</span><span class="pl-k">-</span><span class="pl-c1">2.325</span><span class="pl-k">*</span><span class="pl-c1">exp</span>(<span class="pl-k">-</span><span class="pl-c1">100.</span><span class="pl-k">*</span>y[<span class="pl-c1">126</span>]<span class="pl-k">^</span><span class="pl-c1">1.15</span>)<span class="pl-k">+</span>.<span class="pl-c1">1721</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">20.000000</span><span class="pl-k">*</span>y[<span class="pl-c1">126</span>]<span class="pl-k">-</span><span class="pl-c1">21.000000</span>)<span class="pl-k">+</span>.<span class="pl-c1">25e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">39.347962</span><span class="pl-k">*</span>y[<span class="pl-c1">126</span>]<span class="pl-k">-</span><span class="pl-c1">37.241379</span>)<span class="pl-k">+</span>.<span class="pl-c1">34e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">89.411765</span><span class="pl-k">*</span>y[<span class="pl-c1">126</span>]<span class="pl-k">-</span><span class="pl-c1">6.0294118</span>)<span class="pl-k">+</span>.<span class="pl-c1">2e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">7.0422535</span><span class="pl-k">*</span>y[<span class="pl-c1">126</span>]<span class="pl-k">-</span><span class="pl-c1">1.3661972</span>)<span class="pl-k">+</span>.<span class="pl-c1">155e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">77.519380</span><span class="pl-k">*</span>y[<span class="pl-c1">126</span>]<span class="pl-k">-</span><span class="pl-c1">8.1395349</span>)))
    dy[<span class="pl-c1">98</span>] <span class="pl-k">=</span> <span class="pl-c1">64.</span><span class="pl-k">*</span>sigman<span class="pl-k">/</span>ln1<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">97</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">98</span>]<span class="pl-k">+</span>y[<span class="pl-c1">99</span>])<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>an<span class="pl-k">*</span>F<span class="pl-k">*</span>kn<span class="pl-k">*</span>(y[<span class="pl-c1">14</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">127</span>]<span class="pl-k">*</span>ctn<span class="pl-k">+</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">127</span>]<span class="pl-k">*</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">98</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">80</span>]<span class="pl-k">+</span>.<span class="pl-c1">5e-1</span><span class="pl-k">-</span><span class="pl-c1">2.325</span><span class="pl-k">*</span><span class="pl-c1">exp</span>(<span class="pl-k">-</span><span class="pl-c1">100.</span><span class="pl-k">*</span>y[<span class="pl-c1">127</span>]<span class="pl-k">^</span><span class="pl-c1">1.15</span>)<span class="pl-k">+</span>.<span class="pl-c1">1721</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">20.000000</span><span class="pl-k">*</span>y[<span class="pl-c1">127</span>]<span class="pl-k">-</span><span class="pl-c1">21.000000</span>)<span class="pl-k">+</span>.<span class="pl-c1">25e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">39.347962</span><span class="pl-k">*</span>y[<span class="pl-c1">127</span>]<span class="pl-k">-</span><span class="pl-c1">37.241379</span>)<span class="pl-k">+</span>.<span class="pl-c1">34e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">89.411765</span><span class="pl-k">*</span>y[<span class="pl-c1">127</span>]<span class="pl-k">-</span><span class="pl-c1">6.0294118</span>)<span class="pl-k">+</span>.<span class="pl-c1">2e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">7.0422535</span><span class="pl-k">*</span>y[<span class="pl-c1">127</span>]<span class="pl-k">-</span><span class="pl-c1">1.3661972</span>)<span class="pl-k">+</span>.<span class="pl-c1">155e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">77.519380</span><span class="pl-k">*</span>y[<span class="pl-c1">127</span>]<span class="pl-k">-</span><span class="pl-c1">8.1395349</span>)))
    dy[<span class="pl-c1">99</span>] <span class="pl-k">=</span> <span class="pl-c1">64.</span><span class="pl-k">*</span>sigman<span class="pl-k">/</span>ln1<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">98</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">99</span>]<span class="pl-k">+</span>y[<span class="pl-c1">100</span>])<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>an<span class="pl-k">*</span>F<span class="pl-k">*</span>kn<span class="pl-k">*</span>(y[<span class="pl-c1">15</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">128</span>]<span class="pl-k">*</span>ctn<span class="pl-k">+</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">128</span>]<span class="pl-k">*</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">99</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">81</span>]<span class="pl-k">+</span>.<span class="pl-c1">5e-1</span><span class="pl-k">-</span><span class="pl-c1">2.325</span><span class="pl-k">*</span><span class="pl-c1">exp</span>(<span class="pl-k">-</span><span class="pl-c1">100.</span><span class="pl-k">*</span>y[<span class="pl-c1">128</span>]<span class="pl-k">^</span><span class="pl-c1">1.15</span>)<span class="pl-k">+</span>.<span class="pl-c1">1721</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">20.000000</span><span class="pl-k">*</span>y[<span class="pl-c1">128</span>]<span class="pl-k">-</span><span class="pl-c1">21.000000</span>)<span class="pl-k">+</span>.<span class="pl-c1">25e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">39.347962</span><span class="pl-k">*</span>y[<span class="pl-c1">128</span>]<span class="pl-k">-</span><span class="pl-c1">37.241379</span>)<span class="pl-k">+</span>.<span class="pl-c1">34e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">89.411765</span><span class="pl-k">*</span>y[<span class="pl-c1">128</span>]<span class="pl-k">-</span><span class="pl-c1">6.0294118</span>)<span class="pl-k">+</span>.<span class="pl-c1">2e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">7.0422535</span><span class="pl-k">*</span>y[<span class="pl-c1">128</span>]<span class="pl-k">-</span><span class="pl-c1">1.3661972</span>)<span class="pl-k">+</span>.<span class="pl-c1">155e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">77.519380</span><span class="pl-k">*</span>y[<span class="pl-c1">128</span>]<span class="pl-k">-</span><span class="pl-c1">8.1395349</span>)))
    dy[<span class="pl-c1">100</span>] <span class="pl-k">=</span> <span class="pl-c1">64.</span><span class="pl-k">*</span>sigman<span class="pl-k">/</span>ln1<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">99</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">100</span>]<span class="pl-k">+</span>y[<span class="pl-c1">101</span>])<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>an<span class="pl-k">*</span>F<span class="pl-k">*</span>kn<span class="pl-k">*</span>(y[<span class="pl-c1">16</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">129</span>]<span class="pl-k">*</span>ctn<span class="pl-k">+</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">129</span>]<span class="pl-k">*</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">100</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">82</span>]<span class="pl-k">+</span>.<span class="pl-c1">5e-1</span><span class="pl-k">-</span><span class="pl-c1">2.325</span><span class="pl-k">*</span><span class="pl-c1">exp</span>(<span class="pl-k">-</span><span class="pl-c1">100.</span><span class="pl-k">*</span>y[<span class="pl-c1">129</span>]<span class="pl-k">^</span><span class="pl-c1">1.15</span>)<span class="pl-k">+</span>.<span class="pl-c1">1721</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">20.000000</span><span class="pl-k">*</span>y[<span class="pl-c1">129</span>]<span class="pl-k">-</span><span class="pl-c1">21.000000</span>)<span class="pl-k">+</span>.<span class="pl-c1">25e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">39.347962</span><span class="pl-k">*</span>y[<span class="pl-c1">129</span>]<span class="pl-k">-</span><span class="pl-c1">37.241379</span>)<span class="pl-k">+</span>.<span class="pl-c1">34e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">89.411765</span><span class="pl-k">*</span>y[<span class="pl-c1">129</span>]<span class="pl-k">-</span><span class="pl-c1">6.0294118</span>)<span class="pl-k">+</span>.<span class="pl-c1">2e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">7.0422535</span><span class="pl-k">*</span>y[<span class="pl-c1">129</span>]<span class="pl-k">-</span><span class="pl-c1">1.3661972</span>)<span class="pl-k">+</span>.<span class="pl-c1">155e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">77.519380</span><span class="pl-k">*</span>y[<span class="pl-c1">129</span>]<span class="pl-k">-</span><span class="pl-c1">8.1395349</span>)))
    dy[<span class="pl-c1">101</span>] <span class="pl-k">=</span> <span class="pl-c1">64.</span><span class="pl-k">*</span>sigman<span class="pl-k">/</span>ln1<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">*</span>(y[<span class="pl-c1">100</span>]<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>y[<span class="pl-c1">101</span>]<span class="pl-k">+</span>y[<span class="pl-c1">102</span>])<span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>an<span class="pl-k">*</span>F<span class="pl-k">*</span>kn<span class="pl-k">*</span>(y[<span class="pl-c1">17</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">130</span>]<span class="pl-k">*</span>ctn<span class="pl-k">+</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">130</span>]<span class="pl-k">*</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">101</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">83</span>]<span class="pl-k">+</span>.<span class="pl-c1">5e-1</span><span class="pl-k">-</span><span class="pl-c1">2.325</span><span class="pl-k">*</span><span class="pl-c1">exp</span>(<span class="pl-k">-</span><span class="pl-c1">100.</span><span class="pl-k">*</span>y[<span class="pl-c1">130</span>]<span class="pl-k">^</span><span class="pl-c1">1.15</span>)<span class="pl-k">+</span>.<span class="pl-c1">1721</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">20.000000</span><span class="pl-k">*</span>y[<span class="pl-c1">130</span>]<span class="pl-k">-</span><span class="pl-c1">21.000000</span>)<span class="pl-k">+</span>.<span class="pl-c1">25e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">39.347962</span><span class="pl-k">*</span>y[<span class="pl-c1">130</span>]<span class="pl-k">-</span><span class="pl-c1">37.241379</span>)<span class="pl-k">+</span>.<span class="pl-c1">34e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">89.411765</span><span class="pl-k">*</span>y[<span class="pl-c1">130</span>]<span class="pl-k">-</span><span class="pl-c1">6.0294118</span>)<span class="pl-k">+</span>.<span class="pl-c1">2e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">7.0422535</span><span class="pl-k">*</span>y[<span class="pl-c1">130</span>]<span class="pl-k">-</span><span class="pl-c1">1.3661972</span>)<span class="pl-k">+</span>.<span class="pl-c1">155e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">77.519380</span><span class="pl-k">*</span>y[<span class="pl-c1">130</span>]<span class="pl-k">-</span><span class="pl-c1">8.1395349</span>)))
    dy[<span class="pl-c1">102</span>] <span class="pl-k">=</span> <span class="pl-c1">4.</span><span class="pl-k">*</span>(y[<span class="pl-c1">100</span>]<span class="pl-k">+</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">102</span>]<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">101</span>])<span class="pl-k">/</span>ln1<span class="pl-k">+</span><span class="pl-c1">1.</span><span class="pl-k">*</span>iapp<span class="pl-k">/</span>sigman
    dy[<span class="pl-c1">103</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">25</span>]<span class="pl-k">-</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">103</span>]<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">18</span>])<span class="pl-k">/</span>Rpp
    dy[<span class="pl-c1">104</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">26</span>]<span class="pl-k">-</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">104</span>]<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">19</span>])<span class="pl-k">/</span>Rpp
    dy[<span class="pl-c1">105</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">27</span>]<span class="pl-k">-</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">105</span>]<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">20</span>])<span class="pl-k">/</span>Rpp
    dy[<span class="pl-c1">106</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">28</span>]<span class="pl-k">-</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">106</span>]<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">21</span>])<span class="pl-k">/</span>Rpp
    dy[<span class="pl-c1">107</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">29</span>]<span class="pl-k">-</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">107</span>]<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">22</span>])<span class="pl-k">/</span>Rpp
    dy[<span class="pl-c1">108</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">30</span>]<span class="pl-k">-</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">108</span>]<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">23</span>])<span class="pl-k">/</span>Rpp
    dy[<span class="pl-c1">109</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">31</span>]<span class="pl-k">-</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">109</span>]<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">24</span>])<span class="pl-k">/</span>Rpp
    dy[<span class="pl-c1">110</span>] <span class="pl-k">=</span> <span class="pl-c1">2.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">25</span>]<span class="pl-k">+</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">110</span>]<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">32</span>])<span class="pl-k">/</span>Rpp<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>kp<span class="pl-k">*</span>(y[<span class="pl-c1">1</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">110</span>]<span class="pl-k">*</span>ctp<span class="pl-k">+</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">110</span>]<span class="pl-k">*</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">86</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">65</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span><span class="pl-c1">ocp_cathode</span>(y[<span class="pl-c1">110</span>],up)))<span class="pl-k">/</span>ctp
    dy[<span class="pl-c1">111</span>] <span class="pl-k">=</span> <span class="pl-c1">2.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">26</span>]<span class="pl-k">+</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">111</span>]<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">33</span>])<span class="pl-k">/</span>Rpp<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>kp<span class="pl-k">*</span>(y[<span class="pl-c1">2</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">111</span>]<span class="pl-k">*</span>ctp<span class="pl-k">+</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">111</span>]<span class="pl-k">*</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">87</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">66</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span><span class="pl-c1">ocp_cathode</span>(y[<span class="pl-c1">111</span>],up)))<span class="pl-k">/</span>ctp
    dy[<span class="pl-c1">112</span>] <span class="pl-k">=</span> <span class="pl-c1">2.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">27</span>]<span class="pl-k">+</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">112</span>]<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">34</span>])<span class="pl-k">/</span>Rpp<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>kp<span class="pl-k">*</span>(y[<span class="pl-c1">3</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">112</span>]<span class="pl-k">*</span>ctp<span class="pl-k">+</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">112</span>]<span class="pl-k">*</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">88</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">67</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span><span class="pl-c1">ocp_cathode</span>(y[<span class="pl-c1">112</span>],up)))<span class="pl-k">/</span>ctp
    dy[<span class="pl-c1">113</span>] <span class="pl-k">=</span> <span class="pl-c1">2.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">28</span>]<span class="pl-k">+</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">113</span>]<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">35</span>])<span class="pl-k">/</span>Rpp<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>kp<span class="pl-k">*</span>(y[<span class="pl-c1">4</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">113</span>]<span class="pl-k">*</span>ctp<span class="pl-k">+</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">113</span>]<span class="pl-k">*</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">89</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">68</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span><span class="pl-c1">ocp_cathode</span>(y[<span class="pl-c1">113</span>],up)))<span class="pl-k">/</span>ctp
    dy[<span class="pl-c1">114</span>] <span class="pl-k">=</span> <span class="pl-c1">2.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">29</span>]<span class="pl-k">+</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">114</span>]<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">36</span>])<span class="pl-k">/</span>Rpp<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>kp<span class="pl-k">*</span>(y[<span class="pl-c1">5</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">114</span>]<span class="pl-k">*</span>ctp<span class="pl-k">+</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">114</span>]<span class="pl-k">*</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">90</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">69</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span><span class="pl-c1">ocp_cathode</span>(y[<span class="pl-c1">114</span>],up)))<span class="pl-k">/</span>ctp
    dy[<span class="pl-c1">115</span>] <span class="pl-k">=</span> <span class="pl-c1">2.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">30</span>]<span class="pl-k">+</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">115</span>]<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">37</span>])<span class="pl-k">/</span>Rpp<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>kp<span class="pl-k">*</span>(y[<span class="pl-c1">6</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">115</span>]<span class="pl-k">*</span>ctp<span class="pl-k">+</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">115</span>]<span class="pl-k">*</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">91</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">70</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span><span class="pl-c1">ocp_cathode</span>(y[<span class="pl-c1">115</span>],up)))<span class="pl-k">/</span>ctp
    dy[<span class="pl-c1">116</span>] <span class="pl-k">=</span> <span class="pl-c1">2.</span><span class="pl-k">*</span>Dsp<span class="pl-k">*</span>(y[<span class="pl-c1">31</span>]<span class="pl-k">+</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">116</span>]<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">38</span>])<span class="pl-k">/</span>Rpp<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>kp<span class="pl-k">*</span>(y[<span class="pl-c1">7</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">116</span>]<span class="pl-k">*</span>ctp<span class="pl-k">+</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">116</span>]<span class="pl-k">*</span>ctp)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">92</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">71</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span><span class="pl-c1">ocp_cathode</span>(y[<span class="pl-c1">116</span>],up)))<span class="pl-k">/</span>ctp
    dy[<span class="pl-c1">117</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">46</span>]<span class="pl-k">-</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">117</span>]<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">39</span>])<span class="pl-k">/</span>Rpn
    dy[<span class="pl-c1">118</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">47</span>]<span class="pl-k">-</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">118</span>]<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">40</span>])<span class="pl-k">/</span>Rpn
    dy[<span class="pl-c1">119</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">48</span>]<span class="pl-k">-</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">119</span>]<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">41</span>])<span class="pl-k">/</span>Rpn
    dy[<span class="pl-c1">120</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">49</span>]<span class="pl-k">-</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">120</span>]<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">42</span>])<span class="pl-k">/</span>Rpn
    dy[<span class="pl-c1">121</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">50</span>]<span class="pl-k">-</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">121</span>]<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">43</span>])<span class="pl-k">/</span>Rpn
    dy[<span class="pl-c1">122</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">51</span>]<span class="pl-k">-</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">122</span>]<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">44</span>])<span class="pl-k">/</span>Rpn
    dy[<span class="pl-c1">123</span>] <span class="pl-k">=</span> <span class="pl-k">-</span><span class="pl-c1">2.</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">52</span>]<span class="pl-k">-</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">123</span>]<span class="pl-k">+</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">45</span>])<span class="pl-k">/</span>Rpn
    dy[<span class="pl-c1">124</span>] <span class="pl-k">=</span> <span class="pl-c1">2.</span><span class="pl-k">*</span>Dsn<span class="pl-k">*</span>(y[<span class="pl-c1">46</span>]<span class="pl-k">+</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">124</span>]<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">53</span>])<span class="pl-k">/</span>Rpn<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>kn<span class="pl-k">*</span>(y[<span class="pl-c1">11</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">124</span>]<span class="pl-k">*</span>ctn<span class="pl-k">+</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">124</span>]<span class="pl-k">*</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">95</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">77</span>]<span class="pl-k">+</span>.<span class="pl-c1">5e-1</span><span class="pl-k">-</span><span class="pl-c1">2.325</span><span class="pl-k">*</span><span class="pl-c1">exp</span>(<span class="pl-k">-</span><span class="pl-c1">100.</span><span class="pl-k">*</span>y[<span class="pl-c1">124</span>]<span class="pl-k">^</span><span class="pl-c1">1.15</span>)<span class="pl-k">+</span>.<span class="pl-c1">1721</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">20.000000</span><span class="pl-k">*</span>y[<span class="pl-c1">124</span>]<span class="pl-k">-</span><span class="pl-c1">21.000000</span>)<span class="pl-k">+</span>.<span class="pl-c1">25e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">39.347962</span><span class="pl-k">*</span>y[<span class="pl-c1">124</span>]<span class="pl-k">-</span><span class="pl-c1">37.241379</span>)<span class="pl-k">+</span>.<span class="pl-c1">34e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">89.411765</span><span class="pl-k">*</span>y[<span class="pl-c1">124</span>]<span class="pl-k">-</span><span class="pl-c1">6.0294118</span>)<span class="pl-k">+</span>.<span class="pl-c1">2e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">7.0422535</span><span class="pl-k">*</span>y[<span class="pl-c1">124</span>]<span class="pl-k">-</span><span class="pl-c1">1.3661972</span>)<span class="pl-k">+</span>.<span class="pl-c1">155e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">77.519380</span><span class="pl-k">*</span>y[<span class="pl-c1">124</span>]<span class="pl-k">-</span><span class="pl-c1">8.1395349</span>)))<span class="pl-k">/</span>ctn
    dy[<span class="pl-c1">125</span>] <span class="pl-k">=</span> <span class="pl-c1">2.</span><span class="pl-k">*</span>Dsn<span class="pl-k">*</span>(y[<span class="pl-c1">47</span>]<span class="pl-k">+</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">125</span>]<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">54</span>])<span class="pl-k">/</span>Rpn<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>kn<span class="pl-k">*</span>(y[<span class="pl-c1">12</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">125</span>]<span class="pl-k">*</span>ctn<span class="pl-k">+</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">125</span>]<span class="pl-k">*</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">96</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">78</span>]<span class="pl-k">+</span>.<span class="pl-c1">5e-1</span><span class="pl-k">-</span><span class="pl-c1">2.325</span><span class="pl-k">*</span><span class="pl-c1">exp</span>(<span class="pl-k">-</span><span class="pl-c1">100.</span><span class="pl-k">*</span>y[<span class="pl-c1">125</span>]<span class="pl-k">^</span><span class="pl-c1">1.15</span>)<span class="pl-k">+</span>.<span class="pl-c1">1721</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">20.000000</span><span class="pl-k">*</span>y[<span class="pl-c1">125</span>]<span class="pl-k">-</span><span class="pl-c1">21.000000</span>)<span class="pl-k">+</span>.<span class="pl-c1">25e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">39.347962</span><span class="pl-k">*</span>y[<span class="pl-c1">125</span>]<span class="pl-k">-</span><span class="pl-c1">37.241379</span>)<span class="pl-k">+</span>.<span class="pl-c1">34e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">89.411765</span><span class="pl-k">*</span>y[<span class="pl-c1">125</span>]<span class="pl-k">-</span><span class="pl-c1">6.0294118</span>)<span class="pl-k">+</span>.<span class="pl-c1">2e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">7.0422535</span><span class="pl-k">*</span>y[<span class="pl-c1">125</span>]<span class="pl-k">-</span><span class="pl-c1">1.3661972</span>)<span class="pl-k">+</span>.<span class="pl-c1">155e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">77.519380</span><span class="pl-k">*</span>y[<span class="pl-c1">125</span>]<span class="pl-k">-</span><span class="pl-c1">8.1395349</span>)))<span class="pl-k">/</span>ctn
    dy[<span class="pl-c1">126</span>] <span class="pl-k">=</span> <span class="pl-c1">2.</span><span class="pl-k">*</span>Dsn<span class="pl-k">*</span>(y[<span class="pl-c1">48</span>]<span class="pl-k">+</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">126</span>]<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">55</span>])<span class="pl-k">/</span>Rpn<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>kn<span class="pl-k">*</span>(y[<span class="pl-c1">13</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">126</span>]<span class="pl-k">*</span>ctn<span class="pl-k">+</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">126</span>]<span class="pl-k">*</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">97</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">79</span>]<span class="pl-k">+</span>.<span class="pl-c1">5e-1</span><span class="pl-k">-</span><span class="pl-c1">2.325</span><span class="pl-k">*</span><span class="pl-c1">exp</span>(<span class="pl-k">-</span><span class="pl-c1">100.</span><span class="pl-k">*</span>y[<span class="pl-c1">126</span>]<span class="pl-k">^</span><span class="pl-c1">1.15</span>)<span class="pl-k">+</span>.<span class="pl-c1">1721</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">20.000000</span><span class="pl-k">*</span>y[<span class="pl-c1">126</span>]<span class="pl-k">-</span><span class="pl-c1">21.000000</span>)<span class="pl-k">+</span>.<span class="pl-c1">25e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">39.347962</span><span class="pl-k">*</span>y[<span class="pl-c1">126</span>]<span class="pl-k">-</span><span class="pl-c1">37.241379</span>)<span class="pl-k">+</span>.<span class="pl-c1">34e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">89.411765</span><span class="pl-k">*</span>y[<span class="pl-c1">126</span>]<span class="pl-k">-</span><span class="pl-c1">6.0294118</span>)<span class="pl-k">+</span>.<span class="pl-c1">2e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">7.0422535</span><span class="pl-k">*</span>y[<span class="pl-c1">126</span>]<span class="pl-k">-</span><span class="pl-c1">1.3661972</span>)<span class="pl-k">+</span>.<span class="pl-c1">155e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">77.519380</span><span class="pl-k">*</span>y[<span class="pl-c1">126</span>]<span class="pl-k">-</span><span class="pl-c1">8.1395349</span>)))<span class="pl-k">/</span>ctn
    dy[<span class="pl-c1">127</span>] <span class="pl-k">=</span> <span class="pl-c1">2.</span><span class="pl-k">*</span>Dsn<span class="pl-k">*</span>(y[<span class="pl-c1">49</span>]<span class="pl-k">+</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">127</span>]<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">56</span>])<span class="pl-k">/</span>Rpn<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>kn<span class="pl-k">*</span>(y[<span class="pl-c1">14</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">127</span>]<span class="pl-k">*</span>ctn<span class="pl-k">+</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">127</span>]<span class="pl-k">*</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">98</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">80</span>]<span class="pl-k">+</span>.<span class="pl-c1">5e-1</span><span class="pl-k">-</span><span class="pl-c1">2.325</span><span class="pl-k">*</span><span class="pl-c1">exp</span>(<span class="pl-k">-</span><span class="pl-c1">100.</span><span class="pl-k">*</span>y[<span class="pl-c1">127</span>]<span class="pl-k">^</span><span class="pl-c1">1.15</span>)<span class="pl-k">+</span>.<span class="pl-c1">1721</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">20.000000</span><span class="pl-k">*</span>y[<span class="pl-c1">127</span>]<span class="pl-k">-</span><span class="pl-c1">21.000000</span>)<span class="pl-k">+</span>.<span class="pl-c1">25e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">39.347962</span><span class="pl-k">*</span>y[<span class="pl-c1">127</span>]<span class="pl-k">-</span><span class="pl-c1">37.241379</span>)<span class="pl-k">+</span>.<span class="pl-c1">34e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">89.411765</span><span class="pl-k">*</span>y[<span class="pl-c1">127</span>]<span class="pl-k">-</span><span class="pl-c1">6.0294118</span>)<span class="pl-k">+</span>.<span class="pl-c1">2e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">7.0422535</span><span class="pl-k">*</span>y[<span class="pl-c1">127</span>]<span class="pl-k">-</span><span class="pl-c1">1.3661972</span>)<span class="pl-k">+</span>.<span class="pl-c1">155e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">77.519380</span><span class="pl-k">*</span>y[<span class="pl-c1">127</span>]<span class="pl-k">-</span><span class="pl-c1">8.1395349</span>)))<span class="pl-k">/</span>ctn
    dy[<span class="pl-c1">128</span>] <span class="pl-k">=</span> <span class="pl-c1">2.</span><span class="pl-k">*</span>Dsn<span class="pl-k">*</span>(y[<span class="pl-c1">50</span>]<span class="pl-k">+</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">128</span>]<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">57</span>])<span class="pl-k">/</span>Rpn<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>kn<span class="pl-k">*</span>(y[<span class="pl-c1">15</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">128</span>]<span class="pl-k">*</span>ctn<span class="pl-k">+</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">128</span>]<span class="pl-k">*</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">99</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">81</span>]<span class="pl-k">+</span>.<span class="pl-c1">5e-1</span><span class="pl-k">-</span><span class="pl-c1">2.325</span><span class="pl-k">*</span><span class="pl-c1">exp</span>(<span class="pl-k">-</span><span class="pl-c1">100.</span><span class="pl-k">*</span>y[<span class="pl-c1">128</span>]<span class="pl-k">^</span><span class="pl-c1">1.15</span>)<span class="pl-k">+</span>.<span class="pl-c1">1721</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">20.000000</span><span class="pl-k">*</span>y[<span class="pl-c1">128</span>]<span class="pl-k">-</span><span class="pl-c1">21.000000</span>)<span class="pl-k">+</span>.<span class="pl-c1">25e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">39.347962</span><span class="pl-k">*</span>y[<span class="pl-c1">128</span>]<span class="pl-k">-</span><span class="pl-c1">37.241379</span>)<span class="pl-k">+</span>.<span class="pl-c1">34e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">89.411765</span><span class="pl-k">*</span>y[<span class="pl-c1">128</span>]<span class="pl-k">-</span><span class="pl-c1">6.0294118</span>)<span class="pl-k">+</span>.<span class="pl-c1">2e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">7.0422535</span><span class="pl-k">*</span>y[<span class="pl-c1">128</span>]<span class="pl-k">-</span><span class="pl-c1">1.3661972</span>)<span class="pl-k">+</span>.<span class="pl-c1">155e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">77.519380</span><span class="pl-k">*</span>y[<span class="pl-c1">128</span>]<span class="pl-k">-</span><span class="pl-c1">8.1395349</span>)))<span class="pl-k">/</span>ctn
    dy[<span class="pl-c1">129</span>] <span class="pl-k">=</span> <span class="pl-c1">2.</span><span class="pl-k">*</span>Dsn<span class="pl-k">*</span>(y[<span class="pl-c1">51</span>]<span class="pl-k">+</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">129</span>]<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">58</span>])<span class="pl-k">/</span>Rpn<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>kn<span class="pl-k">*</span>(y[<span class="pl-c1">16</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">129</span>]<span class="pl-k">*</span>ctn<span class="pl-k">+</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">129</span>]<span class="pl-k">*</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">100</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">82</span>]<span class="pl-k">+</span>.<span class="pl-c1">5e-1</span><span class="pl-k">-</span><span class="pl-c1">2.325</span><span class="pl-k">*</span><span class="pl-c1">exp</span>(<span class="pl-k">-</span><span class="pl-c1">100.</span><span class="pl-k">*</span>y[<span class="pl-c1">129</span>]<span class="pl-k">^</span><span class="pl-c1">1.15</span>)<span class="pl-k">+</span>.<span class="pl-c1">1721</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">20.000000</span><span class="pl-k">*</span>y[<span class="pl-c1">129</span>]<span class="pl-k">-</span><span class="pl-c1">21.000000</span>)<span class="pl-k">+</span>.<span class="pl-c1">25e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">39.347962</span><span class="pl-k">*</span>y[<span class="pl-c1">129</span>]<span class="pl-k">-</span><span class="pl-c1">37.241379</span>)<span class="pl-k">+</span>.<span class="pl-c1">34e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">89.411765</span><span class="pl-k">*</span>y[<span class="pl-c1">129</span>]<span class="pl-k">-</span><span class="pl-c1">6.0294118</span>)<span class="pl-k">+</span>.<span class="pl-c1">2e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">7.0422535</span><span class="pl-k">*</span>y[<span class="pl-c1">129</span>]<span class="pl-k">-</span><span class="pl-c1">1.3661972</span>)<span class="pl-k">+</span>.<span class="pl-c1">155e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">77.519380</span><span class="pl-k">*</span>y[<span class="pl-c1">129</span>]<span class="pl-k">-</span><span class="pl-c1">8.1395349</span>)))<span class="pl-k">/</span>ctn
    dy[<span class="pl-c1">130</span>] <span class="pl-k">=</span> <span class="pl-c1">2.</span><span class="pl-k">*</span>Dsn<span class="pl-k">*</span>(y[<span class="pl-c1">52</span>]<span class="pl-k">+</span><span class="pl-c1">3.</span><span class="pl-k">*</span>y[<span class="pl-c1">130</span>]<span class="pl-k">-</span><span class="pl-c1">4.</span><span class="pl-k">*</span>y[<span class="pl-c1">59</span>])<span class="pl-k">/</span>Rpn<span class="pl-k">+</span><span class="pl-c1">2.</span><span class="pl-k">*</span>kn<span class="pl-k">*</span>(y[<span class="pl-c1">17</span>]<span class="pl-k">*</span>c0)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">130</span>]<span class="pl-k">*</span>ctn<span class="pl-k">+</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span>(y[<span class="pl-c1">130</span>]<span class="pl-k">*</span>ctn)<span class="pl-k">^</span>.<span class="pl-c1">5</span><span class="pl-k">*</span><span class="pl-c1">sinh</span>(.<span class="pl-c1">5</span><span class="pl-k">*</span>F<span class="pl-k">/</span>R<span class="pl-k">/</span>Tr<span class="pl-k">*</span>(y[<span class="pl-c1">101</span>]<span class="pl-k">-</span><span class="pl-c1">1.</span><span class="pl-k">*</span>y[<span class="pl-c1">83</span>]<span class="pl-k">+</span>.<span class="pl-c1">5e-1</span><span class="pl-k">-</span><span class="pl-c1">2.325</span><span class="pl-k">*</span><span class="pl-c1">exp</span>(<span class="pl-k">-</span><span class="pl-c1">100.</span><span class="pl-k">*</span>y[<span class="pl-c1">130</span>]<span class="pl-k">^</span><span class="pl-c1">1.15</span>)<span class="pl-k">+</span>.<span class="pl-c1">1721</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">20.000000</span><span class="pl-k">*</span>y[<span class="pl-c1">130</span>]<span class="pl-k">-</span><span class="pl-c1">21.000000</span>)<span class="pl-k">+</span>.<span class="pl-c1">25e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">39.347962</span><span class="pl-k">*</span>y[<span class="pl-c1">130</span>]<span class="pl-k">-</span><span class="pl-c1">37.241379</span>)<span class="pl-k">+</span>.<span class="pl-c1">34e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">89.411765</span><span class="pl-k">*</span>y[<span class="pl-c1">130</span>]<span class="pl-k">-</span><span class="pl-c1">6.0294118</span>)<span class="pl-k">+</span>.<span class="pl-c1">2e-2</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">7.0422535</span><span class="pl-k">*</span>y[<span class="pl-c1">130</span>]<span class="pl-k">-</span><span class="pl-c1">1.3661972</span>)<span class="pl-k">+</span>.<span class="pl-c1">155e-1</span><span class="pl-k">*</span><span class="pl-c1">tanh</span>(<span class="pl-c1">77.519380</span><span class="pl-k">*</span>y[<span class="pl-c1">130</span>]<span class="pl-k">-</span><span class="pl-c1">8.1395349</span>)))<span class="pl-k">/</span>ctn
    dy[<span class="pl-c1">131</span>] <span class="pl-k">=</span> y[<span class="pl-c1">131</span>]<span class="pl-k">-</span>y[<span class="pl-c1">85</span>]<span class="pl-k">+</span>y[<span class="pl-c1">102</span>]<span class="pl-k">+</span> (current<span class="pl-k">*</span>Kr)

<span class="pl-k">end</span>
<span class="pl-k">function</span> <span class="pl-en">ocp_cathode</span>(theta_p,up)
    Up <span class="pl-k">=</span> (<span class="pl-k">-</span><span class="pl-c1">5.057</span><span class="pl-k">-</span><span class="pl-c1">13.6</span><span class="pl-k">*</span>theta_p<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span><span class="pl-c1">121.6</span><span class="pl-k">*</span>theta_p<span class="pl-k">^</span><span class="pl-c1">4</span><span class="pl-k">-</span><span class="pl-c1">185.1</span><span class="pl-k">*</span>theta_p<span class="pl-k">^</span><span class="pl-c1">6</span><span class="pl-k">-</span><span class="pl-c1">45.43</span><span class="pl-k">*</span>theta_p<span class="pl-k">^</span><span class="pl-c1">8</span><span class="pl-k">+</span><span class="pl-c1">127.7</span><span class="pl-k">*</span>theta_p<span class="pl-k">^</span><span class="pl-c1">10</span>)<span class="pl-k">/</span>(<span class="pl-k">-</span><span class="pl-c1">1</span><span class="pl-k">-</span><span class="pl-c1">5.04</span><span class="pl-k">*</span>theta_p<span class="pl-k">^</span><span class="pl-c1">2</span><span class="pl-k">+</span><span class="pl-c1">32.3</span><span class="pl-k">*</span>theta_p<span class="pl-k">^</span><span class="pl-c1">4</span><span class="pl-k">-</span><span class="pl-c1">40.95</span><span class="pl-k">*</span>theta_p<span class="pl-k">^</span><span class="pl-c1">6</span><span class="pl-k">-</span><span class="pl-c1">25.94</span><span class="pl-k">*</span>theta_p<span class="pl-k">^</span><span class="pl-c1">8</span><span class="pl-k">+</span><span class="pl-c1">40.63</span><span class="pl-k">*</span>theta_p<span class="pl-k">^</span><span class="pl-c1">10</span>)

<span class="pl-k">end</span>
yyy <span class="pl-k">=</span> <span class="pl-k">function</span>(pars<span class="pl-k">::</span><span class="pl-c1">Array{Float64}</span>)
    socn<span class="pl-k">=</span>pars[<span class="pl-c1">24</span>]
    socp<span class="pl-k">=</span>pars[<span class="pl-c1">25</span>]
    y0 = [1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,(-0.5057e1 - 0.136e2 * socp ^ 2 + 0.1216e3 * socp ^ 4 - 0.1851e3 * socp ^ 6 - 0.4543e2 * socp ^ 8 + 0.1277e3 * socp ^ 10) / (-0.1e1 - 0.504e1 * socp ^ 2 + 0.323e2 * socp ^ 4 - 0.4095e2 * socp ^ 6 - 0.2594e2 * socp ^ 8 + 0.4063e2 * socp ^ 10),(-0.5057e1 - 0.136e2 * socp ^ 2 + 0.1216e3 * socp ^ 4 - 0.1851e3 * socp ^ 6 - 0.4543e2 * socp ^ 8 + 0.1277e3 * socp ^ 10) / (-0.1e1 - 0.504e1 * socp ^ 2 + 0.323e2 * socp ^ 4 - 0.4095e2 * socp ^ 6 - 0.2594e2 * socp ^ 8 + 0.4063e2 * socp ^ 10),(-0.5057e1 - 0.136e2 * socp ^ 2 + 0.1216e3 * socp ^ 4 - 0.1851e3 * socp ^ 6 - 0.4543e2 * socp ^ 8 + 0.1277e3 * socp ^ 10) / (-0.1e1 - 0.504e1 * socp ^ 2 + 0.323e2 * socp ^ 4 - 0.4095e2 * socp ^ 6 - 0.2594e2 * socp ^ 8 + 0.4063e2 * socp ^ 10),(-0.5057e1 - 0.136e2 * socp ^ 2 + 0.1216e3 * socp ^ 4 - 0.1851e3 * socp ^ 6 - 0.4543e2 * socp ^ 8 + 0.1277e3 * socp ^ 10) / (-0.1e1 - 0.504e1 * socp ^ 2 + 0.323e2 * socp ^ 4 - 0.4095e2 * socp ^ 6 - 0.2594e2 * socp ^ 8 + 0.4063e2 * socp ^ 10),(-0.5057e1 - 0.136e2 * socp ^ 2 + 0.1216e3 * socp ^ 4 - 0.1851e3 * socp ^ 6 - 0.4543e2 * socp ^ 8 + 0.1277e3 * socp ^ 10) / (-0.1e1 - 0.504e1 * socp ^ 2 + 0.323e2 * socp ^ 4 - 0.4095e2 * socp ^ 6 - 0.2594e2 * socp ^ 8 + 0.4063e2 * socp ^ 10),(-0.5057e1 - 0.136e2 * socp ^ 2 + 0.1216e3 * socp ^ 4 - 0.1851e3 * socp ^ 6 - 0.4543e2 * socp ^ 8 + 0.1277e3 * socp ^ 10) / (-0.1e1 - 0.504e1 * socp ^ 2 + 0.323e2 * socp ^ 4 - 0.4095e2 * socp ^ 6 - 0.2594e2 * socp ^ 8 + 0.4063e2 * socp ^ 10),(-0.5057e1 - 0.136e2 * socp ^ 2 + 0.1216e3 * socp ^ 4 - 0.1851e3 * socp ^ 6 - 0.4543e2 * socp ^ 8 + 0.1277e3 * socp ^ 10) / (-0.1e1 - 0.504e1 * socp ^ 2 + 0.323e2 * socp ^ 4 - 0.4095e2 * socp ^ 6 - 0.2594e2 * socp ^ 8 + 0.4063e2 * socp ^ 10),(-0.5057e1 - 0.136e2 * socp ^ 2 + 0.1216e3 * socp ^ 4 - 0.1851e3 * socp ^ 6 - 0.4543e2 * socp ^ 8 + 0.1277e3 * socp ^ 10) / (-0.1e1 - 0.504e1 * socp ^ 2 + 0.323e2 * socp ^ 4 - 0.4095e2 * socp ^ 6 - 0.2594e2 * socp ^ 8 + 0.4063e2 * socp ^ 10),(-0.5057e1 - 0.136e2 * socp ^ 2 + 0.1216e3 * socp ^ 4 - 0.1851e3 * socp ^ 6 - 0.4543e2 * socp ^ 8 + 0.1277e3 * socp ^ 10) / (-0.1e1 - 0.504e1 * socp ^ 2 + 0.323e2 * socp ^ 4 - 0.4095e2 * socp ^ 6 - 0.2594e2 * socp ^ 8 + 0.4063e2 * socp ^ 10),-0.5e-1 + 0.2325e1 * exp(-0.100e3 * socn ^ 0.115e1) - 0.1721e0 * tanh(0.20000000e2 * socn - 0.21000000e2) - 0.25e-2 * tanh(0.39347962e2 * socn - 0.37241379e2) - 0.34e-1 * tanh(0.89411765e2 * socn - 0.60294118e1) - 0.2e-2 * tanh(0.70422535e1 * socn - 0.13661972e1) - 0.155e-1 * tanh(0.77519380e2 * socn - 0.81395349e1),-0.5e-1 + 0.2325e1 * exp(-0.100e3 * socn ^ 0.115e1) - 0.1721e0 * tanh(0.20000000e2 * socn - 0.21000000e2) - 0.25e-2 * tanh(0.39347962e2 * socn - 0.37241379e2) - 0.34e-1 * tanh(0.89411765e2 * socn - 0.60294118e1) - 0.2e-2 * tanh(0.70422535e1 * socn - 0.13661972e1) - 0.155e-1 * tanh(0.77519380e2 * socn - 0.81395349e1),-0.5e-1 + 0.2325e1 * exp(-0.100e3 * socn ^ 0.115e1) - 0.1721e0 * tanh(0.20000000e2 * socn - 0.21000000e2) - 0.25e-2 * tanh(0.39347962e2 * socn - 0.37241379e2) - 0.34e-1 * tanh(0.89411765e2 * socn - 0.60294118e1) - 0.2e-2 * tanh(0.70422535e1 * socn - 0.13661972e1) - 0.155e-1 * tanh(0.77519380e2 * socn - 0.81395349e1),-0.5e-1 + 0.2325e1 * exp(-0.100e3 * socn ^ 0.115e1) - 0.1721e0 * tanh(0.20000000e2 * socn - 0.21000000e2) - 0.25e-2 * tanh(0.39347962e2 * socn - 0.37241379e2) - 0.34e-1 * tanh(0.89411765e2 * socn - 0.60294118e1) - 0.2e-2 * tanh(0.70422535e1 * socn - 0.13661972e1) - 0.155e-1 * tanh(0.77519380e2 * socn - 0.81395349e1),-0.5e-1 + 0.2325e1 * exp(-0.100e3 * socn ^ 0.115e1) - 0.1721e0 * tanh(0.20000000e2 * socn - 0.21000000e2) - 0.25e-2 * tanh(0.39347962e2 * socn - 0.37241379e2) - 0.34e-1 * tanh(0.89411765e2 * socn - 0.60294118e1) - 0.2e-2 * tanh(0.70422535e1 * socn - 0.13661972e1) - 0.155e-1 * tanh(0.77519380e2 * socn - 0.81395349e1),-0.5e-1 + 0.2325e1 * exp(-0.100e3 * socn ^ 0.115e1) - 0.1721e0 * tanh(0.20000000e2 * socn - 0.21000000e2) - 0.25e-2 * tanh(0.39347962e2 * socn - 0.37241379e2) - 0.34e-1 * tanh(0.89411765e2 * socn - 0.60294118e1) - 0.2e-2 * tanh(0.70422535e1 * socn - 0.13661972e1) - 0.155e-1 * tanh(0.77519380e2 * socn - 0.81395349e1),-0.5e-1 + 0.2325e1 * exp(-0.100e3 * socn ^ 0.115e1) - 0.1721e0 * tanh(0.20000000e2 * socn - 0.21000000e2) - 0.25e-2 * tanh(0.39347962e2 * socn - 0.37241379e2) - 0.34e-1 * tanh(0.89411765e2 * socn - 0.60294118e1) - 0.2e-2 * tanh(0.70422535e1 * socn - 0.13661972e1) - 0.155e-1 * tanh(0.77519380e2 * socn - 0.81395349e1),-0.5e-1 + 0.2325e1 * exp(-0.100e3 * socn ^ 0.115e1) - 0.1721e0 * tanh(0.20000000e2 * socn - 0.21000000e2) - 0.25e-2 * tanh(0.39347962e2 * socn - 0.37241379e2) - 0.34e-1 * tanh(0.89411765e2 * socn - 0.60294118e1) - 0.2e-2 * tanh(0.70422535e1 * socn - 0.13661972e1) - 0.155e-1 * tanh(0.77519380e2 * socn - 0.81395349e1),-0.5e-1 + 0.2325e1 * exp(-0.100e3 * socn ^ 0.115e1) - 0.1721e0 * tanh(0.20000000e2 * socn - 0.21000000e2) - 0.25e-2 * tanh(0.39347962e2 * socn - 0.37241379e2) - 0.34e-1 * tanh(0.89411765e2 * socn - 0.60294118e1) - 0.2e-2 * tanh(0.70422535e1 * socn - 0.13661972e1) - 0.155e-1 * tanh(0.77519380e2 * socn - 0.81395349e1),socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socp,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,socn,(-0.5057e1 - 0.136e2 * socp ^ 2 + 0.1216e3 * socp ^ 4 - 0.1851e3 * socp ^ 6 - 0.4543e2 * socp ^ 8 + 0.1277e3 * socp ^ 10) / (-0.1e1 - 0.504e1 * socp ^ 2 + 0.323e2 * socp ^ 4 - 0.4095e2 * socp ^ 6 - 0.2594e2 * socp ^ 8 + 0.4063e2 * socp ^ 10) + 0.5e-1 - 0.2325e1 * exp(-0.100e3 * socn ^ 0.115e1) + 0.1721e0 * tanh(0.20000000e2 * socn - 0.21000000e2) + 0.25e-2 * tanh(0.39347962e2 * socn - 0.37241379e2) + 0.34e-1 * tanh(0.89411765e2 * socn - 0.60294118e1) + 0.2e-2 * tanh(0.70422535e1 * socn - 0.13661972e1) + 0.155e-1 * tanh(0.77519380e2 * socn - 0.81395349e1)]

<span class="pl-k">end</span>
y0<span class="pl-k">=</span><span class="pl-c1">zeros</span>(<span class="pl-c1">131</span>)

n<span class="pl-k">=</span><span class="pl-c1">length</span>(y0)
MM<span class="pl-k">=</span><span class="pl-c1">zeros</span>((n,n))
node <span class="pl-k">=</span> <span class="pl-c1">59</span>

<span class="pl-k">for</span> i <span class="pl-k">in</span> <span class="pl-c1">1</span><span class="pl-k">:</span>node
    MM[i,i]<span class="pl-k">=</span><span class="pl-c1">1.</span>
<span class="pl-k">end</span>

pars <span class="pl-k">=</span> [<span class="pl-c1">7.33234842e-08</span>,<span class="pl-c1">6.40146313e-12</span>,<span class="pl-c1">1.56954148e-13</span>,<span class="pl-c1">1.65301662e-06</span>,
  <span class="pl-c1">1.28277079e-05</span>,<span class="pl-c1">1.39115369e+00</span>,<span class="pl-c1">1.70413971e+00</span>,<span class="pl-c1">1.93944836e+00</span>,
  <span class="pl-c1">1.15245117e+03</span>,<span class="pl-c1">3.46144727e+04</span>,<span class="pl-c1">4.02951641e+04</span>,<span class="pl-c1">3.24118063e-02</span>,
  <span class="pl-c1">2.70097144e-02</span>,<span class="pl-c1">5.20209372e-01</span>,<span class="pl-c1">3.74625146e-01</span>,<span class="pl-c1">4.16417062e-01</span>,
  <span class="pl-c1">5.51529622e-09</span>,<span class="pl-c1">6.95793778e-09</span>,<span class="pl-c1">4.91284482e-05</span>,<span class="pl-c1">4.88584483e-05</span>,
  <span class="pl-c1">1.28054144e-05</span>,<span class="pl-c1">1.38146591e+02</span>,<span class="pl-c1">9.15019798e+00</span>,<span class="pl-c1">9.78830695e-01</span>,
  <span class="pl-c1">4.58723247e-01</span>,<span class="pl-c1">4.32648301e-01</span>,<span class="pl-c1">0.02</span>]
y0 <span class="pl-k">=</span> <span class="pl-c1">yyy</span>(pars)
dy <span class="pl-k">=</span> <span class="pl-c1">zeros</span>(n)
f <span class="pl-k">=</span> (dy,y) <span class="pl-k">-&gt;</span> <span class="pl-c1">P2D2c</span>(<span class="pl-c1">zeros</span>(n),y,pars,<span class="pl-c1">0.</span>)
<span class="pl-k">using</span> ForwardDiff

<span class="pl-c"><span class="pl-c">#</span> Really long compile time</span>
ForwardDiff<span class="pl-k">.</span><span class="pl-c1">jacobian</span>(f,dy,y0)</pre></div>
<p dir="auto">I was trying to provide myself with a large collection (&gt;500) of test functions for optimization and came across an interesting benchmark for compiler performance. It stresses the ability to infer <em>long</em> function bodies. To understand what the body looks like, follow the URL in the <code class="notranslate">download</code> statement (and look at the expression immediately after the <code class="notranslate">obj =e=</code> statement).</p>
<p dir="auto">Here's the script:</p>
<div class="highlight highlight-source-julia notranslate position-relative overflow-auto" dir="auto" data-snippet-clipboard-copy-content="if !isfile(&quot;chebyqad.gms&quot;)
    download(&quot;http://www.gamsworld.org/performance/princetonlib/raw/cute/chebyqad.gms&quot;, &quot;chebyqad.gms&quot;)
end

# Some definitions we'll need
sqr(x) = x*x
arctan(x) = atan(x)
const pi2 = π/2

## Add type-annotations to variables that start with 'x'. (Doesn't help.)
function annotate!(ex::Expr)
    for i = 1:length(ex.args)
        ex.args[i] = annotate!(ex.args[i])
    end
    return ex
end
function annotate!(sym::Symbol)
    if startswith(string(sym), 'x')
        return :($sym::Float64)
    end
    return sym
end
annotate!(arg) = arg

println(&quot;parsing time:&quot;)
@time open(&quot;chebyqad.gms&quot;) do io
    while true
        line = readline(io)
        if !startswith(line, &quot;  obj =e=&quot;)
            continue
        end
        str = readuntil(io, ';')
        body = Meta.parse(str)
        if isa(body, Expr) &amp;&amp; body.head == :toplevel
            @assert length(body.args) == 1
            body = body.args[1]
        end
        # body = annotate!(body)
        vars = [Symbol(&quot;x&quot;,i) for i = 1:50]
        destruct = Expr(:tuple, vars...)
        @eval function f(x)
                  $destruct = x
                  $body
        end
        break
    end
end

println(&quot;done parsing, about to call f&quot;)
@time f(rand(50))
@time f(rand(50))"><pre class="notranslate"><span class="pl-k">if</span> <span class="pl-k">!</span><span class="pl-c1">isfile</span>(<span class="pl-s"><span class="pl-pds">"</span>chebyqad.gms<span class="pl-pds">"</span></span>)
    <span class="pl-c1">download</span>(<span class="pl-s"><span class="pl-pds">"</span>http://www.gamsworld.org/performance/princetonlib/raw/cute/chebyqad.gms<span class="pl-pds">"</span></span>, <span class="pl-s"><span class="pl-pds">"</span>chebyqad.gms<span class="pl-pds">"</span></span>)
<span class="pl-k">end</span>

<span class="pl-c"><span class="pl-c">#</span> Some definitions we'll need</span>
<span class="pl-en">sqr</span>(x) <span class="pl-k">=</span> x<span class="pl-k">*</span>x
<span class="pl-en">arctan</span>(x) <span class="pl-k">=</span> <span class="pl-c1">atan</span>(x)
<span class="pl-k">const</span> pi2 <span class="pl-k">=</span> π<span class="pl-k">/</span><span class="pl-c1">2</span>

<span class="pl-c"><span class="pl-c">#</span># Add type-annotations to variables that start with 'x'. (Doesn't help.)</span>
<span class="pl-k">function</span> <span class="pl-en">annotate!</span>(ex<span class="pl-k">::</span><span class="pl-c1">Expr</span>)
    <span class="pl-k">for</span> i <span class="pl-k">=</span> <span class="pl-c1">1</span><span class="pl-k">:</span><span class="pl-c1">length</span>(ex<span class="pl-k">.</span>args)
        ex<span class="pl-k">.</span>args[i] <span class="pl-k">=</span> <span class="pl-c1">annotate!</span>(ex<span class="pl-k">.</span>args[i])
    <span class="pl-k">end</span>
    <span class="pl-k">return</span> ex
<span class="pl-k">end</span>
<span class="pl-k">function</span> <span class="pl-en">annotate!</span>(sym<span class="pl-k">::</span><span class="pl-c1">Symbol</span>)
    <span class="pl-k">if</span> <span class="pl-c1">startswith</span>(<span class="pl-c1">string</span>(sym), <span class="pl-s"><span class="pl-pds">'</span>x<span class="pl-pds">'</span></span>)
        <span class="pl-k">return</span> :(<span class="pl-k">$</span>sym<span class="pl-k">::</span><span class="pl-c1">Float64</span>)
    <span class="pl-k">end</span>
    <span class="pl-k">return</span> sym
<span class="pl-k">end</span>
<span class="pl-en">annotate!</span>(arg) <span class="pl-k">=</span> arg

<span class="pl-c1">println</span>(<span class="pl-s"><span class="pl-pds">"</span>parsing time:<span class="pl-pds">"</span></span>)
<span class="pl-c1">@time</span> <span class="pl-c1">open</span>(<span class="pl-s"><span class="pl-pds">"</span>chebyqad.gms<span class="pl-pds">"</span></span>) <span class="pl-k">do</span> io
    <span class="pl-k">while</span> <span class="pl-c1">true</span>
        line <span class="pl-k">=</span> <span class="pl-c1">readline</span>(io)
        <span class="pl-k">if</span> <span class="pl-k">!</span><span class="pl-c1">startswith</span>(line, <span class="pl-s"><span class="pl-pds">"</span>  obj =e=<span class="pl-pds">"</span></span>)
            <span class="pl-k">continue</span>
        <span class="pl-k">end</span>
        str <span class="pl-k">=</span> <span class="pl-c1">readuntil</span>(io, <span class="pl-s"><span class="pl-pds">'</span>;<span class="pl-pds">'</span></span>)
        body <span class="pl-k">=</span> Meta<span class="pl-k">.</span><span class="pl-c1">parse</span>(str)
        <span class="pl-k">if</span> <span class="pl-c1">isa</span>(body, Expr) <span class="pl-k">&amp;&amp;</span> body<span class="pl-k">.</span>head <span class="pl-k">==</span> <span class="pl-c1">:toplevel</span>
            <span class="pl-c1">@assert</span> <span class="pl-c1">length</span>(body<span class="pl-k">.</span>args) <span class="pl-k">==</span> <span class="pl-c1">1</span>
            body <span class="pl-k">=</span> body<span class="pl-k">.</span>args[<span class="pl-c1">1</span>]
        <span class="pl-k">end</span>
        <span class="pl-c"><span class="pl-c">#</span> body = annotate!(body)</span>
        vars <span class="pl-k">=</span> [<span class="pl-c1">Symbol</span>(<span class="pl-s"><span class="pl-pds">"</span>x<span class="pl-pds">"</span></span>,i) <span class="pl-k">for</span> i <span class="pl-k">=</span> <span class="pl-c1">1</span><span class="pl-k">:</span><span class="pl-c1">50</span>]
        destruct <span class="pl-k">=</span> <span class="pl-c1">Expr</span>(<span class="pl-c1">:tuple</span>, vars<span class="pl-k">...</span>)
        <span class="pl-c1">@eval</span> <span class="pl-k">function</span> <span class="pl-en">f</span>(x)
                  <span class="pl-k">$</span>destruct <span class="pl-k">=</span> x
                  <span class="pl-k">$</span>body
        <span class="pl-k">end</span>
        <span class="pl-k">break</span>
    <span class="pl-k">end</span>
<span class="pl-k">end</span>

<span class="pl-c1">println</span>(<span class="pl-s"><span class="pl-pds">"</span>done parsing, about to call f<span class="pl-pds">"</span></span>)
<span class="pl-c1">@time</span> <span class="pl-c1">f</span>(<span class="pl-c1">rand</span>(<span class="pl-c1">50</span>))
<span class="pl-c1">@time</span> <span class="pl-c1">f</span>(<span class="pl-c1">rand</span>(<span class="pl-c1">50</span>))</pre></div>
<p dir="auto">Results (note: this was with an older version of the script above):</p>
<div class="highlight highlight-source-julia notranslate position-relative overflow-auto" dir="auto" data-snippet-clipboard-copy-content="julia&gt; include(&quot;compiler_perf.jl&quot;)
 56.592909 seconds (17.62 M allocations: 729.870 MiB, 0.95% gc time)
  0.000420 seconds (5.21 k allocations: 122.188 KiB)
0.4243939871551012"><pre class="notranslate">julia<span class="pl-k">&gt;</span> <span class="pl-c1">include</span>(<span class="pl-s"><span class="pl-pds">"</span>compiler_perf.jl<span class="pl-pds">"</span></span>)
 <span class="pl-c1">56.592909</span> seconds (<span class="pl-c1">17.62</span> M allocations<span class="pl-k">:</span> <span class="pl-c1">729.870</span> MiB, <span class="pl-c1">0.95</span><span class="pl-k">%</span> gc time)
  <span class="pl-c1">0.000420</span> seconds (<span class="pl-c1">5.21</span> k allocations<span class="pl-k">:</span> <span class="pl-c1">122.188</span> KiB)
<span class="pl-c1">0.4243939871551012</span></pre></div>
<p dir="auto">So of course the performance is quite nice once it's compiled, but the compilation takes a long time. I tried profiling on 0.7 and got no stacktraces (didn't figure out why), but on 0.6 most of the time was in <code class="notranslate">effect_free</code>, <code class="notranslate">occurs_outside_getfield</code> and <code class="notranslate">replace_getfield!</code> (all <code class="notranslate">inference.jl</code>). For reference 0.6 is not quite twice as fast as 0.7 to build this.</p>
<p dir="auto">Adding a <code class="notranslate">@noinline</code> or <code class="notranslate">@nospecialize</code> to <code class="notranslate">f</code>'s declaration doesn't appear to help at all.</p>
<p dir="auto">This is not the worst case I've encountered: that mantle belongs to <a href="http://www.gamsworld.org/performance/princetonlib/htm/nnls/nnls.htm" rel="nofollow">http://www.gamsworld.org/performance/princetonlib/htm/nnls/nnls.htm</a>, which I have yet to see finish inference.</p>