// naklh.cpp
// Nonlinear Ipopt program
// Author: Bryan A. Toth (btoth@physics.ucsd.edu)
#include "naklh_nlp.hpp"
#include <cmath>
#include <cstdio>
#include <iostream>
#include <fstream>
#include <string>
#include <cstdlib>
#include <cstring>
#include <cassert>
#include <cstdio>
using namespace Ipopt;
using namespace std;
// constructor
NAKLH_NLP::NAKLH_NLP()
{
nU=1;
nP=30;
nY=5;
nI=1;
K11val = new double[nU];
K11val2 = new double[nU];
K11valp1 = new double[nU];
dK11val = new double[nU];
dK11val2 = new double[nU];
dK11valp1 = new double[nU];
Xdval = new double[nU];
Xdval2 = new double[nU];
Xdvalp1 = new double[nU];
Xval = new double[nY];
Xval2 = new double[nY];
Xvalp1 = new double[nY];
Pval = new double[nP];
Ival = new double[nI];
Ival2 = new double[nI];
Ivalp1 = new double[nI];
Rvalue = new double[nU];
string buffer;
specs = new string[6+nP+nY+nI+3*nU];
int count;
count = 0;
ifstream fin ("specs.txt");
if (fin.is_open())
{
while (! fin.eof())
{
getline (fin,buffer);
if (buffer[0] !='#')
{
specs[count] = buffer;
count++;
}
}
fin.close();
}
else cout << "Unable to open file";
Time = atoi(specs[0].c_str());
skip = atoi(specs[1].c_str());
hstep = atof(specs[2].c_str());
string filename;
int ret;
Vdata = new double[2*Time+1];
Vdatadummy = new double[skip];
FILE *pFile0;
filename = specs[3];
pFile0 = fopen(filename.c_str(),"r");
for(Index jt=0;jt<skip;jt++)
{
ret = fscanf (pFile0, "%lf", &Vdatadummy[jt]);
if (ret == EOF) break;
}
for(Index jt=0;jt<2*Time+1;jt++)
{
ret = fscanf (pFile0, "%lf", &Vdata[jt]);
if (ret == EOF) break;
}
fclose (pFile0);
Iinj = new double[2*Time+1];
Iinjdummy = new double[skip];
FILE *qFile0;
filename = specs[4];
qFile0 = fopen(filename.c_str(),"r");
for(Index jt=0;jt<skip;jt++)
{
ret = fscanf (qFile0, "%lf", &Iinjdummy[jt]);
if (ret == EOF) break;
}
for(Index jt=0;jt<2*Time+1;jt++)
{
ret = fscanf (qFile0, "%lf", &Iinj[jt]);
if (ret == EOF) break;
}
fclose (qFile0);
int rows = nY+2*nU+nP;
bounds = new double*[rows];
for (Index i=0;i<rows;i++) bounds[i] = new double[4];
int toggle=0;
if (specs[3+nU+nI] == "1") toggle = 1;
int counter;
for(Index k=0;k<rows;k++)
{
counter=0;
char* tmp = new char[specs[4+nU+nI+toggle+k].size()+1];
strcpy( tmp, specs[4+nU+nI+toggle+k].c_str() );
char *ptr = strtok(tmp,",");
bounds[k][3] = 0.0;
while(ptr != 0) {
if(counter<3) {
bounds[k][counter] = atof(ptr);
}
if(counter==3) {
bounds[k][counter] = atof(ptr);
}
ptr = strtok(0,",");
counter++;
}
}
if (specs[3+nU+nI] == "1")
{
filename = specs[4+nU+nI];
}
}
// destructor
NAKLH_NLP::~NAKLH_NLP()
{
delete [] K11val;
delete [] K11val2;
delete [] K11valp1;
delete [] dK11val;
delete [] dK11val2;
delete [] dK11valp1;
delete [] Xdval;
delete [] Xdval2;
delete [] Xdvalp1;
delete [] Xval;
delete [] Xval2;
delete [] Xvalp1;
delete [] Pval;
delete [] Ival;
delete [] Ival2;
delete [] Ivalp1;
delete [] specs;
delete [] Vdata;
delete [] Vdatadummy;
delete [] Iinj;
delete [] Iinjdummy;
int rows = nY+2*nU+nP;
for (Index i=0;i<rows;i++) delete [] bounds[i];
delete [] bounds;
}
// returns the size of the problem
bool NAKLH_NLP::get_nlp_info(Index& n, Index& m, Index& nnz_jac_g,
Index& nnz_h_lag, IndexStyleEnum& index_style)
{
// Number of variables
n = 14*Time+37;
// Number of equality constraints
m = 11*Time;
// Number of Jacobian nonzero entries
nnz_jac_g = 140*Time;
// Number of Hessian nonzero entries
nnz_h_lag = 126*Time+138;
// use the C style indexing (0-based)
index_style = TNLP::C_STYLE;
return true;
}
// returns the variable bounds
bool NAKLH_NLP::get_bounds_info(Index n, Number* x_l, Number* x_u,
Index m, Number* g_l, Number* g_u)
{
// Here, the n and m we gave IPOPT in get_nlp_info are passed back to us.
// If desired, we could assert to make sure they are what we think they are.
assert(n == 14*Time+37);
assert(m == 11*Time);
for(Index jt=0;jt<Time+1;jt++) {
for(Index var=0;var<nY;var++) {
// Bounds for x
x_l[(Time+1)*var+jt]=bounds[var][0];
x_u[(Time+1)*var+jt]=bounds[var][1];
// Bounds for midpoints
if(jt<Time) {
x_l[(Time+1)*(nY+2*nU)+Time*var+jt]=bounds[var][0];
x_u[(Time+1)*(nY+2*nU)+Time*var+jt]=bounds[var][1];
}
}
for(Index con=0;con<2*nU;con++) {
// Bounds for k
x_l[(Time+1)*(nY+con)+jt]=bounds[nY+con][0];
x_u[(Time+1)*(nY+con)+jt]=bounds[nY+con][1];
// Bounds for midpoints
if(jt<Time) {
x_l[(Time+1)*(nY+2*nU)+Time*(nY+con)+jt]=bounds[nY+con][0];
x_u[(Time+1)*(nY+2*nU)+Time*(nY+con)+jt]=bounds[nY+con][1];
}
}
} // End for loop
for(Index par=0;par<nP;par++) {
// Bounds for parameters
x_l[2*Time*(nY+2*nU)+nY+2*nU+par]=bounds[nY+2*nU+par][0];
x_u[2*Time*(nY+2*nU)+nY+2*nU+par]=bounds[nY+2*nU+par][1];
}
// All constraints are equality constraints, so we set the
// upper and lower bound to the same value
// For noisy problems, allow these to be inequality constraints
// as specified in the specs.txt file
for(Index jt=0; jt<Time; jt++) {
for(Index nn=0; nn<nY; nn++) {
g_l[11*jt+nn] = g_l[11*jt+nn+nY] = -bounds[nn][3];
g_u[11*jt+nn] = g_u[11*jt+nn+nY] = bounds[nn][3];
}
// Add in constraints for the control midpoint
for(Index nn=0; nn<nU; nn++) {
g_l[11*jt+2*nY+nn] = -bounds[nY+nn][3];
g_u[11*jt+2*nY+nn] = bounds[nY+nn][3];
}
}
return true;
}
// returns the initial point for the problem
bool NAKLH_NLP::get_starting_point(Index n, bool init_x, Number* x,
bool init_z, Number* z_L, Number* z_U,
Index m, bool init_lambda,
Number* lambda)
{
assert(init_x == true);
assert(init_z == false);
assert(init_lambda == false);
for (Index i=0; i<n; i++) {
x[i] = 0.0;
}
int skipROWS = skip;
int ROWS = 2*Time+1;
int COLS = nY;
double **skipinit = new double* [skipROWS];
double **init = new double* [ROWS];
for(Index i=0;i<skipROWS;i++) skipinit[i] = new double[COLS];
for(Index i=0;i<ROWS;i++) init[i] = new double[COLS];
string filename;
filename = specs[4+nU+nI];
if (specs[3+nU+nI] =="1")
{
FILE *initFILE;
int ret;
initFILE = fopen(filename.c_str(),"r");
for(Index jt=0;jt<skip;jt++)
{
ret = fscanf (initFILE,"%lf %lf %lf %lf %lf ",&skipinit[jt][0],&skipinit[jt][1],&skipinit[jt][2],&skipinit[jt][3],&skipinit[jt][4]);
if (ret == EOF) break;
}
for(Index jt=0;jt<2*Time+1;jt++)
{
ret = fscanf (initFILE,"%lf %lf %lf %lf %lf ",&init[jt][0],&init[jt][1],&init[jt][2],&init[jt][3],&init[jt][4]);
if (ret == EOF) break;
}
fclose (initFILE);
}
for(Index jt=0;jt<Time+1;jt++) {
for(Index var=0;var<nY;var++) {
// Initial conditions for x
if (specs[3+nU+nI] == "1")
{
x[(Time+1)*var+jt] = init[2*jt][var];
}
else
{
x[(Time+1)*var+jt] = bounds[var][2];
}
// Initial conditions for midpoints
if(jt<Time) {
if (specs[3+nU+nI] == "1")
{
x[(Time+1)*(nY+2*nU)+Time*var+jt] = init[2*jt+1][var];
}
else
{
x[(Time+1)*(nY+2*nU)+Time*var+jt] = bounds[var][2];
}
}
}
for(Index cup=0;cup<2*nU;cup++) {
// Initial conditions for k
x[(Time+1)*(cup+nY)+jt]=bounds[cup+nY][2];
// Initial conditions for midpoints
if(jt<Time) {
x[(Time+1)*(nY+2*nU)+Time*(cup+nY)+jt]=bounds[cup+nY][2];
}
}
} // End for loop
for(Index par=0;par<nP;par++) {
// Initial conditions for p5
x[2*Time*(nY+2*nU)+nY+2*nU+par]=bounds[nY+2*nU+par][2];
}
for(Index i=0;i<ROWS;i++) delete [] init[i];
delete [] init;
return true;
}
// returns the value of the objective function
bool NAKLH_NLP::eval_f(Index n, const Number* x, bool new_x, Number& obj_value)
{
assert(n == 14*Time+37);
obj_value = 0;
for(Index jt=0;jt<Time;jt++) {
for(Index i=0;i<nY;i++) {
Xval[i] = x[jt + i*(Time+1)];
Xvalp1[i] = x[jt + i*(Time+1) + 1];
Xval2[i] = x[(Time+1)*(nY+2*nU) + jt + i*(Time)];
} //end for loop
for(Index i=0;i<nU;i++) {
K11val[i] = x[jt + nY*(Time+1) + 2*i*(Time+1)];
K11valp1[i] = x[jt + nY*(Time+1) + 2*i*(Time+1) + 1];
K11val2[i] = x[(Time+1)*(nY+2*nU) + (nY+2*i)*Time + jt];
dK11val[i] = x[jt + (nY+2*i+1)*(Time+1)];
dK11valp1[i] = x[jt + (nY+2*i+1)*(Time+1)+1];
dK11val2[i] = x[(Time+1)*(nY+2*nU) + (nY+2*i+1)*Time + jt];
} //end for loop
Xdval[0] = Vdata[2*jt];
Xdval2[0] = Vdata[2*jt+1];
Xdvalp1[0] = Vdata[2*jt+2];
Ival[0] = Iinj[2*jt];
Ival2[0] = Iinj[2*jt+1];
Ivalp1[0] = Iinj[2*jt+2];
for(Index i=0;i<nP;i++) {
Pval[i] = x[(2*Time+1)*(nY+2*nU)+i];
} //end for loop
obj_value += pow(K11val[0], 2) + pow(-Xval[0] + Xdval[0], 2) + pow(K11val2[0], 2) + pow(-Xval2[0] + Xdval2[0], 2);
} //end for loop
// Add last element
for(Index i=0;i<nY;i++) {
Xval[i] = x[Time + i*(Time+1)];
Xvalp1[i] = 0;
Xval2[i] = 0;
} //end for loop
for(Index i=0;i<nU;i++) {
K11val[i] = x[Time + nY*(Time+1) + 2*i*(Time+1)];
K11valp1[i] = 0;
K11val2[i] = 0;
dK11val[i] = x[Time + (nY+2*i+1)*(Time+1)];
dK11valp1[i] = 0;
dK11val2[i] = 0;
} //end for loop
Xdval[0] = Vdata[2*Time];
Xdval2[0] = 0;
Xdvalp1[0] = 0;
Ival[0] = Iinj[2*Time];
Ival2[0] = 0;
Ivalp1[0] = 0;
for(Index i=0;i<nP;i++) {
Pval[i] = x[(2*Time+1)*(nY+2*nU)+i];
} //end for loop
obj_value += pow(K11val[0], 2) + pow(-Xval[0] + Xdval[0], 2) + pow(K11val2[0], 2) + pow(-Xval2[0] + Xdval2[0], 2);
obj_value = obj_value/(2*Time+1);
return true;
}
// return the gradient of the objective function grad_{x} f(x)
bool NAKLH_NLP::eval_grad_f(Index n, const Number* x, bool new_x, Number* grad_f)
{
assert(n == 14*Time+37);
for(Index i=0;i<n;i++) {
grad_f[i] = 0;
}
for(Index jt=0;jt<Time;jt++) {
for(Index i=0;i<nY;i++) {
Xval[i] = x[jt + i*(Time+1)];
Xvalp1[i] = x[jt + i*(Time+1) + 1];
Xval2[i] = x[(Time+1)*(nY+2*nU) + jt + i*(Time)];
} //end for loop
for(Index i=0;i<nU;i++) {
K11val[i] = x[jt + nY*(Time+1) + 2*i*(Time+1)];
K11valp1[i] = x[jt + nY*(Time+1) + 2*i*(Time+1) + 1];
K11val2[i] = x[(Time+1)*(nY+2*nU) + (nY+2*i)*Time + jt];
dK11val[i] = x[jt + (nY+2*i+1)*(Time+1)];
dK11valp1[i] = x[jt + (nY+2*i+1)*(Time+1)+1];
dK11val2[i] = x[(Time+1)*(nY+2*nU) + (nY+2*i+1)*Time + jt];
} //end for loop
Xdval[0] = Vdata[2*jt];
Xdval2[0] = Vdata[2*jt+1];
Xdvalp1[0] = Vdata[2*jt+2];
Ival[0] = Iinj[2*jt];
Ival2[0] = Iinj[2*jt+1];
Ivalp1[0] = Iinj[2*jt+2];
for(Index i=0;i<nP;i++) {
Pval[i] = x[(2*Time+1)*(nY+2*nU)+i];
} //end for loop
grad_f[jt+0*(Time+1)] = (2*Xval[0] - 2*Xdval[0])/(2*Time+1);
grad_f[(Time+1)*(2*nU+nY) + 0*Time + jt] = (2*Xval2[0] - 2*Xdval2[0])/(2*Time+1);
grad_f[jt+5*(Time+1)] = (2*K11val[0])/(2*Time+1);
grad_f[(Time+1)*(2*nU+nY) + 5*Time + jt] = (2*K11val2[0])/(2*Time+1);
} //end for loop
// Add last element
for(Index i=0;i<nY;i++) {
Xval[i] = x[Time + i*(Time+1)];
Xvalp1[i] = 0;
Xval2[i] = 0;
} //end for loop
for(Index i=0;i<nU;i++) {
K11val[i] = x[Time + nY*(Time+1) + 2*i*(Time+1)];
K11valp1[i] = 0;
K11val2[i] = 0;
dK11val[i] = x[Time + (nY+2*i+1)*(Time+1)];
dK11valp1[i] = 0;
dK11val2[i] = 0;
} //end for loop
Xdval[0] = Vdata[2*Time];
Xdval2[0] = 0;
Xdvalp1[0] = 0;
Ival[0] = Iinj[2*Time];
Ival2[0] = 0;
Ivalp1[0] = 0;
for(Index i=0;i<nP;i++) {
Pval[i] = x[(2*Time+1)*(nY+2*nU)+i];
} //end for loop
grad_f[Time+0*(Time+1)] = (2*Xval[0] - 2*Xdval[0])/(2*Time+1);
grad_f[Time+5*(Time+1)] = (2*K11val[0])/(2*Time+1);
return true;
}
// return the value of the constraints: g(x)
bool NAKLH_NLP::eval_g(Index n, const Number* x, bool new_x, Index m, Number* g)
{
assert(n == 14*Time+37);
assert(m == 11*Time);
for(Index jt=0;jt<Time;jt++) {
for(Index i=0;i<nY;i++) {
Xval[i] = x[jt + i*(Time+1)];
Xvalp1[i] = x[jt + i*(Time+1) + 1];
Xval2[i] = x[(Time+1)*(nY+2*nU) + jt + i*(Time)];
} //end for loop
for(Index i=0;i<nU;i++) {
K11val[i] = x[jt + nY*(Time+1) + 2*i*(Time+1)];
K11valp1[i] = x[jt + nY*(Time+1) + 2*i*(Time+1) + 1];
K11val2[i] = x[(Time+1)*(nY+2*nU) + (nY+2*i)*Time + jt];
dK11val[i] = x[jt + (nY+2*i+1)*(Time+1)];
dK11valp1[i] = x[jt + (nY+2*i+1)*(Time+1)+1];
dK11val2[i] = x[(Time+1)*(nY+2*nU) + (nY+2*i+1)*Time + jt];
} //end for loop
Xdval[0] = Vdata[2*jt];
Xdval2[0] = Vdata[2*jt+1];
Xdvalp1[0] = Vdata[2*jt+2];
Ival[0] = Iinj[2*jt];
Ival2[0] = Iinj[2*jt+1];
Ivalp1[0] = Iinj[2*jt+2];
for(Index i=0;i<nP;i++) {
Pval[i] = x[(2*Time+1)*(nY+2*nU)+i];
} //end for loop
g[11*jt+0] = Xval[0] + 0.16666666666666699*hstep*(K11val[0]*(-Xval[0] + Xdval[0]) + (Ival[0]/Pval[9] + pow(Xval[3], 4)*Pval[3]*(Pval[4] - Xval[0]) + Pval[5]*(Pval[6] - Xval[0]) + Pval[1]*Xval[2]*pow(Xval[1], 3)*(Pval[2] - Xval[0]) + Pval[7]*Xval[4]*(Pval[8] - Xval[0]))/Pval[0]) + -Xvalp1[0] + 0.16666666666666699*hstep*(K11valp1[0]*(-Xvalp1[0] + Xdvalp1[0]) + (Ivalp1[0]/Pval[9] + pow(Xvalp1[3], 4)*Pval[3]*(Pval[4] - Xvalp1[0]) + Pval[5]*(Pval[6] - Xvalp1[0]) + Pval[1]*Xvalp1[2]*pow(Xvalp1[1], 3)*(Pval[2] - Xvalp1[0]) + Pval[7]*Xvalp1[4]*(Pval[8] - Xvalp1[0]))/Pval[0]) + 0.66666666666666696*hstep*(K11val2[0]*(-Xval2[0] + Xdval2[0]) + (Ival2[0]/Pval[9] + pow(Xval2[3], 4)*Pval[3]*(Pval[4] - Xval2[0]) + Pval[5]*(Pval[6] - Xval2[0]) + Pval[1]*Xval2[2]*pow(Xval2[1], 3)*(Pval[2] - Xval2[0]) + Pval[7]*Xval2[4]*(Pval[8] - Xval2[0]))/Pval[0]);
g[11*jt+1] = 0.16666666666666699*hstep*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)/(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13]) + Xval[1] + 0.16666666666666699*hstep*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)/(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13]) - Xvalp1[1] + 0.66666666666666696*hstep*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)/(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13]);
g[11*jt+2] = Xval[2] + 0.16666666666666699*hstep*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)/(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18]) + -Xvalp1[2] + 0.16666666666666699*hstep*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)/(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18]) + 0.66666666666666696*hstep*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)/(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18]);
g[11*jt+3] = Xval[3] + 0.16666666666666699*hstep*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)/(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23]) + -Xvalp1[3] + 0.16666666666666699*hstep*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)/(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23]) + 0.66666666666666696*hstep*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)/(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23]);
g[11*jt+4] = 0.16666666666666699*hstep*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)/(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28]) + Xval[4] + 0.16666666666666699*hstep*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)/(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28]) - Xvalp1[4] + 0.66666666666666696*hstep*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)/(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28]);
g[11*jt+5] = 0.5*Xval[0] + 0.125*hstep*(K11val[0]*(-Xval[0] + Xdval[0]) + (Ival[0]/Pval[9] + pow(Xval[3], 4)*Pval[3]*(Pval[4] - Xval[0]) + Pval[5]*(Pval[6] - Xval[0]) + Pval[1]*Xval[2]*pow(Xval[1], 3)*(Pval[2] - Xval[0]) + Pval[7]*Xval[4]*(Pval[8] - Xval[0]))/Pval[0]) + 0.5*Xvalp1[0] - 0.125*hstep*(K11valp1[0]*(-Xvalp1[0] + Xdvalp1[0]) + (Ivalp1[0]/Pval[9] + pow(Xvalp1[3], 4)*Pval[3]*(Pval[4] - Xvalp1[0]) + Pval[5]*(Pval[6] - Xvalp1[0]) + Pval[1]*Xvalp1[2]*pow(Xvalp1[1], 3)*(Pval[2] - Xvalp1[0]) + Pval[7]*Xvalp1[4]*(Pval[8] - Xvalp1[0]))/Pval[0]) + -Xval2[0];
g[11*jt+6] = 0.125*hstep*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)/(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13]) + 0.5*Xval[1] + -0.125*hstep*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)/(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13]) + 0.5*Xvalp1[1] + -Xval2[1];
g[11*jt+7] = 0.5*Xval[2] + 0.125*hstep*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)/(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18]) + 0.5*Xvalp1[2] - 0.125*hstep*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)/(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18]) + -Xval2[2];
g[11*jt+8] = 0.5*Xval[3] + 0.125*hstep*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)/(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23]) + 0.5*Xvalp1[3] - 0.125*hstep*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)/(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23]) + -Xval2[3];
g[11*jt+9] = 0.125*hstep*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)/(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28]) + 0.5*Xval[4] + -0.125*hstep*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)/(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28]) + 0.5*Xvalp1[4] + -Xval2[4];
g[11*jt+10] = 0.125*dK11val[0]*hstep + 0.5*K11val[0] + -0.125*dK11valp1[0]*hstep + 0.5*K11valp1[0] + -K11val2[0];
} //end for loop
return true;
}
// return the structure or values of the jacobian
bool NAKLH_NLP::eval_jac_g(Index n, const Number* x, bool new_x,
Index m, Index nele_jac, Index* iRow, Index* jCol,
Number* values)
{
if (values == NULL) {
// return the structure of the jacobian
for(Index jt=0;jt<Time;jt++) {
iRow[140*jt+0] = 0+11*jt;
jCol[140*jt+0] = (Time+1)*0+jt;
iRow[140*jt+1] = 0+11*jt;
jCol[140*jt+1] = (Time+1)*0+jt+1;
iRow[140*jt+2] = 0+11*jt;
jCol[140*jt+2] = (Time+1)*7+Time*0+jt;
iRow[140*jt+3] = 0+11*jt;
jCol[140*jt+3] = (Time+1)*1+jt;
iRow[140*jt+4] = 0+11*jt;
jCol[140*jt+4] = (Time+1)*1+jt+1;
iRow[140*jt+5] = 0+11*jt;
jCol[140*jt+5] = (Time+1)*7+Time*1+jt;
iRow[140*jt+6] = 0+11*jt;
jCol[140*jt+6] = (Time+1)*2+jt;
iRow[140*jt+7] = 0+11*jt;
jCol[140*jt+7] = (Time+1)*2+jt+1;
iRow[140*jt+8] = 0+11*jt;
jCol[140*jt+8] = (Time+1)*7+Time*2+jt;
iRow[140*jt+9] = 0+11*jt;
jCol[140*jt+9] = (Time+1)*3+jt;
iRow[140*jt+10] = 0+11*jt;
jCol[140*jt+10] = (Time+1)*3+jt+1;
iRow[140*jt+11] = 0+11*jt;
jCol[140*jt+11] = (Time+1)*7+Time*3+jt;
iRow[140*jt+12] = 0+11*jt;
jCol[140*jt+12] = (Time+1)*4+jt;
iRow[140*jt+13] = 0+11*jt;
jCol[140*jt+13] = (Time+1)*4+jt+1;
iRow[140*jt+14] = 0+11*jt;
jCol[140*jt+14] = (Time+1)*7+Time*4+jt;
iRow[140*jt+15] = 0+11*jt;
jCol[140*jt+15] = (Time+1)*5+jt;
iRow[140*jt+16] = 0+11*jt;
jCol[140*jt+16] = (Time+1)*5+jt+1;
iRow[140*jt+17] = 0+11*jt;
jCol[140*jt+17] = (Time+1)*7+Time*5+jt;
iRow[140*jt+18] = 0+11*jt;
jCol[140*jt+18] = 2*Time*7+7;
iRow[140*jt+19] = 0+11*jt;
jCol[140*jt+19] = 2*Time*7+8;
iRow[140*jt+20] = 0+11*jt;
jCol[140*jt+20] = 2*Time*7+9;
iRow[140*jt+21] = 0+11*jt;
jCol[140*jt+21] = 2*Time*7+10;
iRow[140*jt+22] = 0+11*jt;
jCol[140*jt+22] = 2*Time*7+11;
iRow[140*jt+23] = 0+11*jt;
jCol[140*jt+23] = 2*Time*7+12;
iRow[140*jt+24] = 0+11*jt;
jCol[140*jt+24] = 2*Time*7+13;
iRow[140*jt+25] = 0+11*jt;
jCol[140*jt+25] = 2*Time*7+14;
iRow[140*jt+26] = 0+11*jt;
jCol[140*jt+26] = 2*Time*7+15;
iRow[140*jt+27] = 0+11*jt;
jCol[140*jt+27] = 2*Time*7+16;
iRow[140*jt+28] = 1+11*jt;
jCol[140*jt+28] = (Time+1)*0+jt;
iRow[140*jt+29] = 1+11*jt;
jCol[140*jt+29] = (Time+1)*0+jt+1;
iRow[140*jt+30] = 1+11*jt;
jCol[140*jt+30] = (Time+1)*7+Time*0+jt;
iRow[140*jt+31] = 1+11*jt;
jCol[140*jt+31] = (Time+1)*1+jt;
iRow[140*jt+32] = 1+11*jt;
jCol[140*jt+32] = (Time+1)*1+jt+1;
iRow[140*jt+33] = 1+11*jt;
jCol[140*jt+33] = (Time+1)*7+Time*1+jt;
iRow[140*jt+34] = 1+11*jt;
jCol[140*jt+34] = 2*Time*7+17;
iRow[140*jt+35] = 1+11*jt;
jCol[140*jt+35] = 2*Time*7+18;
iRow[140*jt+36] = 1+11*jt;
jCol[140*jt+36] = 2*Time*7+19;
iRow[140*jt+37] = 1+11*jt;
jCol[140*jt+37] = 2*Time*7+20;
iRow[140*jt+38] = 1+11*jt;
jCol[140*jt+38] = 2*Time*7+21;
iRow[140*jt+39] = 2+11*jt;
jCol[140*jt+39] = (Time+1)*0+jt;
iRow[140*jt+40] = 2+11*jt;
jCol[140*jt+40] = (Time+1)*0+jt+1;
iRow[140*jt+41] = 2+11*jt;
jCol[140*jt+41] = (Time+1)*7+Time*0+jt;
iRow[140*jt+42] = 2+11*jt;
jCol[140*jt+42] = (Time+1)*2+jt;
iRow[140*jt+43] = 2+11*jt;
jCol[140*jt+43] = (Time+1)*2+jt+1;
iRow[140*jt+44] = 2+11*jt;
jCol[140*jt+44] = (Time+1)*7+Time*2+jt;
iRow[140*jt+45] = 2+11*jt;
jCol[140*jt+45] = 2*Time*7+22;
iRow[140*jt+46] = 2+11*jt;
jCol[140*jt+46] = 2*Time*7+23;
iRow[140*jt+47] = 2+11*jt;
jCol[140*jt+47] = 2*Time*7+24;
iRow[140*jt+48] = 2+11*jt;
jCol[140*jt+48] = 2*Time*7+25;
iRow[140*jt+49] = 2+11*jt;
jCol[140*jt+49] = 2*Time*7+26;
iRow[140*jt+50] = 3+11*jt;
jCol[140*jt+50] = (Time+1)*0+jt;
iRow[140*jt+51] = 3+11*jt;
jCol[140*jt+51] = (Time+1)*0+jt+1;
iRow[140*jt+52] = 3+11*jt;
jCol[140*jt+52] = (Time+1)*7+Time*0+jt;
iRow[140*jt+53] = 3+11*jt;
jCol[140*jt+53] = (Time+1)*3+jt;
iRow[140*jt+54] = 3+11*jt;
jCol[140*jt+54] = (Time+1)*3+jt+1;
iRow[140*jt+55] = 3+11*jt;
jCol[140*jt+55] = (Time+1)*7+Time*3+jt;
iRow[140*jt+56] = 3+11*jt;
jCol[140*jt+56] = 2*Time*7+27;
iRow[140*jt+57] = 3+11*jt;
jCol[140*jt+57] = 2*Time*7+28;
iRow[140*jt+58] = 3+11*jt;
jCol[140*jt+58] = 2*Time*7+29;
iRow[140*jt+59] = 3+11*jt;
jCol[140*jt+59] = 2*Time*7+30;
iRow[140*jt+60] = 3+11*jt;
jCol[140*jt+60] = 2*Time*7+31;
iRow[140*jt+61] = 4+11*jt;
jCol[140*jt+61] = (Time+1)*0+jt;
iRow[140*jt+62] = 4+11*jt;
jCol[140*jt+62] = (Time+1)*0+jt+1;
iRow[140*jt+63] = 4+11*jt;
jCol[140*jt+63] = (Time+1)*7+Time*0+jt;
iRow[140*jt+64] = 4+11*jt;
jCol[140*jt+64] = (Time+1)*4+jt;
iRow[140*jt+65] = 4+11*jt;
jCol[140*jt+65] = (Time+1)*4+jt+1;
iRow[140*jt+66] = 4+11*jt;
jCol[140*jt+66] = (Time+1)*7+Time*4+jt;
iRow[140*jt+67] = 4+11*jt;
jCol[140*jt+67] = 2*Time*7+32;
iRow[140*jt+68] = 4+11*jt;
jCol[140*jt+68] = 2*Time*7+33;
iRow[140*jt+69] = 4+11*jt;
jCol[140*jt+69] = 2*Time*7+34;
iRow[140*jt+70] = 4+11*jt;
jCol[140*jt+70] = 2*Time*7+35;
iRow[140*jt+71] = 4+11*jt;
jCol[140*jt+71] = 2*Time*7+36;
iRow[140*jt+72] = 5+11*jt;
jCol[140*jt+72] = (Time+1)*0+jt;
iRow[140*jt+73] = 5+11*jt;
jCol[140*jt+73] = (Time+1)*0+jt+1;
iRow[140*jt+74] = 5+11*jt;
jCol[140*jt+74] = (Time+1)*7+Time*0+jt;
iRow[140*jt+75] = 5+11*jt;
jCol[140*jt+75] = (Time+1)*1+jt;
iRow[140*jt+76] = 5+11*jt;
jCol[140*jt+76] = (Time+1)*1+jt+1;
iRow[140*jt+77] = 5+11*jt;
jCol[140*jt+77] = (Time+1)*2+jt;
iRow[140*jt+78] = 5+11*jt;
jCol[140*jt+78] = (Time+1)*2+jt+1;
iRow[140*jt+79] = 5+11*jt;
jCol[140*jt+79] = (Time+1)*3+jt;
iRow[140*jt+80] = 5+11*jt;
jCol[140*jt+80] = (Time+1)*3+jt+1;
iRow[140*jt+81] = 5+11*jt;
jCol[140*jt+81] = (Time+1)*4+jt;
iRow[140*jt+82] = 5+11*jt;
jCol[140*jt+82] = (Time+1)*4+jt+1;
iRow[140*jt+83] = 5+11*jt;
jCol[140*jt+83] = (Time+1)*5+jt;
iRow[140*jt+84] = 5+11*jt;
jCol[140*jt+84] = (Time+1)*5+jt+1;
iRow[140*jt+85] = 5+11*jt;
jCol[140*jt+85] = 2*Time*7+7;
iRow[140*jt+86] = 5+11*jt;
jCol[140*jt+86] = 2*Time*7+8;
iRow[140*jt+87] = 5+11*jt;
jCol[140*jt+87] = 2*Time*7+9;
iRow[140*jt+88] = 5+11*jt;
jCol[140*jt+88] = 2*Time*7+10;
iRow[140*jt+89] = 5+11*jt;
jCol[140*jt+89] = 2*Time*7+11;
iRow[140*jt+90] = 5+11*jt;
jCol[140*jt+90] = 2*Time*7+12;
iRow[140*jt+91] = 5+11*jt;
jCol[140*jt+91] = 2*Time*7+13;
iRow[140*jt+92] = 5+11*jt;
jCol[140*jt+92] = 2*Time*7+14;
iRow[140*jt+93] = 5+11*jt;
jCol[140*jt+93] = 2*Time*7+15;
iRow[140*jt+94] = 5+11*jt;
jCol[140*jt+94] = 2*Time*7+16;
iRow[140*jt+95] = 6+11*jt;
jCol[140*jt+95] = (Time+1)*0+jt;
iRow[140*jt+96] = 6+11*jt;
jCol[140*jt+96] = (Time+1)*0+jt+1;
iRow[140*jt+97] = 6+11*jt;
jCol[140*jt+97] = (Time+1)*1+jt;
iRow[140*jt+98] = 6+11*jt;
jCol[140*jt+98] = (Time+1)*1+jt+1;
iRow[140*jt+99] = 6+11*jt;
jCol[140*jt+99] = (Time+1)*7+Time*1+jt;
iRow[140*jt+100] = 6+11*jt;
jCol[140*jt+100] = 2*Time*7+17;
iRow[140*jt+101] = 6+11*jt;
jCol[140*jt+101] = 2*Time*7+18;
iRow[140*jt+102] = 6+11*jt;
jCol[140*jt+102] = 2*Time*7+19;
iRow[140*jt+103] = 6+11*jt;
jCol[140*jt+103] = 2*Time*7+20;
iRow[140*jt+104] = 6+11*jt;
jCol[140*jt+104] = 2*Time*7+21;
iRow[140*jt+105] = 7+11*jt;
jCol[140*jt+105] = (Time+1)*0+jt;
iRow[140*jt+106] = 7+11*jt;
jCol[140*jt+106] = (Time+1)*0+jt+1;
iRow[140*jt+107] = 7+11*jt;
jCol[140*jt+107] = (Time+1)*2+jt;
iRow[140*jt+108] = 7+11*jt;
jCol[140*jt+108] = (Time+1)*2+jt+1;
iRow[140*jt+109] = 7+11*jt;
jCol[140*jt+109] = (Time+1)*7+Time*2+jt;
iRow[140*jt+110] = 7+11*jt;
jCol[140*jt+110] = 2*Time*7+22;
iRow[140*jt+111] = 7+11*jt;
jCol[140*jt+111] = 2*Time*7+23;
iRow[140*jt+112] = 7+11*jt;
jCol[140*jt+112] = 2*Time*7+24;
iRow[140*jt+113] = 7+11*jt;
jCol[140*jt+113] = 2*Time*7+25;
iRow[140*jt+114] = 7+11*jt;
jCol[140*jt+114] = 2*Time*7+26;
iRow[140*jt+115] = 8+11*jt;
jCol[140*jt+115] = (Time+1)*0+jt;
iRow[140*jt+116] = 8+11*jt;
jCol[140*jt+116] = (Time+1)*0+jt+1;
iRow[140*jt+117] = 8+11*jt;
jCol[140*jt+117] = (Time+1)*3+jt;
iRow[140*jt+118] = 8+11*jt;
jCol[140*jt+118] = (Time+1)*3+jt+1;
iRow[140*jt+119] = 8+11*jt;
jCol[140*jt+119] = (Time+1)*7+Time*3+jt;
iRow[140*jt+120] = 8+11*jt;
jCol[140*jt+120] = 2*Time*7+27;
iRow[140*jt+121] = 8+11*jt;
jCol[140*jt+121] = 2*Time*7+28;
iRow[140*jt+122] = 8+11*jt;
jCol[140*jt+122] = 2*Time*7+29;
iRow[140*jt+123] = 8+11*jt;
jCol[140*jt+123] = 2*Time*7+30;
iRow[140*jt+124] = 8+11*jt;
jCol[140*jt+124] = 2*Time*7+31;
iRow[140*jt+125] = 9+11*jt;
jCol[140*jt+125] = (Time+1)*0+jt;
iRow[140*jt+126] = 9+11*jt;
jCol[140*jt+126] = (Time+1)*0+jt+1;
iRow[140*jt+127] = 9+11*jt;
jCol[140*jt+127] = (Time+1)*4+jt;
iRow[140*jt+128] = 9+11*jt;
jCol[140*jt+128] = (Time+1)*4+jt+1;
iRow[140*jt+129] = 9+11*jt;
jCol[140*jt+129] = (Time+1)*7+Time*4+jt;
iRow[140*jt+130] = 9+11*jt;
jCol[140*jt+130] = 2*Time*7+32;
iRow[140*jt+131] = 9+11*jt;
jCol[140*jt+131] = 2*Time*7+33;
iRow[140*jt+132] = 9+11*jt;
jCol[140*jt+132] = 2*Time*7+34;
iRow[140*jt+133] = 9+11*jt;
jCol[140*jt+133] = 2*Time*7+35;
iRow[140*jt+134] = 9+11*jt;
jCol[140*jt+134] = 2*Time*7+36;
iRow[140*jt+135] = 10+11*jt;
jCol[140*jt+135] = (Time+1)*5+jt;
iRow[140*jt+136] = 10+11*jt;
jCol[140*jt+136] = (Time+1)*5+jt+1;
iRow[140*jt+137] = 10+11*jt;
jCol[140*jt+137] = (Time+1)*7+Time*5+jt;
iRow[140*jt+138] = 10+11*jt;
jCol[140*jt+138] = (Time+1)*6+jt;
iRow[140*jt+139] = 10+11*jt;
jCol[140*jt+139] = (Time+1)*6+jt+1;
} // end for loop
} // end if
else {
// return the values of the jacobian
for(Index jt=0;jt<Time;jt++) {
for(Index i=0;i<nY;i++) {
Xval[i] = x[jt + i*(Time+1)];
Xvalp1[i] = x[jt + i*(Time+1) + 1];
Xval2[i] = x[(Time+1)*(nY+2*nU) + jt + i*(Time)];
} //end for loop
for(Index i=0;i<nU;i++) {
K11val[i] = x[jt + nY*(Time+1) + 2*i*(Time+1)];
K11valp1[i] = x[jt + nY*(Time+1) + 2*i*(Time+1) + 1];
K11val2[i] = x[(Time+1)*(nY+2*nU) + (nY+2*i)*Time + jt];
dK11val[i] = x[jt + (nY+2*i+1)*(Time+1)];
dK11valp1[i] = x[jt + (nY+2*i+1)*(Time+1)+1];
dK11val2[i] = x[(Time+1)*(nY+2*nU) + (nY+2*i+1)*Time + jt];
} //end for loop
Xdval[0] = Vdata[2*jt];
Xdval2[0] = Vdata[2*jt+1];
Xdvalp1[0] = Vdata[2*jt+2];
Ival[0] = Iinj[2*jt];
Ival2[0] = Iinj[2*jt+1];
Ivalp1[0] = Iinj[2*jt+2];
for(Index i=0;i<nP;i++) {
Pval[i] = x[(2*Time+1)*(nY+2*nU)+i];
} //end for loop
values[140*jt+0] = 0.16666666666666699*hstep*(-K11val[0] + (-pow(Xval[3], 4)*Pval[3] - Pval[5] - Pval[1]*Xval[2]*pow(Xval[1], 3) - Pval[7]*Xval[4])/Pval[0]) + 1;
values[140*jt+1] = 0.16666666666666699*hstep*(-K11valp1[0] + (-pow(Xvalp1[3], 4)*Pval[3] - Pval[5] - Pval[1]*Xvalp1[2]*pow(Xvalp1[1], 3) - Pval[7]*Xvalp1[4])/Pval[0]) - 1;
values[140*jt+2] = 0.66666666666666696*hstep*(-K11val2[0] + (-pow(Xval2[3], 4)*Pval[3] - Pval[5] - Pval[1]*Xval2[2]*pow(Xval2[1], 3) - Pval[7]*Xval2[4])/Pval[0]);
values[140*jt+3] = 0.5*Pval[1]*Xval[2]*hstep*pow(Xval[1], 2)*(Pval[2] - Xval[0])/Pval[0];
values[140*jt+4] = 0.5*Pval[1]*Xvalp1[2]*hstep*pow(Xvalp1[1], 2)*(Pval[2] - Xvalp1[0])/Pval[0];
values[140*jt+5] = 2.0*Pval[1]*Xval2[2]*hstep*pow(Xval2[1], 2)*(Pval[2] - Xval2[0])/Pval[0];
values[140*jt+6] = 0.16666666666666699*Pval[1]*hstep*pow(Xval[1], 3)*(Pval[2] - Xval[0])/Pval[0];
values[140*jt+7] = 0.16666666666666699*Pval[1]*hstep*pow(Xvalp1[1], 3)*(Pval[2] - Xvalp1[0])/Pval[0];
values[140*jt+8] = 0.66666666666666696*Pval[1]*hstep*pow(Xval2[1], 3)*(Pval[2] - Xval2[0])/Pval[0];
values[140*jt+9] = 0.66666666666666696*pow(Xval[3], 3)*Pval[3]*hstep*(Pval[4] - Xval[0])/Pval[0];
values[140*jt+10] = 0.66666666666666696*pow(Xvalp1[3], 3)*Pval[3]*hstep*(Pval[4] - Xvalp1[0])/Pval[0];
values[140*jt+11] = 2.6666666666666701*pow(Xval2[3], 3)*Pval[3]*hstep*(Pval[4] - Xval2[0])/Pval[0];
values[140*jt+12] = 0.16666666666666699*Pval[7]*hstep*(Pval[8] - Xval[0])/Pval[0];
values[140*jt+13] = 0.16666666666666699*Pval[7]*hstep*(Pval[8] - Xvalp1[0])/Pval[0];
values[140*jt+14] = 0.66666666666666696*Pval[7]*hstep*(Pval[8] - Xval2[0])/Pval[0];
values[140*jt+15] = 0.16666666666666699*hstep*(-Xval[0] + Xdval[0]);
values[140*jt+16] = 0.16666666666666699*hstep*(-Xvalp1[0] + Xdvalp1[0]);
values[140*jt+17] = 0.66666666666666696*hstep*(-Xval2[0] + Xdval2[0]);
values[140*jt+18] = -0.16666666666666699*hstep*(Ival[0]/Pval[9] + pow(Xval[3], 4)*Pval[3]*(Pval[4] - Xval[0]) + Pval[5]*(Pval[6] - Xval[0]) + Pval[1]*Xval[2]*pow(Xval[1], 3)*(Pval[2] - Xval[0]) + Pval[7]*Xval[4]*(Pval[8] - Xval[0]))/pow(Pval[0], 2)+-0.16666666666666699*hstep*(Ivalp1[0]/Pval[9] + pow(Xvalp1[3], 4)*Pval[3]*(Pval[4] - Xvalp1[0]) + Pval[5]*(Pval[6] - Xvalp1[0]) + Pval[1]*Xvalp1[2]*pow(Xvalp1[1], 3)*(Pval[2] - Xvalp1[0]) + Pval[7]*Xvalp1[4]*(Pval[8] - Xvalp1[0]))/pow(Pval[0], 2)+-0.66666666666666696*hstep*(Ival2[0]/Pval[9] + pow(Xval2[3], 4)*Pval[3]*(Pval[4] - Xval2[0]) + Pval[5]*(Pval[6] - Xval2[0]) + Pval[1]*Xval2[2]*pow(Xval2[1], 3)*(Pval[2] - Xval2[0]) + Pval[7]*Xval2[4]*(Pval[8] - Xval2[0]))/pow(Pval[0], 2);
values[140*jt+19] = 0.16666666666666699*Xval[2]*hstep*pow(Xval[1], 3)*(Pval[2] - Xval[0])/Pval[0]+0.16666666666666699*Xvalp1[2]*hstep*pow(Xvalp1[1], 3)*(Pval[2] - Xvalp1[0])/Pval[0]+0.66666666666666696*Xval2[2]*hstep*pow(Xval2[1], 3)*(Pval[2] - Xval2[0])/Pval[0];
values[140*jt+20] = 0.16666666666666699*Pval[1]*Xval[2]*hstep*pow(Xval[1], 3)/Pval[0]+0.16666666666666699*Pval[1]*Xvalp1[2]*hstep*pow(Xvalp1[1], 3)/Pval[0]+0.66666666666666696*Pval[1]*Xval2[2]*hstep*pow(Xval2[1], 3)/Pval[0];
values[140*jt+21] = 0.16666666666666699*pow(Xval[3], 4)*hstep*(Pval[4] - Xval[0])/Pval[0]+0.16666666666666699*pow(Xvalp1[3], 4)*hstep*(Pval[4] - Xvalp1[0])/Pval[0]+0.66666666666666696*pow(Xval2[3], 4)*hstep*(Pval[4] - Xval2[0])/Pval[0];
values[140*jt+22] = 0.16666666666666699*pow(Xval[3], 4)*Pval[3]*hstep/Pval[0]+0.16666666666666699*pow(Xvalp1[3], 4)*Pval[3]*hstep/Pval[0]+0.66666666666666696*pow(Xval2[3], 4)*Pval[3]*hstep/Pval[0];
values[140*jt+23] = 0.16666666666666699*hstep*(Pval[6] - Xval[0])/Pval[0]+0.16666666666666699*hstep*(Pval[6] - Xvalp1[0])/Pval[0]+0.66666666666666696*hstep*(Pval[6] - Xval2[0])/Pval[0];
values[140*jt+24] = 0.16666666666666699*Pval[5]*hstep/Pval[0]+0.16666666666666699*Pval[5]*hstep/Pval[0]+0.66666666666666696*Pval[5]*hstep/Pval[0];
values[140*jt+25] = 0.16666666666666699*hstep*Xval[4]*(Pval[8] - Xval[0])/Pval[0]+0.16666666666666699*hstep*Xvalp1[4]*(Pval[8] - Xvalp1[0])/Pval[0]+0.66666666666666696*hstep*Xval2[4]*(Pval[8] - Xval2[0])/Pval[0];
values[140*jt+26] = 0.16666666666666699*Pval[7]*hstep*Xval[4]/Pval[0]+0.16666666666666699*Pval[7]*hstep*Xvalp1[4]/Pval[0]+0.66666666666666696*Pval[7]*hstep*Xval2[4]/Pval[0];
values[140*jt+27] = -0.16666666666666699*Ival[0]*hstep/(Pval[0]*pow(Pval[9], 2))+-0.16666666666666699*Ivalp1[0]*hstep/(Pval[0]*pow(Pval[9], 2))+-0.66666666666666696*Ival2[0]*hstep/(Pval[0]*pow(Pval[9], 2));
values[140*jt+28] = 0.33333333333333298*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))/(Pval[11]*(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13]));
values[140*jt+29] = 0.33333333333333298*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))/(Pval[11]*(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13]));
values[140*jt+30] = 1.3333333333333299*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval2[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[11]), 2))/(Pval[11]*(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13]));
values[140*jt+31] = -0.16666666666666699*hstep/(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13]) + 1;
values[140*jt+32] = -0.16666666666666699*hstep/(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13]) - 1;
values[140*jt+33] = -0.66666666666666696*hstep/(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13]);
values[140*jt+34] = -0.33333333333333298*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))/(Pval[11]*(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13]))+-0.33333333333333298*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))/(Pval[11]*(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13]))+-1.3333333333333299*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval2[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[11]), 2))/(Pval[11]*(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13]));
values[140*jt+35] = -0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(Xval[0] - Pval[10])/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13]))+-0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(Xvalp1[0] - Pval[10])/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13]))+-0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[11]), 2))*(Xval2[0] - Pval[10])/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13]));
values[140*jt+36] = -0.33333333333333298*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(Xval[0] - Pval[10])*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+-0.33333333333333298*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(Xvalp1[0] - Pval[10])*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+-1.3333333333333299*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*(Xval2[0] - Pval[10])*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval2[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2));
values[140*jt+37] = -0.16666666666666699*hstep*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)/pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)+-0.16666666666666699*hstep*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)/pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)+-0.66666666666666696*hstep*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)/pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2);
values[140*jt+38] = 0.16666666666666699*hstep*(pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2) - 1)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)/pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)+0.16666666666666699*hstep*(pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2) - 1)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)/pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)+0.66666666666666696*hstep*(pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2) - 1)*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)/pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2);
values[140*jt+39] = 0.33333333333333298*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))/(Pval[16]*(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18]));
values[140*jt+40] = 0.33333333333333298*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))/(Pval[16]*(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18]));
values[140*jt+41] = 1.3333333333333299*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval2[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[16]), 2))/(Pval[16]*(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18]));
values[140*jt+42] = -0.16666666666666699*hstep/(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18]) + 1;
values[140*jt+43] = -0.16666666666666699*hstep/(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18]) - 1;
values[140*jt+44] = -0.66666666666666696*hstep/(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18]);
values[140*jt+45] = -0.33333333333333298*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))/(Pval[16]*(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18]))+-0.33333333333333298*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))/(Pval[16]*(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18]))+-1.3333333333333299*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval2[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[16]), 2))/(Pval[16]*(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18]));
values[140*jt+46] = -0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(Xval[0] - Pval[15])/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18]))+-0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(Xvalp1[0] - Pval[15])/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18]))+-0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[16]), 2))*(Xval2[0] - Pval[15])/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18]));
values[140*jt+47] = -0.33333333333333298*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(Xval[0] - Pval[15])*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+-0.33333333333333298*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(Xvalp1[0] - Pval[15])*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+-1.3333333333333299*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*(Xval2[0] - Pval[15])*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval2[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2));
values[140*jt+48] = -0.16666666666666699*hstep*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)/pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)+-0.16666666666666699*hstep*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)/pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)+-0.66666666666666696*hstep*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)/pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2);
values[140*jt+49] = 0.16666666666666699*hstep*(pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2) - 1)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)/pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)+0.16666666666666699*hstep*(pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2) - 1)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)/pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)+0.66666666666666696*hstep*(pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2) - 1)*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)/pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2);
values[140*jt+50] = 0.33333333333333298*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))/(Pval[21]*(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23]));
values[140*jt+51] = 0.33333333333333298*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))/(Pval[21]*(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23]));
values[140*jt+52] = 1.3333333333333299*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval2[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[21]), 2))/(Pval[21]*(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23]));
values[140*jt+53] = -0.16666666666666699*hstep/(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23]) + 1;
values[140*jt+54] = -0.16666666666666699*hstep/(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23]) - 1;
values[140*jt+55] = -0.66666666666666696*hstep/(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23]);
values[140*jt+56] = -0.33333333333333298*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))/(Pval[21]*(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23]))+-0.33333333333333298*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))/(Pval[21]*(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23]))+-1.3333333333333299*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval2[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[21]), 2))/(Pval[21]*(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23]));
values[140*jt+57] = -0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(Xval[0] - Pval[20])/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23]))+-0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(Xvalp1[0] - Pval[20])/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23]))+-0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[21]), 2))*(Xval2[0] - Pval[20])/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23]));
values[140*jt+58] = -0.33333333333333298*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(Xval[0] - Pval[20])*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+-0.33333333333333298*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(Xvalp1[0] - Pval[20])*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+-1.3333333333333299*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*(Xval2[0] - Pval[20])*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval2[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2));
values[140*jt+59] = -0.16666666666666699*hstep*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)/pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)+-0.16666666666666699*hstep*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)/pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)+-0.66666666666666696*hstep*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)/pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2);
values[140*jt+60] = 0.16666666666666699*hstep*(pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2) - 1)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)/pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)+0.16666666666666699*hstep*(pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2) - 1)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)/pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)+0.66666666666666696*hstep*(pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2) - 1)*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)/pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2);
values[140*jt+61] = 0.33333333333333298*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))/(Pval[26]*(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28]));
values[140*jt+62] = 0.33333333333333298*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))/(Pval[26]*(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28]));
values[140*jt+63] = 1.3333333333333299*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval2[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[26]), 2))/(Pval[26]*(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28]));
values[140*jt+64] = -0.16666666666666699*hstep/(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28]) + 1;
values[140*jt+65] = -0.16666666666666699*hstep/(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28]) - 1;
values[140*jt+66] = -0.66666666666666696*hstep/(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28]);
values[140*jt+67] = -0.33333333333333298*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))/(Pval[26]*(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28]))+-0.33333333333333298*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))/(Pval[26]*(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28]))+-1.3333333333333299*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval2[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[26]), 2))/(Pval[26]*(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28]));
values[140*jt+68] = -0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(Xval[0] - Pval[25])/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28]))+-0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(Xvalp1[0] - Pval[25])/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28]))+-0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[26]), 2))*(Xval2[0] - Pval[25])/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28]));
values[140*jt+69] = -0.33333333333333298*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(Xval[0] - Pval[25])*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+-0.33333333333333298*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(Xvalp1[0] - Pval[25])*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+-1.3333333333333299*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*(Xval2[0] - Pval[25])*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval2[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2));
values[140*jt+70] = -0.16666666666666699*hstep*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)/pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)+-0.16666666666666699*hstep*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)/pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)+-0.66666666666666696*hstep*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)/pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2);
values[140*jt+71] = 0.16666666666666699*hstep*(pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2) - 1)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)/pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)+0.16666666666666699*hstep*(pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2) - 1)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)/pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)+0.66666666666666696*hstep*(pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2) - 1)*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)/pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2);
values[140*jt+72] = 0.125*hstep*(-K11val[0] + (-pow(Xval[3], 4)*Pval[3] - Pval[5] - Pval[1]*Xval[2]*pow(Xval[1], 3) - Pval[7]*Xval[4])/Pval[0]) + 0.5;
values[140*jt+73] = -0.125*hstep*(-K11valp1[0] + (-pow(Xvalp1[3], 4)*Pval[3] - Pval[5] - Pval[1]*Xvalp1[2]*pow(Xvalp1[1], 3) - Pval[7]*Xvalp1[4])/Pval[0]) + 0.5;
values[140*jt+74] = -1;
values[140*jt+75] = 0.375*Pval[1]*Xval[2]*hstep*pow(Xval[1], 2)*(Pval[2] - Xval[0])/Pval[0];
values[140*jt+76] = -0.375*Pval[1]*Xvalp1[2]*hstep*pow(Xvalp1[1], 2)*(Pval[2] - Xvalp1[0])/Pval[0];
values[140*jt+77] = 0.125*Pval[1]*hstep*pow(Xval[1], 3)*(Pval[2] - Xval[0])/Pval[0];
values[140*jt+78] = -0.125*Pval[1]*hstep*pow(Xvalp1[1], 3)*(Pval[2] - Xvalp1[0])/Pval[0];
values[140*jt+79] = 0.5*pow(Xval[3], 3)*Pval[3]*hstep*(Pval[4] - Xval[0])/Pval[0];
values[140*jt+80] = -0.5*pow(Xvalp1[3], 3)*Pval[3]*hstep*(Pval[4] - Xvalp1[0])/Pval[0];
values[140*jt+81] = 0.125*Pval[7]*hstep*(Pval[8] - Xval[0])/Pval[0];
values[140*jt+82] = -0.125*Pval[7]*hstep*(Pval[8] - Xvalp1[0])/Pval[0];
values[140*jt+83] = 0.125*hstep*(-Xval[0] + Xdval[0]);
values[140*jt+84] = -0.125*hstep*(-Xvalp1[0] + Xdvalp1[0]);
values[140*jt+85] = -0.125*hstep*(Ival[0]/Pval[9] + pow(Xval[3], 4)*Pval[3]*(Pval[4] - Xval[0]) + Pval[5]*(Pval[6] - Xval[0]) + Pval[1]*Xval[2]*pow(Xval[1], 3)*(Pval[2] - Xval[0]) + Pval[7]*Xval[4]*(Pval[8] - Xval[0]))/pow(Pval[0], 2)+0.125*hstep*(Ivalp1[0]/Pval[9] + pow(Xvalp1[3], 4)*Pval[3]*(Pval[4] - Xvalp1[0]) + Pval[5]*(Pval[6] - Xvalp1[0]) + Pval[1]*Xvalp1[2]*pow(Xvalp1[1], 3)*(Pval[2] - Xvalp1[0]) + Pval[7]*Xvalp1[4]*(Pval[8] - Xvalp1[0]))/pow(Pval[0], 2)+0;
values[140*jt+86] = 0.125*Xval[2]*hstep*pow(Xval[1], 3)*(Pval[2] - Xval[0])/Pval[0]+-0.125*Xvalp1[2]*hstep*pow(Xvalp1[1], 3)*(Pval[2] - Xvalp1[0])/Pval[0]+0;
values[140*jt+87] = 0.125*Pval[1]*Xval[2]*hstep*pow(Xval[1], 3)/Pval[0]+-0.125*Pval[1]*Xvalp1[2]*hstep*pow(Xvalp1[1], 3)/Pval[0]+0;
values[140*jt+88] = 0.125*pow(Xval[3], 4)*hstep*(Pval[4] - Xval[0])/Pval[0]+-0.125*pow(Xvalp1[3], 4)*hstep*(Pval[4] - Xvalp1[0])/Pval[0]+0;
values[140*jt+89] = 0.125*pow(Xval[3], 4)*Pval[3]*hstep/Pval[0]+-0.125*pow(Xvalp1[3], 4)*Pval[3]*hstep/Pval[0]+0;
values[140*jt+90] = 0.125*hstep*(Pval[6] - Xval[0])/Pval[0]+-0.125*hstep*(Pval[6] - Xvalp1[0])/Pval[0]+0;
values[140*jt+91] = 0.125*Pval[5]*hstep/Pval[0]+-0.125*Pval[5]*hstep/Pval[0]+0;
values[140*jt+92] = 0.125*hstep*Xval[4]*(Pval[8] - Xval[0])/Pval[0]+-0.125*hstep*Xvalp1[4]*(Pval[8] - Xvalp1[0])/Pval[0]+0;
values[140*jt+93] = 0.125*Pval[7]*hstep*Xval[4]/Pval[0]+-0.125*Pval[7]*hstep*Xvalp1[4]/Pval[0]+0;
values[140*jt+94] = -0.125*Ival[0]*hstep/(Pval[0]*pow(Pval[9], 2))+0.125*Ivalp1[0]*hstep/(Pval[0]*pow(Pval[9], 2))+0;
values[140*jt+95] = 0.25*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))/(Pval[11]*(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13]));
values[140*jt+96] = -0.25*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))/(Pval[11]*(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13]));
values[140*jt+97] = -0.125*hstep/(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13]) + 0.5;
values[140*jt+98] = 0.125*hstep/(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13]) + 0.5;
values[140*jt+99] = -1;
values[140*jt+100] = -0.25*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))/(Pval[11]*(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13]))+0.25*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))/(Pval[11]*(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13]))+0;
values[140*jt+101] = -0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(Xval[0] - Pval[10])/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13]))+0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(Xvalp1[0] - Pval[10])/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13]))+0;
values[140*jt+102] = -0.25*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(Xval[0] - Pval[10])*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+0.25*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(Xvalp1[0] - Pval[10])*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+0;
values[140*jt+103] = -0.125*hstep*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)/pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)+0.125*hstep*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)/pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)+0;
values[140*jt+104] = 0.125*hstep*(pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2) - 1)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)/pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)+-0.125*hstep*(pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2) - 1)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)/pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)+0;
values[140*jt+105] = 0.25*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))/(Pval[16]*(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18]));
values[140*jt+106] = -0.25*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))/(Pval[16]*(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18]));
values[140*jt+107] = -0.125*hstep/(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18]) + 0.5;
values[140*jt+108] = 0.125*hstep/(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18]) + 0.5;
values[140*jt+109] = -1;
values[140*jt+110] = -0.25*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))/(Pval[16]*(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18]))+0.25*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))/(Pval[16]*(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18]))+0;
values[140*jt+111] = -0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(Xval[0] - Pval[15])/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18]))+0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(Xvalp1[0] - Pval[15])/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18]))+0;
values[140*jt+112] = -0.25*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(Xval[0] - Pval[15])*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+0.25*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(Xvalp1[0] - Pval[15])*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+0;
values[140*jt+113] = -0.125*hstep*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)/pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)+0.125*hstep*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)/pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)+0;
values[140*jt+114] = 0.125*hstep*(pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2) - 1)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)/pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)+-0.125*hstep*(pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2) - 1)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)/pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)+0;
values[140*jt+115] = 0.25*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))/(Pval[21]*(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23]));
values[140*jt+116] = -0.25*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))/(Pval[21]*(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23]));
values[140*jt+117] = -0.125*hstep/(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23]) + 0.5;
values[140*jt+118] = 0.125*hstep/(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23]) + 0.5;
values[140*jt+119] = -1;
values[140*jt+120] = -0.25*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))/(Pval[21]*(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23]))+0.25*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))/(Pval[21]*(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23]))+0;
values[140*jt+121] = -0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(Xval[0] - Pval[20])/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23]))+0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(Xvalp1[0] - Pval[20])/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23]))+0;
values[140*jt+122] = -0.25*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(Xval[0] - Pval[20])*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+0.25*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(Xvalp1[0] - Pval[20])*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+0;
values[140*jt+123] = -0.125*hstep*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)/pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)+0.125*hstep*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)/pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)+0;
values[140*jt+124] = 0.125*hstep*(pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2) - 1)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)/pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)+-0.125*hstep*(pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2) - 1)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)/pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)+0;
values[140*jt+125] = 0.25*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))/(Pval[26]*(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28]));
values[140*jt+126] = -0.25*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))/(Pval[26]*(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28]));
values[140*jt+127] = -0.125*hstep/(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28]) + 0.5;
values[140*jt+128] = 0.125*hstep/(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28]) + 0.5;
values[140*jt+129] = -1;
values[140*jt+130] = -0.25*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))/(Pval[26]*(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28]))+0.25*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))/(Pval[26]*(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28]))+0;
values[140*jt+131] = -0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(Xval[0] - Pval[25])/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28]))+0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(Xvalp1[0] - Pval[25])/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28]))+0;
values[140*jt+132] = -0.25*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(Xval[0] - Pval[25])*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+0.25*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(Xvalp1[0] - Pval[25])*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+0;
values[140*jt+133] = -0.125*hstep*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)/pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)+0.125*hstep*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)/pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)+0;
values[140*jt+134] = 0.125*hstep*(pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2) - 1)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)/pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)+-0.125*hstep*(pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2) - 1)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)/pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)+0;
values[140*jt+135] = 0.5;
values[140*jt+136] = 0.5;
values[140*jt+137] = -1;
values[140*jt+138] = 0.125*hstep;
values[140*jt+139] = -0.125*hstep;
} //end for loop
} //end else
return true;
}
// return the structure or values of the hessian
bool NAKLH_NLP::eval_h(Index n, const Number* x, bool new_x,
Number obj_factor, Index m, const Number* lambda,
bool new_lambda, Index nele_hess, Index* iRow,
Index* jCol, Number* values)
{
if (values == NULL) {
// return the structure. This is a symmetric matrix, fill in the lower left
// triangle only.
// Each non-zero Hessian element has its own explicit loop
// since each element needs a different number of matrix elements
for(Index jt=0;jt<Time+1;jt++) {
iRow[0*(Time+1)+0*(Time)+0+jt] = (Time+1)*1+jt;
jCol[0*(Time+1)+0*(Time)+0+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[1*(Time+1)+0*(Time)+0+jt] = (Time+1)*7+Time*1+jt;
jCol[1*(Time+1)+0*(Time)+0+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[1*(Time+1)+1*(Time)+0+jt] = (Time+1)*1+jt;
jCol[1*(Time+1)+1*(Time)+0+jt] = (Time+1)*1+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[2*(Time+1)+1*(Time)+0+jt] = (Time+1)*7+Time*1+jt;
jCol[2*(Time+1)+1*(Time)+0+jt] = (Time+1)*7+Time*1+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[2*(Time+1)+2*(Time)+0+jt] = (Time+1)*2+jt;
jCol[2*(Time+1)+2*(Time)+0+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[3*(Time+1)+2*(Time)+0+jt] = (Time+1)*7+Time*2+jt;
jCol[3*(Time+1)+2*(Time)+0+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[3*(Time+1)+3*(Time)+0+jt] = (Time+1)*2+jt;
jCol[3*(Time+1)+3*(Time)+0+jt] = (Time+1)*1+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[4*(Time+1)+3*(Time)+0+jt] = (Time+1)*7+Time*2+jt;
jCol[4*(Time+1)+3*(Time)+0+jt] = (Time+1)*7+Time*1+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[4*(Time+1)+4*(Time)+0+jt] = (Time+1)*3+jt;
jCol[4*(Time+1)+4*(Time)+0+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[5*(Time+1)+4*(Time)+0+jt] = (Time+1)*7+Time*3+jt;
jCol[5*(Time+1)+4*(Time)+0+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[5*(Time+1)+5*(Time)+0+jt] = (Time+1)*3+jt;
jCol[5*(Time+1)+5*(Time)+0+jt] = (Time+1)*3+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[6*(Time+1)+5*(Time)+0+jt] = (Time+1)*7+Time*3+jt;
jCol[6*(Time+1)+5*(Time)+0+jt] = (Time+1)*7+Time*3+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[6*(Time+1)+6*(Time)+0+jt] = (Time+1)*4+jt;
jCol[6*(Time+1)+6*(Time)+0+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[7*(Time+1)+6*(Time)+0+jt] = (Time+1)*7+Time*4+jt;
jCol[7*(Time+1)+6*(Time)+0+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[7*(Time+1)+7*(Time)+0+jt] = (Time+1)*5+jt;
jCol[7*(Time+1)+7*(Time)+0+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[8*(Time+1)+7*(Time)+0+jt] = (Time+1)*7+Time*5+jt;
jCol[8*(Time+1)+7*(Time)+0+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[8*(Time+1)+8*(Time)+0+jt] = 2*Time*7+7;
jCol[8*(Time+1)+8*(Time)+0+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[9*(Time+1)+8*(Time)+0+jt] = 2*Time*7+7;
jCol[9*(Time+1)+8*(Time)+0+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[9*(Time+1)+9*(Time)+0+jt] = 2*Time*7+7;
jCol[9*(Time+1)+9*(Time)+0+jt] = (Time+1)*1+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[10*(Time+1)+9*(Time)+0+jt] = 2*Time*7+7;
jCol[10*(Time+1)+9*(Time)+0+jt] = (Time+1)*7+Time*1+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[10*(Time+1)+10*(Time)+0+jt] = 2*Time*7+7;
jCol[10*(Time+1)+10*(Time)+0+jt] = (Time+1)*2+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[11*(Time+1)+10*(Time)+0+jt] = 2*Time*7+7;
jCol[11*(Time+1)+10*(Time)+0+jt] = (Time+1)*7+Time*2+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[11*(Time+1)+11*(Time)+0+jt] = 2*Time*7+7;
jCol[11*(Time+1)+11*(Time)+0+jt] = (Time+1)*3+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[12*(Time+1)+11*(Time)+0+jt] = 2*Time*7+7;
jCol[12*(Time+1)+11*(Time)+0+jt] = (Time+1)*7+Time*3+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[12*(Time+1)+12*(Time)+0+jt] = 2*Time*7+7;
jCol[12*(Time+1)+12*(Time)+0+jt] = (Time+1)*4+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[13*(Time+1)+12*(Time)+0+jt] = 2*Time*7+7;
jCol[13*(Time+1)+12*(Time)+0+jt] = (Time+1)*7+Time*4+jt;
}
for(Index jt=0;jt<1;jt++) {
iRow[13*(Time+1)+13*(Time)+0+jt] = 2*Time*7+7;
jCol[13*(Time+1)+13*(Time)+0+jt] = 2*Time*7+7;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[13*(Time+1)+13*(Time)+1+jt] = 2*Time*7+8;
jCol[13*(Time+1)+13*(Time)+1+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[14*(Time+1)+13*(Time)+1+jt] = 2*Time*7+8;
jCol[14*(Time+1)+13*(Time)+1+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[14*(Time+1)+14*(Time)+1+jt] = 2*Time*7+8;
jCol[14*(Time+1)+14*(Time)+1+jt] = (Time+1)*1+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[15*(Time+1)+14*(Time)+1+jt] = 2*Time*7+8;
jCol[15*(Time+1)+14*(Time)+1+jt] = (Time+1)*7+Time*1+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[15*(Time+1)+15*(Time)+1+jt] = 2*Time*7+8;
jCol[15*(Time+1)+15*(Time)+1+jt] = (Time+1)*2+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[16*(Time+1)+15*(Time)+1+jt] = 2*Time*7+8;
jCol[16*(Time+1)+15*(Time)+1+jt] = (Time+1)*7+Time*2+jt;
}
for(Index jt=0;jt<1;jt++) {
iRow[16*(Time+1)+16*(Time)+1+jt] = 2*Time*7+8;
jCol[16*(Time+1)+16*(Time)+1+jt] = 2*Time*7+7;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[16*(Time+1)+16*(Time)+2+jt] = 2*Time*7+9;
jCol[16*(Time+1)+16*(Time)+2+jt] = (Time+1)*1+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[17*(Time+1)+16*(Time)+2+jt] = 2*Time*7+9;
jCol[17*(Time+1)+16*(Time)+2+jt] = (Time+1)*7+Time*1+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[17*(Time+1)+17*(Time)+2+jt] = 2*Time*7+9;
jCol[17*(Time+1)+17*(Time)+2+jt] = (Time+1)*2+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[18*(Time+1)+17*(Time)+2+jt] = 2*Time*7+9;
jCol[18*(Time+1)+17*(Time)+2+jt] = (Time+1)*7+Time*2+jt;
}
for(Index jt=0;jt<1;jt++) {
iRow[18*(Time+1)+18*(Time)+2+jt] = 2*Time*7+9;
jCol[18*(Time+1)+18*(Time)+2+jt] = 2*Time*7+7;
}
for(Index jt=0;jt<1;jt++) {
iRow[18*(Time+1)+18*(Time)+3+jt] = 2*Time*7+9;
jCol[18*(Time+1)+18*(Time)+3+jt] = 2*Time*7+8;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[18*(Time+1)+18*(Time)+4+jt] = 2*Time*7+10;
jCol[18*(Time+1)+18*(Time)+4+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[19*(Time+1)+18*(Time)+4+jt] = 2*Time*7+10;
jCol[19*(Time+1)+18*(Time)+4+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[19*(Time+1)+19*(Time)+4+jt] = 2*Time*7+10;
jCol[19*(Time+1)+19*(Time)+4+jt] = (Time+1)*3+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[20*(Time+1)+19*(Time)+4+jt] = 2*Time*7+10;
jCol[20*(Time+1)+19*(Time)+4+jt] = (Time+1)*7+Time*3+jt;
}
for(Index jt=0;jt<1;jt++) {
iRow[20*(Time+1)+20*(Time)+4+jt] = 2*Time*7+10;
jCol[20*(Time+1)+20*(Time)+4+jt] = 2*Time*7+7;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[20*(Time+1)+20*(Time)+5+jt] = 2*Time*7+11;
jCol[20*(Time+1)+20*(Time)+5+jt] = (Time+1)*3+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[21*(Time+1)+20*(Time)+5+jt] = 2*Time*7+11;
jCol[21*(Time+1)+20*(Time)+5+jt] = (Time+1)*7+Time*3+jt;
}
for(Index jt=0;jt<1;jt++) {
iRow[21*(Time+1)+21*(Time)+5+jt] = 2*Time*7+11;
jCol[21*(Time+1)+21*(Time)+5+jt] = 2*Time*7+7;
}
for(Index jt=0;jt<1;jt++) {
iRow[21*(Time+1)+21*(Time)+6+jt] = 2*Time*7+11;
jCol[21*(Time+1)+21*(Time)+6+jt] = 2*Time*7+10;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[21*(Time+1)+21*(Time)+7+jt] = 2*Time*7+12;
jCol[21*(Time+1)+21*(Time)+7+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[22*(Time+1)+21*(Time)+7+jt] = 2*Time*7+12;
jCol[22*(Time+1)+21*(Time)+7+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<1;jt++) {
iRow[22*(Time+1)+22*(Time)+7+jt] = 2*Time*7+12;
jCol[22*(Time+1)+22*(Time)+7+jt] = 2*Time*7+7;
}
for(Index jt=0;jt<1;jt++) {
iRow[22*(Time+1)+22*(Time)+8+jt] = 2*Time*7+13;
jCol[22*(Time+1)+22*(Time)+8+jt] = 2*Time*7+7;
}
for(Index jt=0;jt<1;jt++) {
iRow[22*(Time+1)+22*(Time)+9+jt] = 2*Time*7+13;
jCol[22*(Time+1)+22*(Time)+9+jt] = 2*Time*7+12;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[22*(Time+1)+22*(Time)+10+jt] = 2*Time*7+14;
jCol[22*(Time+1)+22*(Time)+10+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[23*(Time+1)+22*(Time)+10+jt] = 2*Time*7+14;
jCol[23*(Time+1)+22*(Time)+10+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[23*(Time+1)+23*(Time)+10+jt] = 2*Time*7+14;
jCol[23*(Time+1)+23*(Time)+10+jt] = (Time+1)*4+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[24*(Time+1)+23*(Time)+10+jt] = 2*Time*7+14;
jCol[24*(Time+1)+23*(Time)+10+jt] = (Time+1)*7+Time*4+jt;
}
for(Index jt=0;jt<1;jt++) {
iRow[24*(Time+1)+24*(Time)+10+jt] = 2*Time*7+14;
jCol[24*(Time+1)+24*(Time)+10+jt] = 2*Time*7+7;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[24*(Time+1)+24*(Time)+11+jt] = 2*Time*7+15;
jCol[24*(Time+1)+24*(Time)+11+jt] = (Time+1)*4+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[25*(Time+1)+24*(Time)+11+jt] = 2*Time*7+15;
jCol[25*(Time+1)+24*(Time)+11+jt] = (Time+1)*7+Time*4+jt;
}
for(Index jt=0;jt<1;jt++) {
iRow[25*(Time+1)+25*(Time)+11+jt] = 2*Time*7+15;
jCol[25*(Time+1)+25*(Time)+11+jt] = 2*Time*7+7;
}
for(Index jt=0;jt<1;jt++) {
iRow[25*(Time+1)+25*(Time)+12+jt] = 2*Time*7+15;
jCol[25*(Time+1)+25*(Time)+12+jt] = 2*Time*7+14;
}
for(Index jt=0;jt<1;jt++) {
iRow[25*(Time+1)+25*(Time)+13+jt] = 2*Time*7+16;
jCol[25*(Time+1)+25*(Time)+13+jt] = 2*Time*7+7;
}
for(Index jt=0;jt<1;jt++) {
iRow[25*(Time+1)+25*(Time)+14+jt] = 2*Time*7+16;
jCol[25*(Time+1)+25*(Time)+14+jt] = 2*Time*7+16;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[25*(Time+1)+25*(Time)+15+jt] = (Time+1)*0+jt;
jCol[25*(Time+1)+25*(Time)+15+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[26*(Time+1)+25*(Time)+15+jt] = (Time+1)*7+Time*0+jt;
jCol[26*(Time+1)+25*(Time)+15+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[26*(Time+1)+26*(Time)+15+jt] = 2*Time*7+17;
jCol[26*(Time+1)+26*(Time)+15+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[27*(Time+1)+26*(Time)+15+jt] = 2*Time*7+17;
jCol[27*(Time+1)+26*(Time)+15+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[27*(Time+1)+27*(Time)+15+jt] = 2*Time*7+17;
jCol[27*(Time+1)+27*(Time)+15+jt] = (Time+1)*1+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[28*(Time+1)+27*(Time)+15+jt] = 2*Time*7+17;
jCol[28*(Time+1)+27*(Time)+15+jt] = (Time+1)*7+Time*1+jt;
}
for(Index jt=0;jt<1;jt++) {
iRow[28*(Time+1)+28*(Time)+15+jt] = 2*Time*7+17;
jCol[28*(Time+1)+28*(Time)+15+jt] = 2*Time*7+17;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[28*(Time+1)+28*(Time)+16+jt] = 2*Time*7+18;
jCol[28*(Time+1)+28*(Time)+16+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[29*(Time+1)+28*(Time)+16+jt] = 2*Time*7+18;
jCol[29*(Time+1)+28*(Time)+16+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<1;jt++) {
iRow[29*(Time+1)+29*(Time)+16+jt] = 2*Time*7+18;
jCol[29*(Time+1)+29*(Time)+16+jt] = 2*Time*7+17;
}
for(Index jt=0;jt<1;jt++) {
iRow[29*(Time+1)+29*(Time)+17+jt] = 2*Time*7+18;
jCol[29*(Time+1)+29*(Time)+17+jt] = 2*Time*7+18;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[29*(Time+1)+29*(Time)+18+jt] = 2*Time*7+19;
jCol[29*(Time+1)+29*(Time)+18+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[30*(Time+1)+29*(Time)+18+jt] = 2*Time*7+19;
jCol[30*(Time+1)+29*(Time)+18+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[30*(Time+1)+30*(Time)+18+jt] = 2*Time*7+19;
jCol[30*(Time+1)+30*(Time)+18+jt] = (Time+1)*1+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[31*(Time+1)+30*(Time)+18+jt] = 2*Time*7+19;
jCol[31*(Time+1)+30*(Time)+18+jt] = (Time+1)*7+Time*1+jt;
}
for(Index jt=0;jt<1;jt++) {
iRow[31*(Time+1)+31*(Time)+18+jt] = 2*Time*7+19;
jCol[31*(Time+1)+31*(Time)+18+jt] = 2*Time*7+17;
}
for(Index jt=0;jt<1;jt++) {
iRow[31*(Time+1)+31*(Time)+19+jt] = 2*Time*7+19;
jCol[31*(Time+1)+31*(Time)+19+jt] = 2*Time*7+18;
}
for(Index jt=0;jt<1;jt++) {
iRow[31*(Time+1)+31*(Time)+20+jt] = 2*Time*7+19;
jCol[31*(Time+1)+31*(Time)+20+jt] = 2*Time*7+19;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[31*(Time+1)+31*(Time)+21+jt] = 2*Time*7+20;
jCol[31*(Time+1)+31*(Time)+21+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[32*(Time+1)+31*(Time)+21+jt] = 2*Time*7+20;
jCol[32*(Time+1)+31*(Time)+21+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[32*(Time+1)+32*(Time)+21+jt] = 2*Time*7+20;
jCol[32*(Time+1)+32*(Time)+21+jt] = (Time+1)*1+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[33*(Time+1)+32*(Time)+21+jt] = 2*Time*7+20;
jCol[33*(Time+1)+32*(Time)+21+jt] = (Time+1)*7+Time*1+jt;
}
for(Index jt=0;jt<1;jt++) {
iRow[33*(Time+1)+33*(Time)+21+jt] = 2*Time*7+20;
jCol[33*(Time+1)+33*(Time)+21+jt] = 2*Time*7+17;
}
for(Index jt=0;jt<1;jt++) {
iRow[33*(Time+1)+33*(Time)+22+jt] = 2*Time*7+20;
jCol[33*(Time+1)+33*(Time)+22+jt] = 2*Time*7+18;
}
for(Index jt=0;jt<1;jt++) {
iRow[33*(Time+1)+33*(Time)+23+jt] = 2*Time*7+20;
jCol[33*(Time+1)+33*(Time)+23+jt] = 2*Time*7+19;
}
for(Index jt=0;jt<1;jt++) {
iRow[33*(Time+1)+33*(Time)+24+jt] = 2*Time*7+20;
jCol[33*(Time+1)+33*(Time)+24+jt] = 2*Time*7+20;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[33*(Time+1)+33*(Time)+25+jt] = 2*Time*7+21;
jCol[33*(Time+1)+33*(Time)+25+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[34*(Time+1)+33*(Time)+25+jt] = 2*Time*7+21;
jCol[34*(Time+1)+33*(Time)+25+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[34*(Time+1)+34*(Time)+25+jt] = 2*Time*7+21;
jCol[34*(Time+1)+34*(Time)+25+jt] = (Time+1)*1+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[35*(Time+1)+34*(Time)+25+jt] = 2*Time*7+21;
jCol[35*(Time+1)+34*(Time)+25+jt] = (Time+1)*7+Time*1+jt;
}
for(Index jt=0;jt<1;jt++) {
iRow[35*(Time+1)+35*(Time)+25+jt] = 2*Time*7+21;
jCol[35*(Time+1)+35*(Time)+25+jt] = 2*Time*7+17;
}
for(Index jt=0;jt<1;jt++) {
iRow[35*(Time+1)+35*(Time)+26+jt] = 2*Time*7+21;
jCol[35*(Time+1)+35*(Time)+26+jt] = 2*Time*7+18;
}
for(Index jt=0;jt<1;jt++) {
iRow[35*(Time+1)+35*(Time)+27+jt] = 2*Time*7+21;
jCol[35*(Time+1)+35*(Time)+27+jt] = 2*Time*7+19;
}
for(Index jt=0;jt<1;jt++) {
iRow[35*(Time+1)+35*(Time)+28+jt] = 2*Time*7+21;
jCol[35*(Time+1)+35*(Time)+28+jt] = 2*Time*7+20;
}
for(Index jt=0;jt<1;jt++) {
iRow[35*(Time+1)+35*(Time)+29+jt] = 2*Time*7+21;
jCol[35*(Time+1)+35*(Time)+29+jt] = 2*Time*7+21;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[35*(Time+1)+35*(Time)+30+jt] = 2*Time*7+22;
jCol[35*(Time+1)+35*(Time)+30+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[36*(Time+1)+35*(Time)+30+jt] = 2*Time*7+22;
jCol[36*(Time+1)+35*(Time)+30+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[36*(Time+1)+36*(Time)+30+jt] = 2*Time*7+22;
jCol[36*(Time+1)+36*(Time)+30+jt] = (Time+1)*2+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[37*(Time+1)+36*(Time)+30+jt] = 2*Time*7+22;
jCol[37*(Time+1)+36*(Time)+30+jt] = (Time+1)*7+Time*2+jt;
}
for(Index jt=0;jt<1;jt++) {
iRow[37*(Time+1)+37*(Time)+30+jt] = 2*Time*7+22;
jCol[37*(Time+1)+37*(Time)+30+jt] = 2*Time*7+22;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[37*(Time+1)+37*(Time)+31+jt] = 2*Time*7+23;
jCol[37*(Time+1)+37*(Time)+31+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[38*(Time+1)+37*(Time)+31+jt] = 2*Time*7+23;
jCol[38*(Time+1)+37*(Time)+31+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<1;jt++) {
iRow[38*(Time+1)+38*(Time)+31+jt] = 2*Time*7+23;
jCol[38*(Time+1)+38*(Time)+31+jt] = 2*Time*7+22;
}
for(Index jt=0;jt<1;jt++) {
iRow[38*(Time+1)+38*(Time)+32+jt] = 2*Time*7+23;
jCol[38*(Time+1)+38*(Time)+32+jt] = 2*Time*7+23;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[38*(Time+1)+38*(Time)+33+jt] = 2*Time*7+24;
jCol[38*(Time+1)+38*(Time)+33+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[39*(Time+1)+38*(Time)+33+jt] = 2*Time*7+24;
jCol[39*(Time+1)+38*(Time)+33+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[39*(Time+1)+39*(Time)+33+jt] = 2*Time*7+24;
jCol[39*(Time+1)+39*(Time)+33+jt] = (Time+1)*2+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[40*(Time+1)+39*(Time)+33+jt] = 2*Time*7+24;
jCol[40*(Time+1)+39*(Time)+33+jt] = (Time+1)*7+Time*2+jt;
}
for(Index jt=0;jt<1;jt++) {
iRow[40*(Time+1)+40*(Time)+33+jt] = 2*Time*7+24;
jCol[40*(Time+1)+40*(Time)+33+jt] = 2*Time*7+22;
}
for(Index jt=0;jt<1;jt++) {
iRow[40*(Time+1)+40*(Time)+34+jt] = 2*Time*7+24;
jCol[40*(Time+1)+40*(Time)+34+jt] = 2*Time*7+23;
}
for(Index jt=0;jt<1;jt++) {
iRow[40*(Time+1)+40*(Time)+35+jt] = 2*Time*7+24;
jCol[40*(Time+1)+40*(Time)+35+jt] = 2*Time*7+24;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[40*(Time+1)+40*(Time)+36+jt] = 2*Time*7+25;
jCol[40*(Time+1)+40*(Time)+36+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[41*(Time+1)+40*(Time)+36+jt] = 2*Time*7+25;
jCol[41*(Time+1)+40*(Time)+36+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[41*(Time+1)+41*(Time)+36+jt] = 2*Time*7+25;
jCol[41*(Time+1)+41*(Time)+36+jt] = (Time+1)*2+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[42*(Time+1)+41*(Time)+36+jt] = 2*Time*7+25;
jCol[42*(Time+1)+41*(Time)+36+jt] = (Time+1)*7+Time*2+jt;
}
for(Index jt=0;jt<1;jt++) {
iRow[42*(Time+1)+42*(Time)+36+jt] = 2*Time*7+25;
jCol[42*(Time+1)+42*(Time)+36+jt] = 2*Time*7+22;
}
for(Index jt=0;jt<1;jt++) {
iRow[42*(Time+1)+42*(Time)+37+jt] = 2*Time*7+25;
jCol[42*(Time+1)+42*(Time)+37+jt] = 2*Time*7+23;
}
for(Index jt=0;jt<1;jt++) {
iRow[42*(Time+1)+42*(Time)+38+jt] = 2*Time*7+25;
jCol[42*(Time+1)+42*(Time)+38+jt] = 2*Time*7+24;
}
for(Index jt=0;jt<1;jt++) {
iRow[42*(Time+1)+42*(Time)+39+jt] = 2*Time*7+25;
jCol[42*(Time+1)+42*(Time)+39+jt] = 2*Time*7+25;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[42*(Time+1)+42*(Time)+40+jt] = 2*Time*7+26;
jCol[42*(Time+1)+42*(Time)+40+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[43*(Time+1)+42*(Time)+40+jt] = 2*Time*7+26;
jCol[43*(Time+1)+42*(Time)+40+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[43*(Time+1)+43*(Time)+40+jt] = 2*Time*7+26;
jCol[43*(Time+1)+43*(Time)+40+jt] = (Time+1)*2+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[44*(Time+1)+43*(Time)+40+jt] = 2*Time*7+26;
jCol[44*(Time+1)+43*(Time)+40+jt] = (Time+1)*7+Time*2+jt;
}
for(Index jt=0;jt<1;jt++) {
iRow[44*(Time+1)+44*(Time)+40+jt] = 2*Time*7+26;
jCol[44*(Time+1)+44*(Time)+40+jt] = 2*Time*7+22;
}
for(Index jt=0;jt<1;jt++) {
iRow[44*(Time+1)+44*(Time)+41+jt] = 2*Time*7+26;
jCol[44*(Time+1)+44*(Time)+41+jt] = 2*Time*7+23;
}
for(Index jt=0;jt<1;jt++) {
iRow[44*(Time+1)+44*(Time)+42+jt] = 2*Time*7+26;
jCol[44*(Time+1)+44*(Time)+42+jt] = 2*Time*7+24;
}
for(Index jt=0;jt<1;jt++) {
iRow[44*(Time+1)+44*(Time)+43+jt] = 2*Time*7+26;
jCol[44*(Time+1)+44*(Time)+43+jt] = 2*Time*7+25;
}
for(Index jt=0;jt<1;jt++) {
iRow[44*(Time+1)+44*(Time)+44+jt] = 2*Time*7+26;
jCol[44*(Time+1)+44*(Time)+44+jt] = 2*Time*7+26;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[44*(Time+1)+44*(Time)+45+jt] = 2*Time*7+27;
jCol[44*(Time+1)+44*(Time)+45+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[45*(Time+1)+44*(Time)+45+jt] = 2*Time*7+27;
jCol[45*(Time+1)+44*(Time)+45+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[45*(Time+1)+45*(Time)+45+jt] = 2*Time*7+27;
jCol[45*(Time+1)+45*(Time)+45+jt] = (Time+1)*3+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[46*(Time+1)+45*(Time)+45+jt] = 2*Time*7+27;
jCol[46*(Time+1)+45*(Time)+45+jt] = (Time+1)*7+Time*3+jt;
}
for(Index jt=0;jt<1;jt++) {
iRow[46*(Time+1)+46*(Time)+45+jt] = 2*Time*7+27;
jCol[46*(Time+1)+46*(Time)+45+jt] = 2*Time*7+27;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[46*(Time+1)+46*(Time)+46+jt] = 2*Time*7+28;
jCol[46*(Time+1)+46*(Time)+46+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[47*(Time+1)+46*(Time)+46+jt] = 2*Time*7+28;
jCol[47*(Time+1)+46*(Time)+46+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<1;jt++) {
iRow[47*(Time+1)+47*(Time)+46+jt] = 2*Time*7+28;
jCol[47*(Time+1)+47*(Time)+46+jt] = 2*Time*7+27;
}
for(Index jt=0;jt<1;jt++) {
iRow[47*(Time+1)+47*(Time)+47+jt] = 2*Time*7+28;
jCol[47*(Time+1)+47*(Time)+47+jt] = 2*Time*7+28;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[47*(Time+1)+47*(Time)+48+jt] = 2*Time*7+29;
jCol[47*(Time+1)+47*(Time)+48+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[48*(Time+1)+47*(Time)+48+jt] = 2*Time*7+29;
jCol[48*(Time+1)+47*(Time)+48+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[48*(Time+1)+48*(Time)+48+jt] = 2*Time*7+29;
jCol[48*(Time+1)+48*(Time)+48+jt] = (Time+1)*3+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[49*(Time+1)+48*(Time)+48+jt] = 2*Time*7+29;
jCol[49*(Time+1)+48*(Time)+48+jt] = (Time+1)*7+Time*3+jt;
}
for(Index jt=0;jt<1;jt++) {
iRow[49*(Time+1)+49*(Time)+48+jt] = 2*Time*7+29;
jCol[49*(Time+1)+49*(Time)+48+jt] = 2*Time*7+27;
}
for(Index jt=0;jt<1;jt++) {
iRow[49*(Time+1)+49*(Time)+49+jt] = 2*Time*7+29;
jCol[49*(Time+1)+49*(Time)+49+jt] = 2*Time*7+28;
}
for(Index jt=0;jt<1;jt++) {
iRow[49*(Time+1)+49*(Time)+50+jt] = 2*Time*7+29;
jCol[49*(Time+1)+49*(Time)+50+jt] = 2*Time*7+29;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[49*(Time+1)+49*(Time)+51+jt] = 2*Time*7+30;
jCol[49*(Time+1)+49*(Time)+51+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[50*(Time+1)+49*(Time)+51+jt] = 2*Time*7+30;
jCol[50*(Time+1)+49*(Time)+51+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[50*(Time+1)+50*(Time)+51+jt] = 2*Time*7+30;
jCol[50*(Time+1)+50*(Time)+51+jt] = (Time+1)*3+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[51*(Time+1)+50*(Time)+51+jt] = 2*Time*7+30;
jCol[51*(Time+1)+50*(Time)+51+jt] = (Time+1)*7+Time*3+jt;
}
for(Index jt=0;jt<1;jt++) {
iRow[51*(Time+1)+51*(Time)+51+jt] = 2*Time*7+30;
jCol[51*(Time+1)+51*(Time)+51+jt] = 2*Time*7+27;
}
for(Index jt=0;jt<1;jt++) {
iRow[51*(Time+1)+51*(Time)+52+jt] = 2*Time*7+30;
jCol[51*(Time+1)+51*(Time)+52+jt] = 2*Time*7+28;
}
for(Index jt=0;jt<1;jt++) {
iRow[51*(Time+1)+51*(Time)+53+jt] = 2*Time*7+30;
jCol[51*(Time+1)+51*(Time)+53+jt] = 2*Time*7+29;
}
for(Index jt=0;jt<1;jt++) {
iRow[51*(Time+1)+51*(Time)+54+jt] = 2*Time*7+30;
jCol[51*(Time+1)+51*(Time)+54+jt] = 2*Time*7+30;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[51*(Time+1)+51*(Time)+55+jt] = 2*Time*7+31;
jCol[51*(Time+1)+51*(Time)+55+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[52*(Time+1)+51*(Time)+55+jt] = 2*Time*7+31;
jCol[52*(Time+1)+51*(Time)+55+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[52*(Time+1)+52*(Time)+55+jt] = 2*Time*7+31;
jCol[52*(Time+1)+52*(Time)+55+jt] = (Time+1)*3+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[53*(Time+1)+52*(Time)+55+jt] = 2*Time*7+31;
jCol[53*(Time+1)+52*(Time)+55+jt] = (Time+1)*7+Time*3+jt;
}
for(Index jt=0;jt<1;jt++) {
iRow[53*(Time+1)+53*(Time)+55+jt] = 2*Time*7+31;
jCol[53*(Time+1)+53*(Time)+55+jt] = 2*Time*7+27;
}
for(Index jt=0;jt<1;jt++) {
iRow[53*(Time+1)+53*(Time)+56+jt] = 2*Time*7+31;
jCol[53*(Time+1)+53*(Time)+56+jt] = 2*Time*7+28;
}
for(Index jt=0;jt<1;jt++) {
iRow[53*(Time+1)+53*(Time)+57+jt] = 2*Time*7+31;
jCol[53*(Time+1)+53*(Time)+57+jt] = 2*Time*7+29;
}
for(Index jt=0;jt<1;jt++) {
iRow[53*(Time+1)+53*(Time)+58+jt] = 2*Time*7+31;
jCol[53*(Time+1)+53*(Time)+58+jt] = 2*Time*7+30;
}
for(Index jt=0;jt<1;jt++) {
iRow[53*(Time+1)+53*(Time)+59+jt] = 2*Time*7+31;
jCol[53*(Time+1)+53*(Time)+59+jt] = 2*Time*7+31;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[53*(Time+1)+53*(Time)+60+jt] = 2*Time*7+32;
jCol[53*(Time+1)+53*(Time)+60+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[54*(Time+1)+53*(Time)+60+jt] = 2*Time*7+32;
jCol[54*(Time+1)+53*(Time)+60+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[54*(Time+1)+54*(Time)+60+jt] = 2*Time*7+32;
jCol[54*(Time+1)+54*(Time)+60+jt] = (Time+1)*4+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[55*(Time+1)+54*(Time)+60+jt] = 2*Time*7+32;
jCol[55*(Time+1)+54*(Time)+60+jt] = (Time+1)*7+Time*4+jt;
}
for(Index jt=0;jt<1;jt++) {
iRow[55*(Time+1)+55*(Time)+60+jt] = 2*Time*7+32;
jCol[55*(Time+1)+55*(Time)+60+jt] = 2*Time*7+32;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[55*(Time+1)+55*(Time)+61+jt] = 2*Time*7+33;
jCol[55*(Time+1)+55*(Time)+61+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[56*(Time+1)+55*(Time)+61+jt] = 2*Time*7+33;
jCol[56*(Time+1)+55*(Time)+61+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<1;jt++) {
iRow[56*(Time+1)+56*(Time)+61+jt] = 2*Time*7+33;
jCol[56*(Time+1)+56*(Time)+61+jt] = 2*Time*7+32;
}
for(Index jt=0;jt<1;jt++) {
iRow[56*(Time+1)+56*(Time)+62+jt] = 2*Time*7+33;
jCol[56*(Time+1)+56*(Time)+62+jt] = 2*Time*7+33;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[56*(Time+1)+56*(Time)+63+jt] = 2*Time*7+34;
jCol[56*(Time+1)+56*(Time)+63+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[57*(Time+1)+56*(Time)+63+jt] = 2*Time*7+34;
jCol[57*(Time+1)+56*(Time)+63+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[57*(Time+1)+57*(Time)+63+jt] = 2*Time*7+34;
jCol[57*(Time+1)+57*(Time)+63+jt] = (Time+1)*4+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[58*(Time+1)+57*(Time)+63+jt] = 2*Time*7+34;
jCol[58*(Time+1)+57*(Time)+63+jt] = (Time+1)*7+Time*4+jt;
}
for(Index jt=0;jt<1;jt++) {
iRow[58*(Time+1)+58*(Time)+63+jt] = 2*Time*7+34;
jCol[58*(Time+1)+58*(Time)+63+jt] = 2*Time*7+32;
}
for(Index jt=0;jt<1;jt++) {
iRow[58*(Time+1)+58*(Time)+64+jt] = 2*Time*7+34;
jCol[58*(Time+1)+58*(Time)+64+jt] = 2*Time*7+33;
}
for(Index jt=0;jt<1;jt++) {
iRow[58*(Time+1)+58*(Time)+65+jt] = 2*Time*7+34;
jCol[58*(Time+1)+58*(Time)+65+jt] = 2*Time*7+34;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[58*(Time+1)+58*(Time)+66+jt] = 2*Time*7+35;
jCol[58*(Time+1)+58*(Time)+66+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[59*(Time+1)+58*(Time)+66+jt] = 2*Time*7+35;
jCol[59*(Time+1)+58*(Time)+66+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[59*(Time+1)+59*(Time)+66+jt] = 2*Time*7+35;
jCol[59*(Time+1)+59*(Time)+66+jt] = (Time+1)*4+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[60*(Time+1)+59*(Time)+66+jt] = 2*Time*7+35;
jCol[60*(Time+1)+59*(Time)+66+jt] = (Time+1)*7+Time*4+jt;
}
for(Index jt=0;jt<1;jt++) {
iRow[60*(Time+1)+60*(Time)+66+jt] = 2*Time*7+35;
jCol[60*(Time+1)+60*(Time)+66+jt] = 2*Time*7+32;
}
for(Index jt=0;jt<1;jt++) {
iRow[60*(Time+1)+60*(Time)+67+jt] = 2*Time*7+35;
jCol[60*(Time+1)+60*(Time)+67+jt] = 2*Time*7+33;
}
for(Index jt=0;jt<1;jt++) {
iRow[60*(Time+1)+60*(Time)+68+jt] = 2*Time*7+35;
jCol[60*(Time+1)+60*(Time)+68+jt] = 2*Time*7+34;
}
for(Index jt=0;jt<1;jt++) {
iRow[60*(Time+1)+60*(Time)+69+jt] = 2*Time*7+35;
jCol[60*(Time+1)+60*(Time)+69+jt] = 2*Time*7+35;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[60*(Time+1)+60*(Time)+70+jt] = 2*Time*7+36;
jCol[60*(Time+1)+60*(Time)+70+jt] = (Time+1)*0+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[61*(Time+1)+60*(Time)+70+jt] = 2*Time*7+36;
jCol[61*(Time+1)+60*(Time)+70+jt] = (Time+1)*7+Time*0+jt;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[61*(Time+1)+61*(Time)+70+jt] = 2*Time*7+36;
jCol[61*(Time+1)+61*(Time)+70+jt] = (Time+1)*4+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[62*(Time+1)+61*(Time)+70+jt] = 2*Time*7+36;
jCol[62*(Time+1)+61*(Time)+70+jt] = (Time+1)*7+Time*4+jt;
}
for(Index jt=0;jt<1;jt++) {
iRow[62*(Time+1)+62*(Time)+70+jt] = 2*Time*7+36;
jCol[62*(Time+1)+62*(Time)+70+jt] = 2*Time*7+32;
}
for(Index jt=0;jt<1;jt++) {
iRow[62*(Time+1)+62*(Time)+71+jt] = 2*Time*7+36;
jCol[62*(Time+1)+62*(Time)+71+jt] = 2*Time*7+33;
}
for(Index jt=0;jt<1;jt++) {
iRow[62*(Time+1)+62*(Time)+72+jt] = 2*Time*7+36;
jCol[62*(Time+1)+62*(Time)+72+jt] = 2*Time*7+34;
}
for(Index jt=0;jt<1;jt++) {
iRow[62*(Time+1)+62*(Time)+73+jt] = 2*Time*7+36;
jCol[62*(Time+1)+62*(Time)+73+jt] = 2*Time*7+35;
}
for(Index jt=0;jt<1;jt++) {
iRow[62*(Time+1)+62*(Time)+74+jt] = 2*Time*7+36;
jCol[62*(Time+1)+62*(Time)+74+jt] = 2*Time*7+36;
}
for(Index jt=0;jt<Time+1;jt++) {
iRow[62*(Time+1)+62*(Time)+75+jt] = (Time+1)*5+jt;
jCol[62*(Time+1)+62*(Time)+75+jt] = (Time+1)*5+jt;
}
for(Index jt=0;jt<Time;jt++) {
iRow[63*(Time+1)+62*(Time)+75+jt] = (Time+1)*7+Time*5+jt;
jCol[63*(Time+1)+62*(Time)+75+jt] = (Time+1)*7+Time*5+jt;
}
}
else {
// return the values. This is a symmetric matrix, fill the lower left
// triangle only
// initialize the values array
// Point to the initial starting spot for the Hessian elements
for(Index jt=0;jt<126*Time+138;jt++) values[jt] = 0.; // Initialize matrix
// fill the objective portion
for(Index jt=0;jt<Time;jt++) {
for(Index i=0;i<nY;i++) {
Xval[i] = x[jt + i*(Time+1)];
Xvalp1[i] = x[jt + i*(Time+1) + 1];
Xval2[i] = x[(Time+1)*(nY+2*nU) + jt + i*(Time)];
} //end for loop
for(Index i=0;i<nU;i++) {
K11val[i] = x[jt + nY*(Time+1) + 2*i*(Time+1)];
K11valp1[i] = x[jt + nY*(Time+1) + 2*i*(Time+1) + 1];
K11val2[i] = x[(Time+1)*(nY+2*nU) + (nY+2*i)*Time + jt];
dK11val[i] = x[jt + (nY+2*i+1)*(Time+1)];
dK11valp1[i] = x[jt + (nY+2*i+1)*(Time+1)+1];
dK11val2[i] = x[(Time+1)*(nY+2*nU) + (nY+2*i+1)*Time + jt];
} //end for loop
Xdval[0] = Vdata[2*jt];
Xdval2[0] = Vdata[2*jt+1];
Xdvalp1[0] = Vdata[2*jt+2];
Ival[0] = Iinj[2*jt];
Ival2[0] = Iinj[2*jt+1];
Ivalp1[0] = Iinj[2*jt+2];
for(Index i=0;i<nP;i++) {
Pval[i] = x[(2*Time+1)*(nY+2*nU)+i];
} //end for loop
values[25*(Time+1)+25*(Time)+15+jt] += obj_factor*(2)/(2*Time+1);
values[26*(Time+1)+25*(Time)+15+jt] += obj_factor*(2)/(2*Time+1);
values[62*(Time+1)+62*(Time)+75+jt] += obj_factor*(2)/(2*Time+1);
values[63*(Time+1)+62*(Time)+75+jt] += obj_factor*(2)/(2*Time+1);
} //end loop over Time
// Add elements for last time step
for(Index i=0;i<nY;i++) {
Xval[i] = x[Time + i*(Time+1)];
Xvalp1[i] = 0;
Xval2[i] = 0;
} //end for loop
for(Index i=0;i<nU;i++) {
K11val[i] = x[Time + nY*(Time+1) + 2*i*(Time+1)];
K11valp1[i] = 0;
K11val2[i] = 0;
dK11val[i] = x[Time + (nY+2*i+1)*(Time+1)];
dK11valp1[i] = 0;
dK11val2[i] = 0;
} //end for loop
Xdval[0] = Vdata[2*Time];
Xdval2[0] = 0;
Xdvalp1[0] = 0;
Ival[0] = Iinj[2*Time];
Ival2[0] = 0;
Ivalp1[0] = 0;
for(Index i=0;i<nP;i++) {
Pval[i] = x[(2*Time+1)*(nY+2*nU)+i];
} //end for loop
values[25*(Time+1)+25*(Time)+15+Time+1-1] += obj_factor*(2)/(2*Time+1);
values[62*(Time+1)+62*(Time)+75+Time+1-1] += obj_factor*(2)/(2*Time+1);
// fill the constraint portions
for(Index jt=0;jt<Time;jt++) {
for(Index i=0;i<nY;i++) {
Xval[i] = x[jt + i*(Time+1)];
Xvalp1[i] = x[jt + i*(Time+1) + 1];
Xval2[i] = x[(Time+1)*(nY+2*nU) + jt + i*(Time)];
} //end for loop
for(Index i=0;i<nU;i++) {
K11val[i] = x[jt + nY*(Time+1) + 2*i*(Time+1)];
K11valp1[i] = x[jt + nY*(Time+1) + 2*i*(Time+1) + 1];
K11val2[i] = x[(Time+1)*(nY+2*nU) + (nY+2*i)*Time + jt];
dK11val[i] = x[jt + (nY+2*i+1)*(Time+1)];
dK11valp1[i] = x[jt + (nY+2*i+1)*(Time+1)+1];
dK11val2[i] = x[(Time+1)*(nY+2*nU) + (nY+2*i+1)*Time + jt];
} //end for loop
Xdval[0] = Vdata[2*jt];
Xdval2[0] = Vdata[2*jt+1];
Xdvalp1[0] = Vdata[2*jt+2];
Ival[0] = Iinj[2*jt];
Ival2[0] = Iinj[2*jt+1];
Ivalp1[0] = Iinj[2*jt+2];
for(Index i=0;i<nP;i++) {
Pval[i] = x[(2*Time+1)*(nY+2*nU)+i];
} //end for loop
values[13*(Time+1)+13*(Time)+0] += lambda[11*jt+0]*(0.33333333333333298*hstep*(Ival[0]/Pval[9] + pow(Xval[3], 4)*Pval[3]*(Pval[4] - Xval[0]) + Pval[5]*(Pval[6] - Xval[0]) + Pval[1]*Xval[2]*pow(Xval[1], 3)*(Pval[2] - Xval[0]) + Pval[7]*Xval[4]*(Pval[8] - Xval[0]))/pow(Pval[0], 3)+0.33333333333333298*hstep*(Ivalp1[0]/Pval[9] + pow(Xvalp1[3], 4)*Pval[3]*(Pval[4] - Xvalp1[0]) + Pval[5]*(Pval[6] - Xvalp1[0]) + Pval[1]*Xvalp1[2]*pow(Xvalp1[1], 3)*(Pval[2] - Xvalp1[0]) + Pval[7]*Xvalp1[4]*(Pval[8] - Xvalp1[0]))/pow(Pval[0], 3)+1.3333333333333299*hstep*(Ival2[0]/Pval[9] + pow(Xval2[3], 4)*Pval[3]*(Pval[4] - Xval2[0]) + Pval[5]*(Pval[6] - Xval2[0]) + Pval[1]*Xval2[2]*pow(Xval2[1], 3)*(Pval[2] - Xval2[0]) + Pval[7]*Xval2[4]*(Pval[8] - Xval2[0]))/pow(Pval[0], 3));
values[16*(Time+1)+16*(Time)+1] += lambda[11*jt+0]*(-0.16666666666666699*Xval[2]*hstep*pow(Xval[1], 3)*(Pval[2] - Xval[0])/pow(Pval[0], 2)+-0.16666666666666699*Xvalp1[2]*hstep*pow(Xvalp1[1], 3)*(Pval[2] - Xvalp1[0])/pow(Pval[0], 2)+-0.66666666666666696*Xval2[2]*hstep*pow(Xval2[1], 3)*(Pval[2] - Xval2[0])/pow(Pval[0], 2));
values[18*(Time+1)+18*(Time)+2] += lambda[11*jt+0]*(-0.16666666666666699*Pval[1]*Xval[2]*hstep*pow(Xval[1], 3)/pow(Pval[0], 2)+-0.16666666666666699*Pval[1]*Xvalp1[2]*hstep*pow(Xvalp1[1], 3)/pow(Pval[0], 2)+-0.66666666666666696*Pval[1]*Xval2[2]*hstep*pow(Xval2[1], 3)/pow(Pval[0], 2));
values[18*(Time+1)+18*(Time)+3] += lambda[11*jt+0]*(0.16666666666666699*Xval[2]*hstep*pow(Xval[1], 3)/Pval[0]+0.16666666666666699*Xvalp1[2]*hstep*pow(Xvalp1[1], 3)/Pval[0]+0.66666666666666696*Xval2[2]*hstep*pow(Xval2[1], 3)/Pval[0]);
values[20*(Time+1)+20*(Time)+4] += lambda[11*jt+0]*(-0.16666666666666699*pow(Xval[3], 4)*hstep*(Pval[4] - Xval[0])/pow(Pval[0], 2)+-0.16666666666666699*pow(Xvalp1[3], 4)*hstep*(Pval[4] - Xvalp1[0])/pow(Pval[0], 2)+-0.66666666666666696*pow(Xval2[3], 4)*hstep*(Pval[4] - Xval2[0])/pow(Pval[0], 2));
values[21*(Time+1)+21*(Time)+5] += lambda[11*jt+0]*(-0.16666666666666699*pow(Xval[3], 4)*Pval[3]*hstep/pow(Pval[0], 2)+-0.16666666666666699*pow(Xvalp1[3], 4)*Pval[3]*hstep/pow(Pval[0], 2)+-0.66666666666666696*pow(Xval2[3], 4)*Pval[3]*hstep/pow(Pval[0], 2));
values[21*(Time+1)+21*(Time)+6] += lambda[11*jt+0]*(0.16666666666666699*pow(Xval[3], 4)*hstep/Pval[0]+0.16666666666666699*pow(Xvalp1[3], 4)*hstep/Pval[0]+0.66666666666666696*pow(Xval2[3], 4)*hstep/Pval[0]);
values[22*(Time+1)+22*(Time)+7] += lambda[11*jt+0]*(-0.16666666666666699*hstep*(Pval[6] - Xval[0])/pow(Pval[0], 2)+-0.16666666666666699*hstep*(Pval[6] - Xvalp1[0])/pow(Pval[0], 2)+-0.66666666666666696*hstep*(Pval[6] - Xval2[0])/pow(Pval[0], 2));
values[22*(Time+1)+22*(Time)+8] += lambda[11*jt+0]*(-0.16666666666666699*Pval[5]*hstep/pow(Pval[0], 2)+-0.16666666666666699*Pval[5]*hstep/pow(Pval[0], 2)+-0.66666666666666696*Pval[5]*hstep/pow(Pval[0], 2));
values[22*(Time+1)+22*(Time)+9] += lambda[11*jt+0]*(0.16666666666666699*hstep/Pval[0]+0.16666666666666699*hstep/Pval[0]+0.66666666666666696*hstep/Pval[0]);
values[24*(Time+1)+24*(Time)+10] += lambda[11*jt+0]*(-0.16666666666666699*hstep*Xval[4]*(Pval[8] - Xval[0])/pow(Pval[0], 2)+-0.16666666666666699*hstep*Xvalp1[4]*(Pval[8] - Xvalp1[0])/pow(Pval[0], 2)+-0.66666666666666696*hstep*Xval2[4]*(Pval[8] - Xval2[0])/pow(Pval[0], 2));
values[25*(Time+1)+25*(Time)+11] += lambda[11*jt+0]*(-0.16666666666666699*Pval[7]*hstep*Xval[4]/pow(Pval[0], 2)+-0.16666666666666699*Pval[7]*hstep*Xvalp1[4]/pow(Pval[0], 2)+-0.66666666666666696*Pval[7]*hstep*Xval2[4]/pow(Pval[0], 2));
values[25*(Time+1)+25*(Time)+12] += lambda[11*jt+0]*(0.16666666666666699*hstep*Xval[4]/Pval[0]+0.16666666666666699*hstep*Xvalp1[4]/Pval[0]+0.66666666666666696*hstep*Xval2[4]/Pval[0]);
values[25*(Time+1)+25*(Time)+13] += lambda[11*jt+0]*(0.16666666666666699*Ival[0]*hstep/(pow(Pval[0], 2)*pow(Pval[9], 2))+0.16666666666666699*Ivalp1[0]*hstep/(pow(Pval[0], 2)*pow(Pval[9], 2))+0.66666666666666696*Ival2[0]*hstep/(pow(Pval[0], 2)*pow(Pval[9], 2)));
values[25*(Time+1)+25*(Time)+14] += lambda[11*jt+0]*(0.33333333333333298*Ival[0]*hstep/(Pval[0]*pow(Pval[9], 3))+0.33333333333333298*Ivalp1[0]*hstep/(Pval[0]*pow(Pval[9], 3))+1.3333333333333299*Ival2[0]*hstep/(Pval[0]*pow(Pval[9], 3)));
values[28*(Time+1)+28*(Time)+15] += lambda[11*jt+1]*(1.3333333333333299*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 0.33333333333333298*Pval[14]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.33333333333333298*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[11]*Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.16666666666666699*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*tanh((Xval[0] - Pval[10])/Pval[11])/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13]))+1.3333333333333299*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 0.33333333333333298*Pval[14]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.33333333333333298*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[11]*Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.16666666666666699*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*tanh((Xvalp1[0] - Pval[10])/Pval[11])/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13]))+5.3333333333333304*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 1.3333333333333299*Pval[14]*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 2.6666666666666701*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 1.3333333333333299*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*tanh((Xval2[0] - Pval[10])/Pval[12])/(Pval[11]*Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.66666666666666696*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[11]), 2))*tanh((Xval2[0] - Pval[10])/Pval[11])/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13])));
values[29*(Time+1)+29*(Time)+16] += lambda[11*jt+1]*(0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13])) + 0.16666666666666699*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(Xval[0] - Pval[10])*tanh((Xval[0] - Pval[10])/Pval[12])/(pow(Pval[11], 2)*Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.16666666666666699*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(Xval[0] - Pval[10])*tanh((Xval[0] - Pval[10])/Pval[11])/(pow(Pval[11], 3)*(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13]))+0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13])) + 0.16666666666666699*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(Xvalp1[0] - Pval[10])*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(pow(Pval[11], 2)*Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.16666666666666699*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(Xvalp1[0] - Pval[10])*tanh((Xvalp1[0] - Pval[10])/Pval[11])/(pow(Pval[11], 3)*(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13]))+0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[11]), 2))/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13])) + 0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*(Xval2[0] - Pval[10])*tanh((Xval2[0] - Pval[10])/Pval[12])/(pow(Pval[11], 2)*Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.66666666666666696*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[11]), 2))*(Xval2[0] - Pval[10])*tanh((Xval2[0] - Pval[10])/Pval[11])/(pow(Pval[11], 3)*(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13])));
values[29*(Time+1)+29*(Time)+17] += lambda[11*jt+1]*(0.16666666666666699*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(Xval[0] - Pval[10])/(pow(Pval[11], 3)*(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13])) - 0.16666666666666699*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*pow(Xval[0] - Pval[10], 2)*tanh((Xval[0] - Pval[10])/Pval[11])/(pow(Pval[11], 4)*(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13]))+0.16666666666666699*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(Xvalp1[0] - Pval[10])/(pow(Pval[11], 3)*(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13])) - 0.16666666666666699*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*pow(Xvalp1[0] - Pval[10], 2)*tanh((Xvalp1[0] - Pval[10])/Pval[11])/(pow(Pval[11], 4)*(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13]))+0.66666666666666696*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[11]), 2))*(Xval2[0] - Pval[10])/(pow(Pval[11], 3)*(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13])) - 0.66666666666666696*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[11]), 2))*pow(Xval2[0] - Pval[10], 2)*tanh((Xval2[0] - Pval[10])/Pval[11])/(pow(Pval[11], 4)*(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13])));
values[31*(Time+1)+31*(Time)+18] += lambda[11*jt+1]*(0.33333333333333298*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 1.3333333333333299*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2), 2)*(Xval[0] - Pval[10])*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 0.33333333333333298*Pval[14]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2), 2)*(Xval[0] - Pval[10])*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(Xval[0] - Pval[10])*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.16666666666666699*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(Xval[0] - Pval[10])*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[11]*pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+0.33333333333333298*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 1.3333333333333299*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2), 2)*(Xvalp1[0] - Pval[10])*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 0.33333333333333298*Pval[14]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2), 2)*(Xvalp1[0] - Pval[10])*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(Xvalp1[0] - Pval[10])*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.16666666666666699*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(Xvalp1[0] - Pval[10])*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[11]*pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+1.3333333333333299*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval2[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 5.3333333333333304*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2), 2)*(Xval2[0] - Pval[10])*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 1.3333333333333299*Pval[14]*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2), 2)*(Xval2[0] - Pval[10])*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 2.6666666666666701*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*(Xval2[0] - Pval[10])*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*(Xval2[0] - Pval[10])*tanh((Xval2[0] - Pval[10])/Pval[12])/(Pval[11]*pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[31*(Time+1)+31*(Time)+19] += lambda[11*jt+1]*(0.16666666666666699*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*pow(Xval[0] - Pval[10], 2)*tanh((Xval[0] - Pval[10])/Pval[12])/(pow(Pval[11], 2)*pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+0.16666666666666699*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*pow(Xvalp1[0] - Pval[10], 2)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(pow(Pval[11], 2)*pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*pow(Xval2[0] - Pval[10], 2)*tanh((Xval2[0] - Pval[10])/Pval[12])/(pow(Pval[11], 2)*pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[31*(Time+1)+31*(Time)+20] += lambda[11*jt+1]*(0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(Xval[0] - Pval[10])*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 1.3333333333333299*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2), 2)*pow(Xval[0] - Pval[10], 2)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 4)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 0.33333333333333298*Pval[14]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2), 2)*pow(Xval[0] - Pval[10], 2)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 4)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*pow(Xval[0] - Pval[10], 2)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 4)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(Xvalp1[0] - Pval[10])*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 1.3333333333333299*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2), 2)*pow(Xvalp1[0] - Pval[10], 2)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 4)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 0.33333333333333298*Pval[14]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2), 2)*pow(Xvalp1[0] - Pval[10], 2)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 4)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*pow(Xvalp1[0] - Pval[10], 2)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 4)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+2.6666666666666701*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*(Xval2[0] - Pval[10])*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval2[0] - Pval[10])/Pval[12])/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 5.3333333333333304*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2), 2)*pow(Xval2[0] - Pval[10], 2)*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 4)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 1.3333333333333299*Pval[14]*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2), 2)*pow(Xval2[0] - Pval[10], 2)*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 4)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 2.6666666666666701*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*pow(Xval2[0] - Pval[10], 2)*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 4)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[33*(Time+1)+33*(Time)+21] += lambda[11*jt+1]*(0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))/(Pval[11]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))/(Pval[11]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+2.6666666666666701*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval2[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[11]), 2))/(Pval[11]*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[33*(Time+1)+33*(Time)+22] += lambda[11*jt+1]*(0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(Xval[0] - Pval[10])/(pow(Pval[11], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(Xvalp1[0] - Pval[10])/(pow(Pval[11], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[11]), 2))*(Xval2[0] - Pval[10])/(pow(Pval[11], 2)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[33*(Time+1)+33*(Time)+23] += lambda[11*jt+1]*(0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(Xval[0] - Pval[10])*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3))+0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(Xvalp1[0] - Pval[10])*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3))+2.6666666666666701*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*(Xval2[0] - Pval[10])*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval2[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)));
values[33*(Time+1)+33*(Time)+24] += lambda[11*jt+1]*(0.33333333333333298*hstep*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)/pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)+0.33333333333333298*hstep*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)/pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)+1.3333333333333299*hstep*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)/pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3));
values[35*(Time+1)+35*(Time)+25] += lambda[11*jt+1]*(-0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2) - 1)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) - 0.33333333333333298*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2) - 1)/(Pval[11]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+-0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2) - 1)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) - 0.33333333333333298*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2) - 1)/(Pval[11]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+-2.6666666666666701*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*(pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2) - 1)*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval2[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) - 1.3333333333333299*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval2[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[11]), 2))*(pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2) - 1)/(Pval[11]*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[35*(Time+1)+35*(Time)+26] += lambda[11*jt+1]*(-0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(Xval[0] - Pval[10])*(pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2) - 1)/(pow(Pval[11], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+-0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(Xvalp1[0] - Pval[10])*(pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2) - 1)/(pow(Pval[11], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+-0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[11]), 2))*(Xval2[0] - Pval[10])*(pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2) - 1)/(pow(Pval[11], 2)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[35*(Time+1)+35*(Time)+27] += lambda[11*jt+1]*(-0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(Xval[0] - Pval[10])*(pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2) - 1)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) - 0.33333333333333298*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(Xval[0] - Pval[10])*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+-0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(Xvalp1[0] - Pval[10])*(pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2) - 1)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) - 0.33333333333333298*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(Xvalp1[0] - Pval[10])*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+-2.6666666666666701*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*(Xval2[0] - Pval[10])*(pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2) - 1)*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval2[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) - 1.3333333333333299*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*(Xval2[0] - Pval[10])*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval2[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[35*(Time+1)+35*(Time)+28] += lambda[11*jt+1]*(-0.33333333333333298*hstep*(pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2) - 1)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)/pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)+-0.33333333333333298*hstep*(pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2) - 1)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)/pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)+-1.3333333333333299*hstep*(pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2) - 1)*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)/pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3));
values[35*(Time+1)+35*(Time)+29] += lambda[11*jt+1]*(0.16666666666666699*hstep*(pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2) - 1)*(2*pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2) - 2)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)/pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)+0.16666666666666699*hstep*(pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2) - 1)*(2*pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2) - 2)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)/pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)+0.66666666666666696*hstep*(pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2) - 1)*(2*pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2) - 2)*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)/pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3));
values[37*(Time+1)+37*(Time)+30] += lambda[11*jt+2]*(1.3333333333333299*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 0.33333333333333298*Pval[19]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.33333333333333298*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[16]*Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.16666666666666699*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*tanh((Xval[0] - Pval[15])/Pval[16])/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18]))+1.3333333333333299*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 0.33333333333333298*Pval[19]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.33333333333333298*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[16]*Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.16666666666666699*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*tanh((Xvalp1[0] - Pval[15])/Pval[16])/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18]))+5.3333333333333304*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 1.3333333333333299*Pval[19]*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 2.6666666666666701*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 1.3333333333333299*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*tanh((Xval2[0] - Pval[15])/Pval[17])/(Pval[16]*Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.66666666666666696*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[16]), 2))*tanh((Xval2[0] - Pval[15])/Pval[16])/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18])));
values[38*(Time+1)+38*(Time)+31] += lambda[11*jt+2]*(0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18])) + 0.16666666666666699*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(Xval[0] - Pval[15])*tanh((Xval[0] - Pval[15])/Pval[17])/(pow(Pval[16], 2)*Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.16666666666666699*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(Xval[0] - Pval[15])*tanh((Xval[0] - Pval[15])/Pval[16])/(pow(Pval[16], 3)*(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18]))+0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18])) + 0.16666666666666699*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(Xvalp1[0] - Pval[15])*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(pow(Pval[16], 2)*Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.16666666666666699*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(Xvalp1[0] - Pval[15])*tanh((Xvalp1[0] - Pval[15])/Pval[16])/(pow(Pval[16], 3)*(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18]))+0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[16]), 2))/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18])) + 0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*(Xval2[0] - Pval[15])*tanh((Xval2[0] - Pval[15])/Pval[17])/(pow(Pval[16], 2)*Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.66666666666666696*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[16]), 2))*(Xval2[0] - Pval[15])*tanh((Xval2[0] - Pval[15])/Pval[16])/(pow(Pval[16], 3)*(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18])));
values[38*(Time+1)+38*(Time)+32] += lambda[11*jt+2]*(0.16666666666666699*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(Xval[0] - Pval[15])/(pow(Pval[16], 3)*(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18])) - 0.16666666666666699*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*pow(Xval[0] - Pval[15], 2)*tanh((Xval[0] - Pval[15])/Pval[16])/(pow(Pval[16], 4)*(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18]))+0.16666666666666699*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(Xvalp1[0] - Pval[15])/(pow(Pval[16], 3)*(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18])) - 0.16666666666666699*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*pow(Xvalp1[0] - Pval[15], 2)*tanh((Xvalp1[0] - Pval[15])/Pval[16])/(pow(Pval[16], 4)*(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18]))+0.66666666666666696*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[16]), 2))*(Xval2[0] - Pval[15])/(pow(Pval[16], 3)*(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18])) - 0.66666666666666696*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[16]), 2))*pow(Xval2[0] - Pval[15], 2)*tanh((Xval2[0] - Pval[15])/Pval[16])/(pow(Pval[16], 4)*(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18])));
values[40*(Time+1)+40*(Time)+33] += lambda[11*jt+2]*(0.33333333333333298*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 1.3333333333333299*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2), 2)*(Xval[0] - Pval[15])*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 0.33333333333333298*Pval[19]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2), 2)*(Xval[0] - Pval[15])*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(Xval[0] - Pval[15])*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.16666666666666699*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(Xval[0] - Pval[15])*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[16]*pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+0.33333333333333298*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 1.3333333333333299*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2), 2)*(Xvalp1[0] - Pval[15])*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 0.33333333333333298*Pval[19]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2), 2)*(Xvalp1[0] - Pval[15])*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(Xvalp1[0] - Pval[15])*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.16666666666666699*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(Xvalp1[0] - Pval[15])*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[16]*pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+1.3333333333333299*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval2[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 5.3333333333333304*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2), 2)*(Xval2[0] - Pval[15])*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 1.3333333333333299*Pval[19]*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2), 2)*(Xval2[0] - Pval[15])*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 2.6666666666666701*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*(Xval2[0] - Pval[15])*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*(Xval2[0] - Pval[15])*tanh((Xval2[0] - Pval[15])/Pval[17])/(Pval[16]*pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[40*(Time+1)+40*(Time)+34] += lambda[11*jt+2]*(0.16666666666666699*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*pow(Xval[0] - Pval[15], 2)*tanh((Xval[0] - Pval[15])/Pval[17])/(pow(Pval[16], 2)*pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+0.16666666666666699*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*pow(Xvalp1[0] - Pval[15], 2)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(pow(Pval[16], 2)*pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*pow(Xval2[0] - Pval[15], 2)*tanh((Xval2[0] - Pval[15])/Pval[17])/(pow(Pval[16], 2)*pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[40*(Time+1)+40*(Time)+35] += lambda[11*jt+2]*(0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(Xval[0] - Pval[15])*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 1.3333333333333299*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2), 2)*pow(Xval[0] - Pval[15], 2)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 4)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 0.33333333333333298*Pval[19]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2), 2)*pow(Xval[0] - Pval[15], 2)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 4)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*pow(Xval[0] - Pval[15], 2)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 4)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(Xvalp1[0] - Pval[15])*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 1.3333333333333299*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2), 2)*pow(Xvalp1[0] - Pval[15], 2)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 4)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 0.33333333333333298*Pval[19]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2), 2)*pow(Xvalp1[0] - Pval[15], 2)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 4)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*pow(Xvalp1[0] - Pval[15], 2)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 4)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+2.6666666666666701*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*(Xval2[0] - Pval[15])*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval2[0] - Pval[15])/Pval[17])/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 5.3333333333333304*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2), 2)*pow(Xval2[0] - Pval[15], 2)*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 4)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 1.3333333333333299*Pval[19]*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2), 2)*pow(Xval2[0] - Pval[15], 2)*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 4)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 2.6666666666666701*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*pow(Xval2[0] - Pval[15], 2)*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 4)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[42*(Time+1)+42*(Time)+36] += lambda[11*jt+2]*(0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))/(Pval[16]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))/(Pval[16]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+2.6666666666666701*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval2[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[16]), 2))/(Pval[16]*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[42*(Time+1)+42*(Time)+37] += lambda[11*jt+2]*(0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(Xval[0] - Pval[15])/(pow(Pval[16], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(Xvalp1[0] - Pval[15])/(pow(Pval[16], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[16]), 2))*(Xval2[0] - Pval[15])/(pow(Pval[16], 2)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[42*(Time+1)+42*(Time)+38] += lambda[11*jt+2]*(0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(Xval[0] - Pval[15])*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3))+0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(Xvalp1[0] - Pval[15])*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3))+2.6666666666666701*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*(Xval2[0] - Pval[15])*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval2[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)));
values[42*(Time+1)+42*(Time)+39] += lambda[11*jt+2]*(0.33333333333333298*hstep*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)/pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)+0.33333333333333298*hstep*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)/pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)+1.3333333333333299*hstep*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)/pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3));
values[44*(Time+1)+44*(Time)+40] += lambda[11*jt+2]*(-0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2) - 1)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) - 0.33333333333333298*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2) - 1)/(Pval[16]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+-0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2) - 1)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) - 0.33333333333333298*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2) - 1)/(Pval[16]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+-2.6666666666666701*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*(pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2) - 1)*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval2[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) - 1.3333333333333299*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval2[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[16]), 2))*(pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2) - 1)/(Pval[16]*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[44*(Time+1)+44*(Time)+41] += lambda[11*jt+2]*(-0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(Xval[0] - Pval[15])*(pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2) - 1)/(pow(Pval[16], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+-0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(Xvalp1[0] - Pval[15])*(pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2) - 1)/(pow(Pval[16], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+-0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[16]), 2))*(Xval2[0] - Pval[15])*(pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2) - 1)/(pow(Pval[16], 2)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[44*(Time+1)+44*(Time)+42] += lambda[11*jt+2]*(-0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(Xval[0] - Pval[15])*(pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2) - 1)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) - 0.33333333333333298*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(Xval[0] - Pval[15])*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+-0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(Xvalp1[0] - Pval[15])*(pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2) - 1)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) - 0.33333333333333298*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(Xvalp1[0] - Pval[15])*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+-2.6666666666666701*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*(Xval2[0] - Pval[15])*(pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2) - 1)*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval2[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) - 1.3333333333333299*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*(Xval2[0] - Pval[15])*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval2[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[44*(Time+1)+44*(Time)+43] += lambda[11*jt+2]*(-0.33333333333333298*hstep*(pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2) - 1)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)/pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)+-0.33333333333333298*hstep*(pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2) - 1)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)/pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)+-1.3333333333333299*hstep*(pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2) - 1)*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)/pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3));
values[44*(Time+1)+44*(Time)+44] += lambda[11*jt+2]*(0.16666666666666699*hstep*(pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2) - 1)*(2*pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2) - 2)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)/pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)+0.16666666666666699*hstep*(pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2) - 1)*(2*pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2) - 2)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)/pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)+0.66666666666666696*hstep*(pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2) - 1)*(2*pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2) - 2)*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)/pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3));
values[46*(Time+1)+46*(Time)+45] += lambda[11*jt+3]*(1.3333333333333299*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 0.33333333333333298*Pval[24]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.33333333333333298*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[21]*Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.16666666666666699*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*tanh((Xval[0] - Pval[20])/Pval[21])/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23]))+1.3333333333333299*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 0.33333333333333298*Pval[24]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.33333333333333298*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[21]*Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.16666666666666699*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*tanh((Xvalp1[0] - Pval[20])/Pval[21])/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23]))+5.3333333333333304*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 1.3333333333333299*Pval[24]*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 2.6666666666666701*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 1.3333333333333299*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*tanh((Xval2[0] - Pval[20])/Pval[22])/(Pval[21]*Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.66666666666666696*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[21]), 2))*tanh((Xval2[0] - Pval[20])/Pval[21])/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23])));
values[47*(Time+1)+47*(Time)+46] += lambda[11*jt+3]*(0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23])) + 0.16666666666666699*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(Xval[0] - Pval[20])*tanh((Xval[0] - Pval[20])/Pval[22])/(pow(Pval[21], 2)*Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.16666666666666699*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(Xval[0] - Pval[20])*tanh((Xval[0] - Pval[20])/Pval[21])/(pow(Pval[21], 3)*(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23]))+0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23])) + 0.16666666666666699*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(Xvalp1[0] - Pval[20])*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(pow(Pval[21], 2)*Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.16666666666666699*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(Xvalp1[0] - Pval[20])*tanh((Xvalp1[0] - Pval[20])/Pval[21])/(pow(Pval[21], 3)*(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23]))+0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[21]), 2))/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23])) + 0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*(Xval2[0] - Pval[20])*tanh((Xval2[0] - Pval[20])/Pval[22])/(pow(Pval[21], 2)*Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.66666666666666696*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[21]), 2))*(Xval2[0] - Pval[20])*tanh((Xval2[0] - Pval[20])/Pval[21])/(pow(Pval[21], 3)*(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23])));
values[47*(Time+1)+47*(Time)+47] += lambda[11*jt+3]*(0.16666666666666699*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(Xval[0] - Pval[20])/(pow(Pval[21], 3)*(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23])) - 0.16666666666666699*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*pow(Xval[0] - Pval[20], 2)*tanh((Xval[0] - Pval[20])/Pval[21])/(pow(Pval[21], 4)*(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23]))+0.16666666666666699*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(Xvalp1[0] - Pval[20])/(pow(Pval[21], 3)*(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23])) - 0.16666666666666699*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*pow(Xvalp1[0] - Pval[20], 2)*tanh((Xvalp1[0] - Pval[20])/Pval[21])/(pow(Pval[21], 4)*(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23]))+0.66666666666666696*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[21]), 2))*(Xval2[0] - Pval[20])/(pow(Pval[21], 3)*(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23])) - 0.66666666666666696*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[21]), 2))*pow(Xval2[0] - Pval[20], 2)*tanh((Xval2[0] - Pval[20])/Pval[21])/(pow(Pval[21], 4)*(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23])));
values[49*(Time+1)+49*(Time)+48] += lambda[11*jt+3]*(0.33333333333333298*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 1.3333333333333299*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2), 2)*(Xval[0] - Pval[20])*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 0.33333333333333298*Pval[24]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2), 2)*(Xval[0] - Pval[20])*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(Xval[0] - Pval[20])*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.16666666666666699*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(Xval[0] - Pval[20])*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[21]*pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+0.33333333333333298*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 1.3333333333333299*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2), 2)*(Xvalp1[0] - Pval[20])*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 0.33333333333333298*Pval[24]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2), 2)*(Xvalp1[0] - Pval[20])*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(Xvalp1[0] - Pval[20])*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.16666666666666699*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(Xvalp1[0] - Pval[20])*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[21]*pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+1.3333333333333299*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval2[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 5.3333333333333304*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2), 2)*(Xval2[0] - Pval[20])*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 1.3333333333333299*Pval[24]*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2), 2)*(Xval2[0] - Pval[20])*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 2.6666666666666701*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*(Xval2[0] - Pval[20])*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*(Xval2[0] - Pval[20])*tanh((Xval2[0] - Pval[20])/Pval[22])/(Pval[21]*pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[49*(Time+1)+49*(Time)+49] += lambda[11*jt+3]*(0.16666666666666699*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*pow(Xval[0] - Pval[20], 2)*tanh((Xval[0] - Pval[20])/Pval[22])/(pow(Pval[21], 2)*pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+0.16666666666666699*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*pow(Xvalp1[0] - Pval[20], 2)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(pow(Pval[21], 2)*pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*pow(Xval2[0] - Pval[20], 2)*tanh((Xval2[0] - Pval[20])/Pval[22])/(pow(Pval[21], 2)*pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[49*(Time+1)+49*(Time)+50] += lambda[11*jt+3]*(0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(Xval[0] - Pval[20])*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 1.3333333333333299*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2), 2)*pow(Xval[0] - Pval[20], 2)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 4)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 0.33333333333333298*Pval[24]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2), 2)*pow(Xval[0] - Pval[20], 2)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 4)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*pow(Xval[0] - Pval[20], 2)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 4)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(Xvalp1[0] - Pval[20])*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 1.3333333333333299*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2), 2)*pow(Xvalp1[0] - Pval[20], 2)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 4)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 0.33333333333333298*Pval[24]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2), 2)*pow(Xvalp1[0] - Pval[20], 2)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 4)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*pow(Xvalp1[0] - Pval[20], 2)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 4)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+2.6666666666666701*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*(Xval2[0] - Pval[20])*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval2[0] - Pval[20])/Pval[22])/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 5.3333333333333304*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2), 2)*pow(Xval2[0] - Pval[20], 2)*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 4)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 1.3333333333333299*Pval[24]*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2), 2)*pow(Xval2[0] - Pval[20], 2)*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 4)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 2.6666666666666701*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*pow(Xval2[0] - Pval[20], 2)*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 4)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[51*(Time+1)+51*(Time)+51] += lambda[11*jt+3]*(0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))/(Pval[21]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))/(Pval[21]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+2.6666666666666701*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval2[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[21]), 2))/(Pval[21]*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[51*(Time+1)+51*(Time)+52] += lambda[11*jt+3]*(0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(Xval[0] - Pval[20])/(pow(Pval[21], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(Xvalp1[0] - Pval[20])/(pow(Pval[21], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[21]), 2))*(Xval2[0] - Pval[20])/(pow(Pval[21], 2)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[51*(Time+1)+51*(Time)+53] += lambda[11*jt+3]*(0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(Xval[0] - Pval[20])*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3))+0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(Xvalp1[0] - Pval[20])*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3))+2.6666666666666701*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*(Xval2[0] - Pval[20])*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval2[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)));
values[51*(Time+1)+51*(Time)+54] += lambda[11*jt+3]*(0.33333333333333298*hstep*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)/pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)+0.33333333333333298*hstep*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)/pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)+1.3333333333333299*hstep*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)/pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3));
values[53*(Time+1)+53*(Time)+55] += lambda[11*jt+3]*(-0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2) - 1)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) - 0.33333333333333298*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2) - 1)/(Pval[21]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+-0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2) - 1)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) - 0.33333333333333298*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2) - 1)/(Pval[21]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+-2.6666666666666701*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*(pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2) - 1)*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval2[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) - 1.3333333333333299*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval2[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[21]), 2))*(pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2) - 1)/(Pval[21]*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[53*(Time+1)+53*(Time)+56] += lambda[11*jt+3]*(-0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(Xval[0] - Pval[20])*(pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2) - 1)/(pow(Pval[21], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+-0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(Xvalp1[0] - Pval[20])*(pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2) - 1)/(pow(Pval[21], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+-0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[21]), 2))*(Xval2[0] - Pval[20])*(pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2) - 1)/(pow(Pval[21], 2)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[53*(Time+1)+53*(Time)+57] += lambda[11*jt+3]*(-0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(Xval[0] - Pval[20])*(pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2) - 1)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) - 0.33333333333333298*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(Xval[0] - Pval[20])*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+-0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(Xvalp1[0] - Pval[20])*(pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2) - 1)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) - 0.33333333333333298*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(Xvalp1[0] - Pval[20])*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+-2.6666666666666701*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*(Xval2[0] - Pval[20])*(pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2) - 1)*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval2[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) - 1.3333333333333299*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*(Xval2[0] - Pval[20])*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval2[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[53*(Time+1)+53*(Time)+58] += lambda[11*jt+3]*(-0.33333333333333298*hstep*(pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2) - 1)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)/pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)+-0.33333333333333298*hstep*(pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2) - 1)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)/pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)+-1.3333333333333299*hstep*(pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2) - 1)*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)/pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3));
values[53*(Time+1)+53*(Time)+59] += lambda[11*jt+3]*(0.16666666666666699*hstep*(pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2) - 1)*(2*pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2) - 2)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)/pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)+0.16666666666666699*hstep*(pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2) - 1)*(2*pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2) - 2)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)/pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)+0.66666666666666696*hstep*(pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2) - 1)*(2*pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2) - 2)*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)/pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3));
values[55*(Time+1)+55*(Time)+60] += lambda[11*jt+4]*(1.3333333333333299*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 0.33333333333333298*Pval[29]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.33333333333333298*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[26]*Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.16666666666666699*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*tanh((Xval[0] - Pval[25])/Pval[26])/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28]))+1.3333333333333299*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 0.33333333333333298*Pval[29]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.33333333333333298*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[26]*Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.16666666666666699*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*tanh((Xvalp1[0] - Pval[25])/Pval[26])/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28]))+5.3333333333333304*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 1.3333333333333299*Pval[29]*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 2.6666666666666701*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 1.3333333333333299*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*tanh((Xval2[0] - Pval[25])/Pval[27])/(Pval[26]*Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.66666666666666696*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[26]), 2))*tanh((Xval2[0] - Pval[25])/Pval[26])/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28])));
values[56*(Time+1)+56*(Time)+61] += lambda[11*jt+4]*(0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28])) + 0.16666666666666699*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(Xval[0] - Pval[25])*tanh((Xval[0] - Pval[25])/Pval[27])/(pow(Pval[26], 2)*Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.16666666666666699*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(Xval[0] - Pval[25])*tanh((Xval[0] - Pval[25])/Pval[26])/(pow(Pval[26], 3)*(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28]))+0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28])) + 0.16666666666666699*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(Xvalp1[0] - Pval[25])*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(pow(Pval[26], 2)*Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.16666666666666699*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(Xvalp1[0] - Pval[25])*tanh((Xvalp1[0] - Pval[25])/Pval[26])/(pow(Pval[26], 3)*(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28]))+0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[26]), 2))/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28])) + 0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*(Xval2[0] - Pval[25])*tanh((Xval2[0] - Pval[25])/Pval[27])/(pow(Pval[26], 2)*Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.66666666666666696*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[26]), 2))*(Xval2[0] - Pval[25])*tanh((Xval2[0] - Pval[25])/Pval[26])/(pow(Pval[26], 3)*(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28])));
values[56*(Time+1)+56*(Time)+62] += lambda[11*jt+4]*(0.16666666666666699*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(Xval[0] - Pval[25])/(pow(Pval[26], 3)*(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28])) - 0.16666666666666699*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*pow(Xval[0] - Pval[25], 2)*tanh((Xval[0] - Pval[25])/Pval[26])/(pow(Pval[26], 4)*(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28]))+0.16666666666666699*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(Xvalp1[0] - Pval[25])/(pow(Pval[26], 3)*(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28])) - 0.16666666666666699*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*pow(Xvalp1[0] - Pval[25], 2)*tanh((Xvalp1[0] - Pval[25])/Pval[26])/(pow(Pval[26], 4)*(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28]))+0.66666666666666696*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[26]), 2))*(Xval2[0] - Pval[25])/(pow(Pval[26], 3)*(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28])) - 0.66666666666666696*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[26]), 2))*pow(Xval2[0] - Pval[25], 2)*tanh((Xval2[0] - Pval[25])/Pval[26])/(pow(Pval[26], 4)*(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28])));
values[58*(Time+1)+58*(Time)+63] += lambda[11*jt+4]*(0.33333333333333298*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 1.3333333333333299*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2), 2)*(Xval[0] - Pval[25])*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 0.33333333333333298*Pval[29]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2), 2)*(Xval[0] - Pval[25])*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(Xval[0] - Pval[25])*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.16666666666666699*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(Xval[0] - Pval[25])*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[26]*pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+0.33333333333333298*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 1.3333333333333299*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2), 2)*(Xvalp1[0] - Pval[25])*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 0.33333333333333298*Pval[29]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2), 2)*(Xvalp1[0] - Pval[25])*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(Xvalp1[0] - Pval[25])*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.16666666666666699*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(Xvalp1[0] - Pval[25])*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[26]*pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+1.3333333333333299*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval2[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 5.3333333333333304*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2), 2)*(Xval2[0] - Pval[25])*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 1.3333333333333299*Pval[29]*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2), 2)*(Xval2[0] - Pval[25])*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 2.6666666666666701*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*(Xval2[0] - Pval[25])*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*(Xval2[0] - Pval[25])*tanh((Xval2[0] - Pval[25])/Pval[27])/(Pval[26]*pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[58*(Time+1)+58*(Time)+64] += lambda[11*jt+4]*(0.16666666666666699*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*pow(Xval[0] - Pval[25], 2)*tanh((Xval[0] - Pval[25])/Pval[27])/(pow(Pval[26], 2)*pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+0.16666666666666699*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*pow(Xvalp1[0] - Pval[25], 2)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(pow(Pval[26], 2)*pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*pow(Xval2[0] - Pval[25], 2)*tanh((Xval2[0] - Pval[25])/Pval[27])/(pow(Pval[26], 2)*pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[58*(Time+1)+58*(Time)+65] += lambda[11*jt+4]*(0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(Xval[0] - Pval[25])*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 1.3333333333333299*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2), 2)*pow(Xval[0] - Pval[25], 2)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 4)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 0.33333333333333298*Pval[29]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2), 2)*pow(Xval[0] - Pval[25], 2)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 4)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*pow(Xval[0] - Pval[25], 2)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 4)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(Xvalp1[0] - Pval[25])*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 1.3333333333333299*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2), 2)*pow(Xvalp1[0] - Pval[25], 2)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 4)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 0.33333333333333298*Pval[29]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2), 2)*pow(Xvalp1[0] - Pval[25], 2)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 4)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*pow(Xvalp1[0] - Pval[25], 2)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 4)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+2.6666666666666701*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*(Xval2[0] - Pval[25])*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval2[0] - Pval[25])/Pval[27])/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 5.3333333333333304*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2), 2)*pow(Xval2[0] - Pval[25], 2)*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 4)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 1.3333333333333299*Pval[29]*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2), 2)*pow(Xval2[0] - Pval[25], 2)*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 4)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 2.6666666666666701*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*pow(Xval2[0] - Pval[25], 2)*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 4)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[60*(Time+1)+60*(Time)+66] += lambda[11*jt+4]*(0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))/(Pval[26]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))/(Pval[26]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+2.6666666666666701*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval2[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[26]), 2))/(Pval[26]*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[60*(Time+1)+60*(Time)+67] += lambda[11*jt+4]*(0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(Xval[0] - Pval[25])/(pow(Pval[26], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(Xvalp1[0] - Pval[25])/(pow(Pval[26], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[26]), 2))*(Xval2[0] - Pval[25])/(pow(Pval[26], 2)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[60*(Time+1)+60*(Time)+68] += lambda[11*jt+4]*(0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(Xval[0] - Pval[25])*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3))+0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(Xvalp1[0] - Pval[25])*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3))+2.6666666666666701*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*(Xval2[0] - Pval[25])*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval2[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)));
values[60*(Time+1)+60*(Time)+69] += lambda[11*jt+4]*(0.33333333333333298*hstep*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)/pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)+0.33333333333333298*hstep*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)/pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)+1.3333333333333299*hstep*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)/pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3));
values[62*(Time+1)+62*(Time)+70] += lambda[11*jt+4]*(-0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2) - 1)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) - 0.33333333333333298*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2) - 1)/(Pval[26]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+-0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2) - 1)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) - 0.33333333333333298*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2) - 1)/(Pval[26]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+-2.6666666666666701*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*(pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2) - 1)*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval2[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) - 1.3333333333333299*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval2[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[26]), 2))*(pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2) - 1)/(Pval[26]*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[62*(Time+1)+62*(Time)+71] += lambda[11*jt+4]*(-0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(Xval[0] - Pval[25])*(pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2) - 1)/(pow(Pval[26], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+-0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(Xvalp1[0] - Pval[25])*(pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2) - 1)/(pow(Pval[26], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+-0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[26]), 2))*(Xval2[0] - Pval[25])*(pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2) - 1)/(pow(Pval[26], 2)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[62*(Time+1)+62*(Time)+72] += lambda[11*jt+4]*(-0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(Xval[0] - Pval[25])*(pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2) - 1)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) - 0.33333333333333298*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(Xval[0] - Pval[25])*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+-0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(Xvalp1[0] - Pval[25])*(pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2) - 1)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) - 0.33333333333333298*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(Xvalp1[0] - Pval[25])*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+-2.6666666666666701*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*(Xval2[0] - Pval[25])*(pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2) - 1)*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval2[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) - 1.3333333333333299*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*(Xval2[0] - Pval[25])*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval2[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[62*(Time+1)+62*(Time)+73] += lambda[11*jt+4]*(-0.33333333333333298*hstep*(pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2) - 1)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)/pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)+-0.33333333333333298*hstep*(pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2) - 1)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)/pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)+-1.3333333333333299*hstep*(pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2) - 1)*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)/pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3));
values[62*(Time+1)+62*(Time)+74] += lambda[11*jt+4]*(0.16666666666666699*hstep*(pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2) - 1)*(2*pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2) - 2)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)/pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)+0.16666666666666699*hstep*(pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2) - 1)*(2*pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2) - 2)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)/pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)+0.66666666666666696*hstep*(pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2) - 1)*(2*pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2) - 2)*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)/pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3));
values[13*(Time+1)+13*(Time)+0] += lambda[11*jt+5]*(0.25*hstep*(Ival[0]/Pval[9] + pow(Xval[3], 4)*Pval[3]*(Pval[4] - Xval[0]) + Pval[5]*(Pval[6] - Xval[0]) + Pval[1]*Xval[2]*pow(Xval[1], 3)*(Pval[2] - Xval[0]) + Pval[7]*Xval[4]*(Pval[8] - Xval[0]))/pow(Pval[0], 3)+-0.25*hstep*(Ivalp1[0]/Pval[9] + pow(Xvalp1[3], 4)*Pval[3]*(Pval[4] - Xvalp1[0]) + Pval[5]*(Pval[6] - Xvalp1[0]) + Pval[1]*Xvalp1[2]*pow(Xvalp1[1], 3)*(Pval[2] - Xvalp1[0]) + Pval[7]*Xvalp1[4]*(Pval[8] - Xvalp1[0]))/pow(Pval[0], 3)+0);
values[16*(Time+1)+16*(Time)+1] += lambda[11*jt+5]*(-0.125*Xval[2]*hstep*pow(Xval[1], 3)*(Pval[2] - Xval[0])/pow(Pval[0], 2)+0.125*Xvalp1[2]*hstep*pow(Xvalp1[1], 3)*(Pval[2] - Xvalp1[0])/pow(Pval[0], 2)+0);
values[18*(Time+1)+18*(Time)+2] += lambda[11*jt+5]*(-0.125*Pval[1]*Xval[2]*hstep*pow(Xval[1], 3)/pow(Pval[0], 2)+0.125*Pval[1]*Xvalp1[2]*hstep*pow(Xvalp1[1], 3)/pow(Pval[0], 2)+0);
values[18*(Time+1)+18*(Time)+3] += lambda[11*jt+5]*(0.125*Xval[2]*hstep*pow(Xval[1], 3)/Pval[0]+-0.125*Xvalp1[2]*hstep*pow(Xvalp1[1], 3)/Pval[0]+0);
values[20*(Time+1)+20*(Time)+4] += lambda[11*jt+5]*(-0.125*pow(Xval[3], 4)*hstep*(Pval[4] - Xval[0])/pow(Pval[0], 2)+0.125*pow(Xvalp1[3], 4)*hstep*(Pval[4] - Xvalp1[0])/pow(Pval[0], 2)+0);
values[21*(Time+1)+21*(Time)+5] += lambda[11*jt+5]*(-0.125*pow(Xval[3], 4)*Pval[3]*hstep/pow(Pval[0], 2)+0.125*pow(Xvalp1[3], 4)*Pval[3]*hstep/pow(Pval[0], 2)+0);
values[21*(Time+1)+21*(Time)+6] += lambda[11*jt+5]*(0.125*pow(Xval[3], 4)*hstep/Pval[0]+-0.125*pow(Xvalp1[3], 4)*hstep/Pval[0]+0);
values[22*(Time+1)+22*(Time)+7] += lambda[11*jt+5]*(-0.125*hstep*(Pval[6] - Xval[0])/pow(Pval[0], 2)+0.125*hstep*(Pval[6] - Xvalp1[0])/pow(Pval[0], 2)+0);
values[22*(Time+1)+22*(Time)+8] += lambda[11*jt+5]*(-0.125*Pval[5]*hstep/pow(Pval[0], 2)+0.125*Pval[5]*hstep/pow(Pval[0], 2)+0);
values[22*(Time+1)+22*(Time)+9] += lambda[11*jt+5]*(0.125*hstep/Pval[0]+-0.125*hstep/Pval[0]+0);
values[24*(Time+1)+24*(Time)+10] += lambda[11*jt+5]*(-0.125*hstep*Xval[4]*(Pval[8] - Xval[0])/pow(Pval[0], 2)+0.125*hstep*Xvalp1[4]*(Pval[8] - Xvalp1[0])/pow(Pval[0], 2)+0);
values[25*(Time+1)+25*(Time)+11] += lambda[11*jt+5]*(-0.125*Pval[7]*hstep*Xval[4]/pow(Pval[0], 2)+0.125*Pval[7]*hstep*Xvalp1[4]/pow(Pval[0], 2)+0);
values[25*(Time+1)+25*(Time)+12] += lambda[11*jt+5]*(0.125*hstep*Xval[4]/Pval[0]+-0.125*hstep*Xvalp1[4]/Pval[0]+0);
values[25*(Time+1)+25*(Time)+13] += lambda[11*jt+5]*(0.125*Ival[0]*hstep/(pow(Pval[0], 2)*pow(Pval[9], 2))+-0.125*Ivalp1[0]*hstep/(pow(Pval[0], 2)*pow(Pval[9], 2))+0);
values[25*(Time+1)+25*(Time)+14] += lambda[11*jt+5]*(0.25*Ival[0]*hstep/(Pval[0]*pow(Pval[9], 3))+-0.25*Ivalp1[0]*hstep/(Pval[0]*pow(Pval[9], 3))+0);
values[28*(Time+1)+28*(Time)+15] += lambda[11*jt+6]*(1.0*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 0.25*Pval[14]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.5*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.25*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[11]*Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.125*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*tanh((Xval[0] - Pval[10])/Pval[11])/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13]))+-1.0*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) - 0.25*Pval[14]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.5*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.25*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[11]*Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.125*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*tanh((Xvalp1[0] - Pval[10])/Pval[11])/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13]))+0);
values[29*(Time+1)+29*(Time)+16] += lambda[11*jt+6]*(0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13])) + 0.125*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(Xval[0] - Pval[10])*tanh((Xval[0] - Pval[10])/Pval[12])/(pow(Pval[11], 2)*Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.125*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(Xval[0] - Pval[10])*tanh((Xval[0] - Pval[10])/Pval[11])/(pow(Pval[11], 3)*(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13]))+-0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13])) - 0.125*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(Xvalp1[0] - Pval[10])*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(pow(Pval[11], 2)*Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.125*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(Xvalp1[0] - Pval[10])*tanh((Xvalp1[0] - Pval[10])/Pval[11])/(pow(Pval[11], 3)*(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13]))+0);
values[29*(Time+1)+29*(Time)+17] += lambda[11*jt+6]*(0.125*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(Xval[0] - Pval[10])/(pow(Pval[11], 3)*(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13])) - 0.125*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*pow(Xval[0] - Pval[10], 2)*tanh((Xval[0] - Pval[10])/Pval[11])/(pow(Pval[11], 4)*(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13]))+-0.125*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(Xvalp1[0] - Pval[10])/(pow(Pval[11], 3)*(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13])) + 0.125*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*pow(Xvalp1[0] - Pval[10], 2)*tanh((Xvalp1[0] - Pval[10])/Pval[11])/(pow(Pval[11], 4)*(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13]))+0);
values[31*(Time+1)+31*(Time)+18] += lambda[11*jt+6]*(0.25*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 1.0*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2), 2)*(Xval[0] - Pval[10])*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 0.25*Pval[14]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2), 2)*(Xval[0] - Pval[10])*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.5*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(Xval[0] - Pval[10])*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.125*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(Xval[0] - Pval[10])*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[11]*pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+-0.25*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 1.0*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2), 2)*(Xvalp1[0] - Pval[10])*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) - 0.25*Pval[14]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2), 2)*(Xvalp1[0] - Pval[10])*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.5*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(Xvalp1[0] - Pval[10])*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.125*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(Xvalp1[0] - Pval[10])*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[11]*pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+0);
values[31*(Time+1)+31*(Time)+19] += lambda[11*jt+6]*(0.125*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*pow(Xval[0] - Pval[10], 2)*tanh((Xval[0] - Pval[10])/Pval[12])/(pow(Pval[11], 2)*pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+-0.125*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*pow(Xvalp1[0] - Pval[10], 2)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(pow(Pval[11], 2)*pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+0);
values[31*(Time+1)+31*(Time)+20] += lambda[11*jt+6]*(0.5*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(Xval[0] - Pval[10])*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 1.0*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2), 2)*pow(Xval[0] - Pval[10], 2)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 4)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 0.25*Pval[14]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2), 2)*pow(Xval[0] - Pval[10], 2)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 4)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.5*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*pow(Xval[0] - Pval[10], 2)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 4)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+-0.5*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(Xvalp1[0] - Pval[10])*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 1.0*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2), 2)*pow(Xvalp1[0] - Pval[10], 2)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 4)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) - 0.25*Pval[14]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2), 2)*pow(Xvalp1[0] - Pval[10], 2)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 4)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.5*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*pow(Xvalp1[0] - Pval[10], 2)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 4)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+0);
values[33*(Time+1)+33*(Time)+21] += lambda[11*jt+6]*(0.5*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))/(Pval[11]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+-0.5*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) - 0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))/(Pval[11]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+0);
values[33*(Time+1)+33*(Time)+22] += lambda[11*jt+6]*(0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(Xval[0] - Pval[10])/(pow(Pval[11], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+-0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(Xvalp1[0] - Pval[10])/(pow(Pval[11], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+0);
values[33*(Time+1)+33*(Time)+23] += lambda[11*jt+6]*(0.5*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(Xval[0] - Pval[10])*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3))+-0.5*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(Xvalp1[0] - Pval[10])*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3))+0);
values[33*(Time+1)+33*(Time)+24] += lambda[11*jt+6]*(0.25*hstep*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)/pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)+-0.25*hstep*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)/pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)+0);
values[35*(Time+1)+35*(Time)+25] += lambda[11*jt+6]*(-0.5*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2) - 1)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) - 0.25*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2) - 1)/(Pval[11]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+0.5*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2) - 1)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 0.25*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2) - 1)/(Pval[11]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+0);
values[35*(Time+1)+35*(Time)+26] += lambda[11*jt+6]*(-0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(Xval[0] - Pval[10])*(pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2) - 1)/(pow(Pval[11], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(Xvalp1[0] - Pval[10])*(pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2) - 1)/(pow(Pval[11], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+0);
values[35*(Time+1)+35*(Time)+27] += lambda[11*jt+6]*(-0.5*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(Xval[0] - Pval[10])*(pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2) - 1)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) - 0.25*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(Xval[0] - Pval[10])*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+0.5*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(Xvalp1[0] - Pval[10])*(pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2) - 1)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 0.25*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(Xvalp1[0] - Pval[10])*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2))+0);
values[35*(Time+1)+35*(Time)+28] += lambda[11*jt+6]*(-0.25*hstep*(pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2) - 1)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)/pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)+0.25*hstep*(pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2) - 1)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)/pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)+0);
values[35*(Time+1)+35*(Time)+29] += lambda[11*jt+6]*(0.125*hstep*(pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2) - 1)*(2*pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2) - 2)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)/pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)+-0.125*hstep*(pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2) - 1)*(2*pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2) - 2)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)/pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)+0);
values[37*(Time+1)+37*(Time)+30] += lambda[11*jt+7]*(1.0*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 0.25*Pval[19]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.5*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.25*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[16]*Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.125*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*tanh((Xval[0] - Pval[15])/Pval[16])/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18]))+-1.0*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) - 0.25*Pval[19]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.5*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.25*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[16]*Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.125*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*tanh((Xvalp1[0] - Pval[15])/Pval[16])/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18]))+0);
values[38*(Time+1)+38*(Time)+31] += lambda[11*jt+7]*(0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18])) + 0.125*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(Xval[0] - Pval[15])*tanh((Xval[0] - Pval[15])/Pval[17])/(pow(Pval[16], 2)*Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.125*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(Xval[0] - Pval[15])*tanh((Xval[0] - Pval[15])/Pval[16])/(pow(Pval[16], 3)*(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18]))+-0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18])) - 0.125*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(Xvalp1[0] - Pval[15])*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(pow(Pval[16], 2)*Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.125*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(Xvalp1[0] - Pval[15])*tanh((Xvalp1[0] - Pval[15])/Pval[16])/(pow(Pval[16], 3)*(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18]))+0);
values[38*(Time+1)+38*(Time)+32] += lambda[11*jt+7]*(0.125*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(Xval[0] - Pval[15])/(pow(Pval[16], 3)*(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18])) - 0.125*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*pow(Xval[0] - Pval[15], 2)*tanh((Xval[0] - Pval[15])/Pval[16])/(pow(Pval[16], 4)*(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18]))+-0.125*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(Xvalp1[0] - Pval[15])/(pow(Pval[16], 3)*(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18])) + 0.125*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*pow(Xvalp1[0] - Pval[15], 2)*tanh((Xvalp1[0] - Pval[15])/Pval[16])/(pow(Pval[16], 4)*(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18]))+0);
values[40*(Time+1)+40*(Time)+33] += lambda[11*jt+7]*(0.25*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 1.0*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2), 2)*(Xval[0] - Pval[15])*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 0.25*Pval[19]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2), 2)*(Xval[0] - Pval[15])*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.5*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(Xval[0] - Pval[15])*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.125*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(Xval[0] - Pval[15])*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[16]*pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+-0.25*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 1.0*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2), 2)*(Xvalp1[0] - Pval[15])*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) - 0.25*Pval[19]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2), 2)*(Xvalp1[0] - Pval[15])*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.5*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(Xvalp1[0] - Pval[15])*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.125*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(Xvalp1[0] - Pval[15])*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[16]*pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+0);
values[40*(Time+1)+40*(Time)+34] += lambda[11*jt+7]*(0.125*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*pow(Xval[0] - Pval[15], 2)*tanh((Xval[0] - Pval[15])/Pval[17])/(pow(Pval[16], 2)*pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+-0.125*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*pow(Xvalp1[0] - Pval[15], 2)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(pow(Pval[16], 2)*pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+0);
values[40*(Time+1)+40*(Time)+35] += lambda[11*jt+7]*(0.5*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(Xval[0] - Pval[15])*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 1.0*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2), 2)*pow(Xval[0] - Pval[15], 2)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 4)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 0.25*Pval[19]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2), 2)*pow(Xval[0] - Pval[15], 2)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 4)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.5*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*pow(Xval[0] - Pval[15], 2)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 4)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+-0.5*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(Xvalp1[0] - Pval[15])*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 1.0*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2), 2)*pow(Xvalp1[0] - Pval[15], 2)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 4)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) - 0.25*Pval[19]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2), 2)*pow(Xvalp1[0] - Pval[15], 2)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 4)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.5*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*pow(Xvalp1[0] - Pval[15], 2)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 4)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+0);
values[42*(Time+1)+42*(Time)+36] += lambda[11*jt+7]*(0.5*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))/(Pval[16]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+-0.5*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) - 0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))/(Pval[16]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+0);
values[42*(Time+1)+42*(Time)+37] += lambda[11*jt+7]*(0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(Xval[0] - Pval[15])/(pow(Pval[16], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+-0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(Xvalp1[0] - Pval[15])/(pow(Pval[16], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+0);
values[42*(Time+1)+42*(Time)+38] += lambda[11*jt+7]*(0.5*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(Xval[0] - Pval[15])*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3))+-0.5*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(Xvalp1[0] - Pval[15])*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3))+0);
values[42*(Time+1)+42*(Time)+39] += lambda[11*jt+7]*(0.25*hstep*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)/pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)+-0.25*hstep*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)/pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)+0);
values[44*(Time+1)+44*(Time)+40] += lambda[11*jt+7]*(-0.5*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2) - 1)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) - 0.25*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2) - 1)/(Pval[16]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+0.5*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2) - 1)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 0.25*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2) - 1)/(Pval[16]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+0);
values[44*(Time+1)+44*(Time)+41] += lambda[11*jt+7]*(-0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(Xval[0] - Pval[15])*(pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2) - 1)/(pow(Pval[16], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(Xvalp1[0] - Pval[15])*(pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2) - 1)/(pow(Pval[16], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+0);
values[44*(Time+1)+44*(Time)+42] += lambda[11*jt+7]*(-0.5*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(Xval[0] - Pval[15])*(pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2) - 1)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) - 0.25*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(Xval[0] - Pval[15])*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+0.5*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(Xvalp1[0] - Pval[15])*(pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2) - 1)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 0.25*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(Xvalp1[0] - Pval[15])*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2))+0);
values[44*(Time+1)+44*(Time)+43] += lambda[11*jt+7]*(-0.25*hstep*(pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2) - 1)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)/pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)+0.25*hstep*(pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2) - 1)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)/pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)+0);
values[44*(Time+1)+44*(Time)+44] += lambda[11*jt+7]*(0.125*hstep*(pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2) - 1)*(2*pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2) - 2)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)/pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)+-0.125*hstep*(pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2) - 1)*(2*pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2) - 2)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)/pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)+0);
values[46*(Time+1)+46*(Time)+45] += lambda[11*jt+8]*(1.0*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 0.25*Pval[24]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.5*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.25*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[21]*Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.125*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*tanh((Xval[0] - Pval[20])/Pval[21])/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23]))+-1.0*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) - 0.25*Pval[24]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.5*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.25*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[21]*Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.125*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*tanh((Xvalp1[0] - Pval[20])/Pval[21])/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23]))+0);
values[47*(Time+1)+47*(Time)+46] += lambda[11*jt+8]*(0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23])) + 0.125*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(Xval[0] - Pval[20])*tanh((Xval[0] - Pval[20])/Pval[22])/(pow(Pval[21], 2)*Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.125*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(Xval[0] - Pval[20])*tanh((Xval[0] - Pval[20])/Pval[21])/(pow(Pval[21], 3)*(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23]))+-0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23])) - 0.125*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(Xvalp1[0] - Pval[20])*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(pow(Pval[21], 2)*Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.125*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(Xvalp1[0] - Pval[20])*tanh((Xvalp1[0] - Pval[20])/Pval[21])/(pow(Pval[21], 3)*(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23]))+0);
values[47*(Time+1)+47*(Time)+47] += lambda[11*jt+8]*(0.125*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(Xval[0] - Pval[20])/(pow(Pval[21], 3)*(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23])) - 0.125*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*pow(Xval[0] - Pval[20], 2)*tanh((Xval[0] - Pval[20])/Pval[21])/(pow(Pval[21], 4)*(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23]))+-0.125*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(Xvalp1[0] - Pval[20])/(pow(Pval[21], 3)*(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23])) + 0.125*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*pow(Xvalp1[0] - Pval[20], 2)*tanh((Xvalp1[0] - Pval[20])/Pval[21])/(pow(Pval[21], 4)*(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23]))+0);
values[49*(Time+1)+49*(Time)+48] += lambda[11*jt+8]*(0.25*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 1.0*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2), 2)*(Xval[0] - Pval[20])*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 0.25*Pval[24]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2), 2)*(Xval[0] - Pval[20])*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.5*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(Xval[0] - Pval[20])*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.125*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(Xval[0] - Pval[20])*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[21]*pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+-0.25*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 1.0*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2), 2)*(Xvalp1[0] - Pval[20])*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) - 0.25*Pval[24]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2), 2)*(Xvalp1[0] - Pval[20])*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.5*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(Xvalp1[0] - Pval[20])*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.125*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(Xvalp1[0] - Pval[20])*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[21]*pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+0);
values[49*(Time+1)+49*(Time)+49] += lambda[11*jt+8]*(0.125*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*pow(Xval[0] - Pval[20], 2)*tanh((Xval[0] - Pval[20])/Pval[22])/(pow(Pval[21], 2)*pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+-0.125*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*pow(Xvalp1[0] - Pval[20], 2)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(pow(Pval[21], 2)*pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+0);
values[49*(Time+1)+49*(Time)+50] += lambda[11*jt+8]*(0.5*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(Xval[0] - Pval[20])*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 1.0*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2), 2)*pow(Xval[0] - Pval[20], 2)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 4)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 0.25*Pval[24]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2), 2)*pow(Xval[0] - Pval[20], 2)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 4)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.5*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*pow(Xval[0] - Pval[20], 2)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 4)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+-0.5*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(Xvalp1[0] - Pval[20])*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 1.0*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2), 2)*pow(Xvalp1[0] - Pval[20], 2)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 4)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) - 0.25*Pval[24]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2), 2)*pow(Xvalp1[0] - Pval[20], 2)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 4)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.5*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*pow(Xvalp1[0] - Pval[20], 2)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 4)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+0);
values[51*(Time+1)+51*(Time)+51] += lambda[11*jt+8]*(0.5*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))/(Pval[21]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+-0.5*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) - 0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))/(Pval[21]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+0);
values[51*(Time+1)+51*(Time)+52] += lambda[11*jt+8]*(0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(Xval[0] - Pval[20])/(pow(Pval[21], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+-0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(Xvalp1[0] - Pval[20])/(pow(Pval[21], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+0);
values[51*(Time+1)+51*(Time)+53] += lambda[11*jt+8]*(0.5*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(Xval[0] - Pval[20])*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3))+-0.5*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(Xvalp1[0] - Pval[20])*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3))+0);
values[51*(Time+1)+51*(Time)+54] += lambda[11*jt+8]*(0.25*hstep*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)/pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)+-0.25*hstep*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)/pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)+0);
values[53*(Time+1)+53*(Time)+55] += lambda[11*jt+8]*(-0.5*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2) - 1)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) - 0.25*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2) - 1)/(Pval[21]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+0.5*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2) - 1)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 0.25*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2) - 1)/(Pval[21]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+0);
values[53*(Time+1)+53*(Time)+56] += lambda[11*jt+8]*(-0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(Xval[0] - Pval[20])*(pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2) - 1)/(pow(Pval[21], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(Xvalp1[0] - Pval[20])*(pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2) - 1)/(pow(Pval[21], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+0);
values[53*(Time+1)+53*(Time)+57] += lambda[11*jt+8]*(-0.5*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(Xval[0] - Pval[20])*(pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2) - 1)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) - 0.25*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(Xval[0] - Pval[20])*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+0.5*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(Xvalp1[0] - Pval[20])*(pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2) - 1)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 0.25*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(Xvalp1[0] - Pval[20])*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2))+0);
values[53*(Time+1)+53*(Time)+58] += lambda[11*jt+8]*(-0.25*hstep*(pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2) - 1)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)/pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)+0.25*hstep*(pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2) - 1)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)/pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)+0);
values[53*(Time+1)+53*(Time)+59] += lambda[11*jt+8]*(0.125*hstep*(pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2) - 1)*(2*pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2) - 2)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)/pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)+-0.125*hstep*(pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2) - 1)*(2*pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2) - 2)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)/pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)+0);
values[55*(Time+1)+55*(Time)+60] += lambda[11*jt+9]*(1.0*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 0.25*Pval[29]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.5*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.25*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[26]*Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.125*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*tanh((Xval[0] - Pval[25])/Pval[26])/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28]))+-1.0*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) - 0.25*Pval[29]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.5*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.25*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[26]*Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.125*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*tanh((Xvalp1[0] - Pval[25])/Pval[26])/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28]))+0);
values[56*(Time+1)+56*(Time)+61] += lambda[11*jt+9]*(0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28])) + 0.125*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(Xval[0] - Pval[25])*tanh((Xval[0] - Pval[25])/Pval[27])/(pow(Pval[26], 2)*Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.125*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(Xval[0] - Pval[25])*tanh((Xval[0] - Pval[25])/Pval[26])/(pow(Pval[26], 3)*(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28]))+-0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28])) - 0.125*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(Xvalp1[0] - Pval[25])*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(pow(Pval[26], 2)*Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.125*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(Xvalp1[0] - Pval[25])*tanh((Xvalp1[0] - Pval[25])/Pval[26])/(pow(Pval[26], 3)*(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28]))+0);
values[56*(Time+1)+56*(Time)+62] += lambda[11*jt+9]*(0.125*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(Xval[0] - Pval[25])/(pow(Pval[26], 3)*(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28])) - 0.125*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*pow(Xval[0] - Pval[25], 2)*tanh((Xval[0] - Pval[25])/Pval[26])/(pow(Pval[26], 4)*(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28]))+-0.125*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(Xvalp1[0] - Pval[25])/(pow(Pval[26], 3)*(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28])) + 0.125*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*pow(Xvalp1[0] - Pval[25], 2)*tanh((Xvalp1[0] - Pval[25])/Pval[26])/(pow(Pval[26], 4)*(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28]))+0);
values[58*(Time+1)+58*(Time)+63] += lambda[11*jt+9]*(0.25*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 1.0*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2), 2)*(Xval[0] - Pval[25])*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 0.25*Pval[29]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2), 2)*(Xval[0] - Pval[25])*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.5*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(Xval[0] - Pval[25])*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.125*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(Xval[0] - Pval[25])*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[26]*pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+-0.25*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 1.0*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2), 2)*(Xvalp1[0] - Pval[25])*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) - 0.25*Pval[29]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2), 2)*(Xvalp1[0] - Pval[25])*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.5*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(Xvalp1[0] - Pval[25])*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.125*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(Xvalp1[0] - Pval[25])*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[26]*pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+0);
values[58*(Time+1)+58*(Time)+64] += lambda[11*jt+9]*(0.125*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*pow(Xval[0] - Pval[25], 2)*tanh((Xval[0] - Pval[25])/Pval[27])/(pow(Pval[26], 2)*pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+-0.125*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*pow(Xvalp1[0] - Pval[25], 2)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(pow(Pval[26], 2)*pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+0);
values[58*(Time+1)+58*(Time)+65] += lambda[11*jt+9]*(0.5*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(Xval[0] - Pval[25])*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 1.0*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2), 2)*pow(Xval[0] - Pval[25], 2)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 4)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 0.25*Pval[29]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2), 2)*pow(Xval[0] - Pval[25], 2)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 4)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.5*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*pow(Xval[0] - Pval[25], 2)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 4)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+-0.5*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(Xvalp1[0] - Pval[25])*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 1.0*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2), 2)*pow(Xvalp1[0] - Pval[25], 2)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 4)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) - 0.25*Pval[29]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2), 2)*pow(Xvalp1[0] - Pval[25], 2)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 4)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.5*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*pow(Xvalp1[0] - Pval[25], 2)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 4)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+0);
values[60*(Time+1)+60*(Time)+66] += lambda[11*jt+9]*(0.5*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))/(Pval[26]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+-0.5*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) - 0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))/(Pval[26]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+0);
values[60*(Time+1)+60*(Time)+67] += lambda[11*jt+9]*(0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(Xval[0] - Pval[25])/(pow(Pval[26], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+-0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(Xvalp1[0] - Pval[25])/(pow(Pval[26], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+0);
values[60*(Time+1)+60*(Time)+68] += lambda[11*jt+9]*(0.5*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(Xval[0] - Pval[25])*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3))+-0.5*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(Xvalp1[0] - Pval[25])*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3))+0);
values[60*(Time+1)+60*(Time)+69] += lambda[11*jt+9]*(0.25*hstep*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)/pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)+-0.25*hstep*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)/pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)+0);
values[62*(Time+1)+62*(Time)+70] += lambda[11*jt+9]*(-0.5*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2) - 1)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) - 0.25*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2) - 1)/(Pval[26]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+0.5*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2) - 1)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 0.25*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2) - 1)/(Pval[26]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+0);
values[62*(Time+1)+62*(Time)+71] += lambda[11*jt+9]*(-0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(Xval[0] - Pval[25])*(pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2) - 1)/(pow(Pval[26], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(Xvalp1[0] - Pval[25])*(pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2) - 1)/(pow(Pval[26], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+0);
values[62*(Time+1)+62*(Time)+72] += lambda[11*jt+9]*(-0.5*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(Xval[0] - Pval[25])*(pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2) - 1)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) - 0.25*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(Xval[0] - Pval[25])*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+0.5*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(Xvalp1[0] - Pval[25])*(pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2) - 1)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 0.25*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(Xvalp1[0] - Pval[25])*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2))+0);
values[62*(Time+1)+62*(Time)+73] += lambda[11*jt+9]*(-0.25*hstep*(pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2) - 1)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)/pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)+0.25*hstep*(pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2) - 1)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)/pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)+0);
values[62*(Time+1)+62*(Time)+74] += lambda[11*jt+9]*(0.125*hstep*(pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2) - 1)*(2*pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2) - 2)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)/pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)+-0.125*hstep*(pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2) - 1)*(2*pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2) - 2)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)/pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)+0);
values[0*(Time+1)+0*(Time)+0+jt] += lambda[11*jt+0]*(-0.5*Pval[1]*Xval[2]*hstep*pow(Xval[1], 2)/Pval[0]);
values[0*(Time+1)+0*(Time)+0+jt+1] += lambda[11*jt+0]*(-0.5*Pval[1]*Xvalp1[2]*hstep*pow(Xvalp1[1], 2)/Pval[0]);
values[1*(Time+1)+0*(Time)+0+jt] += lambda[11*jt+0]*(-2.0*Pval[1]*Xval2[2]*hstep*pow(Xval2[1], 2)/Pval[0]);
values[1*(Time+1)+1*(Time)+0+jt] += lambda[11*jt+0]*(1.0*Pval[1]*Xval[2]*hstep*Xval[1]*(Pval[2] - Xval[0])/Pval[0]);
values[1*(Time+1)+1*(Time)+0+jt+1] += lambda[11*jt+0]*(1.0*Pval[1]*Xvalp1[2]*hstep*Xvalp1[1]*(Pval[2] - Xvalp1[0])/Pval[0]);
values[2*(Time+1)+1*(Time)+0+jt] += lambda[11*jt+0]*(4.0*Pval[1]*Xval2[2]*hstep*Xval2[1]*(Pval[2] - Xval2[0])/Pval[0]);
values[2*(Time+1)+2*(Time)+0+jt] += lambda[11*jt+0]*(-0.16666666666666699*Pval[1]*hstep*pow(Xval[1], 3)/Pval[0]);
values[2*(Time+1)+2*(Time)+0+jt+1] += lambda[11*jt+0]*(-0.16666666666666699*Pval[1]*hstep*pow(Xvalp1[1], 3)/Pval[0]);
values[3*(Time+1)+2*(Time)+0+jt] += lambda[11*jt+0]*(-0.66666666666666696*Pval[1]*hstep*pow(Xval2[1], 3)/Pval[0]);
values[3*(Time+1)+3*(Time)+0+jt] += lambda[11*jt+0]*(0.5*Pval[1]*hstep*pow(Xval[1], 2)*(Pval[2] - Xval[0])/Pval[0]);
values[3*(Time+1)+3*(Time)+0+jt+1] += lambda[11*jt+0]*(0.5*Pval[1]*hstep*pow(Xvalp1[1], 2)*(Pval[2] - Xvalp1[0])/Pval[0]);
values[4*(Time+1)+3*(Time)+0+jt] += lambda[11*jt+0]*(2.0*Pval[1]*hstep*pow(Xval2[1], 2)*(Pval[2] - Xval2[0])/Pval[0]);
values[4*(Time+1)+4*(Time)+0+jt] += lambda[11*jt+0]*(-0.66666666666666696*pow(Xval[3], 3)*Pval[3]*hstep/Pval[0]);
values[4*(Time+1)+4*(Time)+0+jt+1] += lambda[11*jt+0]*(-0.66666666666666696*pow(Xvalp1[3], 3)*Pval[3]*hstep/Pval[0]);
values[5*(Time+1)+4*(Time)+0+jt] += lambda[11*jt+0]*(-2.6666666666666701*pow(Xval2[3], 3)*Pval[3]*hstep/Pval[0]);
values[5*(Time+1)+5*(Time)+0+jt] += lambda[11*jt+0]*(2.0*pow(Xval[3], 2)*Pval[3]*hstep*(Pval[4] - Xval[0])/Pval[0]);
values[5*(Time+1)+5*(Time)+0+jt+1] += lambda[11*jt+0]*(2.0*pow(Xvalp1[3], 2)*Pval[3]*hstep*(Pval[4] - Xvalp1[0])/Pval[0]);
values[6*(Time+1)+5*(Time)+0+jt] += lambda[11*jt+0]*(8.0*pow(Xval2[3], 2)*Pval[3]*hstep*(Pval[4] - Xval2[0])/Pval[0]);
values[6*(Time+1)+6*(Time)+0+jt] += lambda[11*jt+0]*(-0.16666666666666699*Pval[7]*hstep/Pval[0]);
values[6*(Time+1)+6*(Time)+0+jt+1] += lambda[11*jt+0]*(-0.16666666666666699*Pval[7]*hstep/Pval[0]);
values[7*(Time+1)+6*(Time)+0+jt] += lambda[11*jt+0]*(-0.66666666666666696*Pval[7]*hstep/Pval[0]);
values[7*(Time+1)+7*(Time)+0+jt] += lambda[11*jt+0]*(-0.16666666666666699*hstep);
values[7*(Time+1)+7*(Time)+0+jt+1] += lambda[11*jt+0]*(-0.16666666666666699*hstep);
values[8*(Time+1)+7*(Time)+0+jt] += lambda[11*jt+0]*(-0.66666666666666696*hstep);
values[8*(Time+1)+8*(Time)+0+jt] += lambda[11*jt+0]*(-0.16666666666666699*hstep*(-pow(Xval[3], 4)*Pval[3] - Pval[5] - Pval[1]*Xval[2]*pow(Xval[1], 3) - Pval[7]*Xval[4])/pow(Pval[0], 2));
values[8*(Time+1)+8*(Time)+0+jt+1] += lambda[11*jt+0]*(-0.16666666666666699*hstep*(-pow(Xvalp1[3], 4)*Pval[3] - Pval[5] - Pval[1]*Xvalp1[2]*pow(Xvalp1[1], 3) - Pval[7]*Xvalp1[4])/pow(Pval[0], 2));
values[9*(Time+1)+8*(Time)+0+jt] += lambda[11*jt+0]*(-0.66666666666666696*hstep*(-pow(Xval2[3], 4)*Pval[3] - Pval[5] - Pval[1]*Xval2[2]*pow(Xval2[1], 3) - Pval[7]*Xval2[4])/pow(Pval[0], 2));
values[9*(Time+1)+9*(Time)+0+jt] += lambda[11*jt+0]*(-0.5*Pval[1]*Xval[2]*hstep*pow(Xval[1], 2)*(Pval[2] - Xval[0])/pow(Pval[0], 2));
values[9*(Time+1)+9*(Time)+0+jt+1] += lambda[11*jt+0]*(-0.5*Pval[1]*Xvalp1[2]*hstep*pow(Xvalp1[1], 2)*(Pval[2] - Xvalp1[0])/pow(Pval[0], 2));
values[10*(Time+1)+9*(Time)+0+jt] += lambda[11*jt+0]*(-2.0*Pval[1]*Xval2[2]*hstep*pow(Xval2[1], 2)*(Pval[2] - Xval2[0])/pow(Pval[0], 2));
values[10*(Time+1)+10*(Time)+0+jt] += lambda[11*jt+0]*(-0.16666666666666699*Pval[1]*hstep*pow(Xval[1], 3)*(Pval[2] - Xval[0])/pow(Pval[0], 2));
values[10*(Time+1)+10*(Time)+0+jt+1] += lambda[11*jt+0]*(-0.16666666666666699*Pval[1]*hstep*pow(Xvalp1[1], 3)*(Pval[2] - Xvalp1[0])/pow(Pval[0], 2));
values[11*(Time+1)+10*(Time)+0+jt] += lambda[11*jt+0]*(-0.66666666666666696*Pval[1]*hstep*pow(Xval2[1], 3)*(Pval[2] - Xval2[0])/pow(Pval[0], 2));
values[11*(Time+1)+11*(Time)+0+jt] += lambda[11*jt+0]*(-0.66666666666666696*pow(Xval[3], 3)*Pval[3]*hstep*(Pval[4] - Xval[0])/pow(Pval[0], 2));
values[11*(Time+1)+11*(Time)+0+jt+1] += lambda[11*jt+0]*(-0.66666666666666696*pow(Xvalp1[3], 3)*Pval[3]*hstep*(Pval[4] - Xvalp1[0])/pow(Pval[0], 2));
values[12*(Time+1)+11*(Time)+0+jt] += lambda[11*jt+0]*(-2.6666666666666701*pow(Xval2[3], 3)*Pval[3]*hstep*(Pval[4] - Xval2[0])/pow(Pval[0], 2));
values[12*(Time+1)+12*(Time)+0+jt] += lambda[11*jt+0]*(-0.16666666666666699*Pval[7]*hstep*(Pval[8] - Xval[0])/pow(Pval[0], 2));
values[12*(Time+1)+12*(Time)+0+jt+1] += lambda[11*jt+0]*(-0.16666666666666699*Pval[7]*hstep*(Pval[8] - Xvalp1[0])/pow(Pval[0], 2));
values[13*(Time+1)+12*(Time)+0+jt] += lambda[11*jt+0]*(-0.66666666666666696*Pval[7]*hstep*(Pval[8] - Xval2[0])/pow(Pval[0], 2));
values[13*(Time+1)+13*(Time)+1+jt] += lambda[11*jt+0]*(-0.16666666666666699*Xval[2]*hstep*pow(Xval[1], 3)/Pval[0]);
values[13*(Time+1)+13*(Time)+1+jt+1] += lambda[11*jt+0]*(-0.16666666666666699*Xvalp1[2]*hstep*pow(Xvalp1[1], 3)/Pval[0]);
values[14*(Time+1)+13*(Time)+1+jt] += lambda[11*jt+0]*(-0.66666666666666696*Xval2[2]*hstep*pow(Xval2[1], 3)/Pval[0]);
values[14*(Time+1)+14*(Time)+1+jt] += lambda[11*jt+0]*(0.5*Xval[2]*hstep*pow(Xval[1], 2)*(Pval[2] - Xval[0])/Pval[0]);
values[14*(Time+1)+14*(Time)+1+jt+1] += lambda[11*jt+0]*(0.5*Xvalp1[2]*hstep*pow(Xvalp1[1], 2)*(Pval[2] - Xvalp1[0])/Pval[0]);
values[15*(Time+1)+14*(Time)+1+jt] += lambda[11*jt+0]*(2.0*Xval2[2]*hstep*pow(Xval2[1], 2)*(Pval[2] - Xval2[0])/Pval[0]);
values[15*(Time+1)+15*(Time)+1+jt] += lambda[11*jt+0]*(0.16666666666666699*hstep*pow(Xval[1], 3)*(Pval[2] - Xval[0])/Pval[0]);
values[15*(Time+1)+15*(Time)+1+jt+1] += lambda[11*jt+0]*(0.16666666666666699*hstep*pow(Xvalp1[1], 3)*(Pval[2] - Xvalp1[0])/Pval[0]);
values[16*(Time+1)+15*(Time)+1+jt] += lambda[11*jt+0]*(0.66666666666666696*hstep*pow(Xval2[1], 3)*(Pval[2] - Xval2[0])/Pval[0]);
values[16*(Time+1)+16*(Time)+2+jt] += lambda[11*jt+0]*(0.5*Pval[1]*Xval[2]*hstep*pow(Xval[1], 2)/Pval[0]);
values[16*(Time+1)+16*(Time)+2+jt+1] += lambda[11*jt+0]*(0.5*Pval[1]*Xvalp1[2]*hstep*pow(Xvalp1[1], 2)/Pval[0]);
values[17*(Time+1)+16*(Time)+2+jt] += lambda[11*jt+0]*(2.0*Pval[1]*Xval2[2]*hstep*pow(Xval2[1], 2)/Pval[0]);
values[17*(Time+1)+17*(Time)+2+jt] += lambda[11*jt+0]*(0.16666666666666699*Pval[1]*hstep*pow(Xval[1], 3)/Pval[0]);
values[17*(Time+1)+17*(Time)+2+jt+1] += lambda[11*jt+0]*(0.16666666666666699*Pval[1]*hstep*pow(Xvalp1[1], 3)/Pval[0]);
values[18*(Time+1)+17*(Time)+2+jt] += lambda[11*jt+0]*(0.66666666666666696*Pval[1]*hstep*pow(Xval2[1], 3)/Pval[0]);
values[18*(Time+1)+18*(Time)+4+jt] += lambda[11*jt+0]*(-0.16666666666666699*pow(Xval[3], 4)*hstep/Pval[0]);
values[18*(Time+1)+18*(Time)+4+jt+1] += lambda[11*jt+0]*(-0.16666666666666699*pow(Xvalp1[3], 4)*hstep/Pval[0]);
values[19*(Time+1)+18*(Time)+4+jt] += lambda[11*jt+0]*(-0.66666666666666696*pow(Xval2[3], 4)*hstep/Pval[0]);
values[19*(Time+1)+19*(Time)+4+jt] += lambda[11*jt+0]*(0.66666666666666696*pow(Xval[3], 3)*hstep*(Pval[4] - Xval[0])/Pval[0]);
values[19*(Time+1)+19*(Time)+4+jt+1] += lambda[11*jt+0]*(0.66666666666666696*pow(Xvalp1[3], 3)*hstep*(Pval[4] - Xvalp1[0])/Pval[0]);
values[20*(Time+1)+19*(Time)+4+jt] += lambda[11*jt+0]*(2.6666666666666701*pow(Xval2[3], 3)*hstep*(Pval[4] - Xval2[0])/Pval[0]);
values[20*(Time+1)+20*(Time)+5+jt] += lambda[11*jt+0]*(0.66666666666666696*pow(Xval[3], 3)*Pval[3]*hstep/Pval[0]);
values[20*(Time+1)+20*(Time)+5+jt+1] += lambda[11*jt+0]*(0.66666666666666696*pow(Xvalp1[3], 3)*Pval[3]*hstep/Pval[0]);
values[21*(Time+1)+20*(Time)+5+jt] += lambda[11*jt+0]*(2.6666666666666701*pow(Xval2[3], 3)*Pval[3]*hstep/Pval[0]);
values[21*(Time+1)+21*(Time)+7+jt] += lambda[11*jt+0]*(-0.16666666666666699*hstep/Pval[0]);
values[21*(Time+1)+21*(Time)+7+jt+1] += lambda[11*jt+0]*(-0.16666666666666699*hstep/Pval[0]);
values[22*(Time+1)+21*(Time)+7+jt] += lambda[11*jt+0]*(-0.66666666666666696*hstep/Pval[0]);
values[22*(Time+1)+22*(Time)+10+jt] += lambda[11*jt+0]*(-0.16666666666666699*hstep*Xval[4]/Pval[0]);
values[22*(Time+1)+22*(Time)+10+jt+1] += lambda[11*jt+0]*(-0.16666666666666699*hstep*Xvalp1[4]/Pval[0]);
values[23*(Time+1)+22*(Time)+10+jt] += lambda[11*jt+0]*(-0.66666666666666696*hstep*Xval2[4]/Pval[0]);
values[23*(Time+1)+23*(Time)+10+jt] += lambda[11*jt+0]*(0.16666666666666699*hstep*(Pval[8] - Xval[0])/Pval[0]);
values[23*(Time+1)+23*(Time)+10+jt+1] += lambda[11*jt+0]*(0.16666666666666699*hstep*(Pval[8] - Xvalp1[0])/Pval[0]);
values[24*(Time+1)+23*(Time)+10+jt] += lambda[11*jt+0]*(0.66666666666666696*hstep*(Pval[8] - Xval2[0])/Pval[0]);
values[24*(Time+1)+24*(Time)+11+jt] += lambda[11*jt+0]*(0.16666666666666699*Pval[7]*hstep/Pval[0]);
values[24*(Time+1)+24*(Time)+11+jt+1] += lambda[11*jt+0]*(0.16666666666666699*Pval[7]*hstep/Pval[0]);
values[25*(Time+1)+24*(Time)+11+jt] += lambda[11*jt+0]*(0.66666666666666696*Pval[7]*hstep/Pval[0]);
values[25*(Time+1)+25*(Time)+15+jt] += lambda[11*jt+1]*(1.3333333333333299*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 0.33333333333333298*Pval[14]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.33333333333333298*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[11]*Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.16666666666666699*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*tanh((Xval[0] - Pval[10])/Pval[11])/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13])));
values[25*(Time+1)+25*(Time)+15+jt+1] += lambda[11*jt+1]*(1.3333333333333299*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 0.33333333333333298*Pval[14]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.33333333333333298*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[11]*Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.16666666666666699*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*tanh((Xvalp1[0] - Pval[10])/Pval[11])/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13])));
values[26*(Time+1)+25*(Time)+15+jt] += lambda[11*jt+1]*(5.3333333333333304*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 1.3333333333333299*Pval[14]*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 2.6666666666666701*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 1.3333333333333299*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*tanh((Xval2[0] - Pval[10])/Pval[12])/(Pval[11]*Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.66666666666666696*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[11]), 2))*tanh((Xval2[0] - Pval[10])/Pval[11])/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13])));
values[0*(Time+1)+0*(Time)+0+jt] += lambda[11*jt+1]*(-0.33333333333333298*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[0*(Time+1)+0*(Time)+0+jt+1] += lambda[11*jt+1]*(-0.33333333333333298*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[1*(Time+1)+0*(Time)+0+jt] += lambda[11*jt+1]*(-1.3333333333333299*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*tanh((Xval2[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[26*(Time+1)+26*(Time)+15+jt] += lambda[11*jt+1]*(-1.3333333333333299*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) - 0.33333333333333298*Pval[14]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.33333333333333298*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[11]*Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.16666666666666699*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*tanh((Xval[0] - Pval[10])/Pval[11])/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13])));
values[26*(Time+1)+26*(Time)+15+jt+1] += lambda[11*jt+1]*(-1.3333333333333299*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) - 0.33333333333333298*Pval[14]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.33333333333333298*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[11]*Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.16666666666666699*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*tanh((Xvalp1[0] - Pval[10])/Pval[11])/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13])));
values[27*(Time+1)+26*(Time)+15+jt] += lambda[11*jt+1]*(-5.3333333333333304*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) - 1.3333333333333299*Pval[14]*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 2.6666666666666701*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 1.3333333333333299*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*tanh((Xval2[0] - Pval[10])/Pval[12])/(Pval[11]*Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.66666666666666696*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[11]), 2))*tanh((Xval2[0] - Pval[10])/Pval[11])/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13])));
values[27*(Time+1)+27*(Time)+15+jt] += lambda[11*jt+1]*(0.33333333333333298*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[27*(Time+1)+27*(Time)+15+jt+1] += lambda[11*jt+1]*(0.33333333333333298*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[28*(Time+1)+27*(Time)+15+jt] += lambda[11*jt+1]*(1.3333333333333299*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*tanh((Xval2[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[28*(Time+1)+28*(Time)+16+jt] += lambda[11*jt+1]*(-0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13])) - 0.16666666666666699*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(Xval[0] - Pval[10])*tanh((Xval[0] - Pval[10])/Pval[12])/(pow(Pval[11], 2)*Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.16666666666666699*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(Xval[0] - Pval[10])*tanh((Xval[0] - Pval[10])/Pval[11])/(pow(Pval[11], 3)*(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13])));
values[28*(Time+1)+28*(Time)+16+jt+1] += lambda[11*jt+1]*(-0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13])) - 0.16666666666666699*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(Xvalp1[0] - Pval[10])*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(pow(Pval[11], 2)*Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.16666666666666699*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(Xvalp1[0] - Pval[10])*tanh((Xvalp1[0] - Pval[10])/Pval[11])/(pow(Pval[11], 3)*(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13])));
values[29*(Time+1)+28*(Time)+16+jt] += lambda[11*jt+1]*(-0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[11]), 2))/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13])) - 0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*(Xval2[0] - Pval[10])*tanh((Xval2[0] - Pval[10])/Pval[12])/(pow(Pval[11], 2)*Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.66666666666666696*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[11]), 2))*(Xval2[0] - Pval[10])*tanh((Xval2[0] - Pval[10])/Pval[11])/(pow(Pval[11], 3)*(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13])));
values[29*(Time+1)+29*(Time)+18+jt] += lambda[11*jt+1]*(-0.33333333333333298*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 1.3333333333333299*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2), 2)*(Xval[0] - Pval[10])*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) - 0.33333333333333298*Pval[14]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2), 2)*(Xval[0] - Pval[10])*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(Xval[0] - Pval[10])*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.16666666666666699*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(Xval[0] - Pval[10])*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[11]*pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[29*(Time+1)+29*(Time)+18+jt+1] += lambda[11*jt+1]*(-0.33333333333333298*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 1.3333333333333299*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2), 2)*(Xvalp1[0] - Pval[10])*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) - 0.33333333333333298*Pval[14]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2), 2)*(Xvalp1[0] - Pval[10])*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(Xvalp1[0] - Pval[10])*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.16666666666666699*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(Xvalp1[0] - Pval[10])*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[11]*pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[30*(Time+1)+29*(Time)+18+jt] += lambda[11*jt+1]*(-1.3333333333333299*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval2[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 5.3333333333333304*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2), 2)*(Xval2[0] - Pval[10])*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) - 1.3333333333333299*Pval[14]*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2), 2)*(Xval2[0] - Pval[10])*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 2.6666666666666701*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*(Xval2[0] - Pval[10])*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*(Xval2[0] - Pval[10])*tanh((Xval2[0] - Pval[10])/Pval[12])/(Pval[11]*pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[30*(Time+1)+30*(Time)+18+jt] += lambda[11*jt+1]*(0.33333333333333298*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(Xval[0] - Pval[10])*tanh((Xval[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[30*(Time+1)+30*(Time)+18+jt+1] += lambda[11*jt+1]*(0.33333333333333298*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(Xvalp1[0] - Pval[10])*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[31*(Time+1)+30*(Time)+18+jt] += lambda[11*jt+1]*(1.3333333333333299*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*(Xval2[0] - Pval[10])*tanh((Xval2[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[31*(Time+1)+31*(Time)+21+jt] += lambda[11*jt+1]*(-0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) - 0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))/(Pval[11]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[31*(Time+1)+31*(Time)+21+jt+1] += lambda[11*jt+1]*(-0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) - 0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))/(Pval[11]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[32*(Time+1)+31*(Time)+21+jt] += lambda[11*jt+1]*(-2.6666666666666701*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval2[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) - 0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[11]), 2))/(Pval[11]*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[32*(Time+1)+32*(Time)+21+jt] += lambda[11*jt+1]*(0.16666666666666699*hstep/pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2));
values[32*(Time+1)+32*(Time)+21+jt+1] += lambda[11*jt+1]*(0.16666666666666699*hstep/pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2));
values[33*(Time+1)+32*(Time)+21+jt] += lambda[11*jt+1]*(0.66666666666666696*hstep/pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2));
values[33*(Time+1)+33*(Time)+25+jt] += lambda[11*jt+1]*(0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2) - 1)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 0.33333333333333298*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2) - 1)/(Pval[11]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[33*(Time+1)+33*(Time)+25+jt+1] += lambda[11*jt+1]*(0.66666666666666696*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2) - 1)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 0.33333333333333298*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2) - 1)/(Pval[11]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[34*(Time+1)+33*(Time)+25+jt] += lambda[11*jt+1]*(2.6666666666666701*Pval[14]*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*(pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2) - 1)*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval2[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 1.3333333333333299*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval2[1] + 0.5*tanh((Xval2[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval2[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[11]), 2))*(pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2) - 1)/(Pval[11]*pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[34*(Time+1)+34*(Time)+25+jt] += lambda[11*jt+1]*(-0.16666666666666699*hstep*(pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2) - 1)/pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2));
values[34*(Time+1)+34*(Time)+25+jt+1] += lambda[11*jt+1]*(-0.16666666666666699*hstep*(pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2) - 1)/pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2));
values[35*(Time+1)+34*(Time)+25+jt] += lambda[11*jt+1]*(-0.66666666666666696*hstep*(pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2) - 1)/pow(Pval[14]*(1 - pow(tanh((Xval2[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2));
values[25*(Time+1)+25*(Time)+15+jt] += lambda[11*jt+2]*(1.3333333333333299*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 0.33333333333333298*Pval[19]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.33333333333333298*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[16]*Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.16666666666666699*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*tanh((Xval[0] - Pval[15])/Pval[16])/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18])));
values[25*(Time+1)+25*(Time)+15+jt+1] += lambda[11*jt+2]*(1.3333333333333299*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 0.33333333333333298*Pval[19]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.33333333333333298*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[16]*Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.16666666666666699*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*tanh((Xvalp1[0] - Pval[15])/Pval[16])/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18])));
values[26*(Time+1)+25*(Time)+15+jt] += lambda[11*jt+2]*(5.3333333333333304*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 1.3333333333333299*Pval[19]*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 2.6666666666666701*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 1.3333333333333299*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*tanh((Xval2[0] - Pval[15])/Pval[17])/(Pval[16]*Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.66666666666666696*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[16]), 2))*tanh((Xval2[0] - Pval[15])/Pval[16])/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18])));
values[2*(Time+1)+2*(Time)+0+jt] += lambda[11*jt+2]*(-0.33333333333333298*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[2*(Time+1)+2*(Time)+0+jt+1] += lambda[11*jt+2]*(-0.33333333333333298*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[3*(Time+1)+2*(Time)+0+jt] += lambda[11*jt+2]*(-1.3333333333333299*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*tanh((Xval2[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[35*(Time+1)+35*(Time)+30+jt] += lambda[11*jt+2]*(-1.3333333333333299*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) - 0.33333333333333298*Pval[19]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.33333333333333298*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[16]*Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.16666666666666699*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*tanh((Xval[0] - Pval[15])/Pval[16])/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18])));
values[35*(Time+1)+35*(Time)+30+jt+1] += lambda[11*jt+2]*(-1.3333333333333299*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) - 0.33333333333333298*Pval[19]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.33333333333333298*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[16]*Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.16666666666666699*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*tanh((Xvalp1[0] - Pval[15])/Pval[16])/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18])));
values[36*(Time+1)+35*(Time)+30+jt] += lambda[11*jt+2]*(-5.3333333333333304*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) - 1.3333333333333299*Pval[19]*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 2.6666666666666701*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 1.3333333333333299*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*tanh((Xval2[0] - Pval[15])/Pval[17])/(Pval[16]*Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.66666666666666696*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[16]), 2))*tanh((Xval2[0] - Pval[15])/Pval[16])/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18])));
values[36*(Time+1)+36*(Time)+30+jt] += lambda[11*jt+2]*(0.33333333333333298*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[36*(Time+1)+36*(Time)+30+jt+1] += lambda[11*jt+2]*(0.33333333333333298*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[37*(Time+1)+36*(Time)+30+jt] += lambda[11*jt+2]*(1.3333333333333299*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*tanh((Xval2[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[37*(Time+1)+37*(Time)+31+jt] += lambda[11*jt+2]*(-0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18])) - 0.16666666666666699*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(Xval[0] - Pval[15])*tanh((Xval[0] - Pval[15])/Pval[17])/(pow(Pval[16], 2)*Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.16666666666666699*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(Xval[0] - Pval[15])*tanh((Xval[0] - Pval[15])/Pval[16])/(pow(Pval[16], 3)*(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18])));
values[37*(Time+1)+37*(Time)+31+jt+1] += lambda[11*jt+2]*(-0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18])) - 0.16666666666666699*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(Xvalp1[0] - Pval[15])*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(pow(Pval[16], 2)*Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.16666666666666699*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(Xvalp1[0] - Pval[15])*tanh((Xvalp1[0] - Pval[15])/Pval[16])/(pow(Pval[16], 3)*(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18])));
values[38*(Time+1)+37*(Time)+31+jt] += lambda[11*jt+2]*(-0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[16]), 2))/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18])) - 0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*(Xval2[0] - Pval[15])*tanh((Xval2[0] - Pval[15])/Pval[17])/(pow(Pval[16], 2)*Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.66666666666666696*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[16]), 2))*(Xval2[0] - Pval[15])*tanh((Xval2[0] - Pval[15])/Pval[16])/(pow(Pval[16], 3)*(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18])));
values[38*(Time+1)+38*(Time)+33+jt] += lambda[11*jt+2]*(-0.33333333333333298*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 1.3333333333333299*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2), 2)*(Xval[0] - Pval[15])*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) - 0.33333333333333298*Pval[19]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2), 2)*(Xval[0] - Pval[15])*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(Xval[0] - Pval[15])*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.16666666666666699*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(Xval[0] - Pval[15])*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[16]*pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[38*(Time+1)+38*(Time)+33+jt+1] += lambda[11*jt+2]*(-0.33333333333333298*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 1.3333333333333299*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2), 2)*(Xvalp1[0] - Pval[15])*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) - 0.33333333333333298*Pval[19]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2), 2)*(Xvalp1[0] - Pval[15])*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(Xvalp1[0] - Pval[15])*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.16666666666666699*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(Xvalp1[0] - Pval[15])*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[16]*pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[39*(Time+1)+38*(Time)+33+jt] += lambda[11*jt+2]*(-1.3333333333333299*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval2[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 5.3333333333333304*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2), 2)*(Xval2[0] - Pval[15])*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) - 1.3333333333333299*Pval[19]*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2), 2)*(Xval2[0] - Pval[15])*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 2.6666666666666701*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*(Xval2[0] - Pval[15])*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*(Xval2[0] - Pval[15])*tanh((Xval2[0] - Pval[15])/Pval[17])/(Pval[16]*pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[39*(Time+1)+39*(Time)+33+jt] += lambda[11*jt+2]*(0.33333333333333298*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(Xval[0] - Pval[15])*tanh((Xval[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[39*(Time+1)+39*(Time)+33+jt+1] += lambda[11*jt+2]*(0.33333333333333298*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(Xvalp1[0] - Pval[15])*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[40*(Time+1)+39*(Time)+33+jt] += lambda[11*jt+2]*(1.3333333333333299*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*(Xval2[0] - Pval[15])*tanh((Xval2[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[40*(Time+1)+40*(Time)+36+jt] += lambda[11*jt+2]*(-0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) - 0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))/(Pval[16]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[40*(Time+1)+40*(Time)+36+jt+1] += lambda[11*jt+2]*(-0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) - 0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))/(Pval[16]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[41*(Time+1)+40*(Time)+36+jt] += lambda[11*jt+2]*(-2.6666666666666701*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval2[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) - 0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[16]), 2))/(Pval[16]*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[41*(Time+1)+41*(Time)+36+jt] += lambda[11*jt+2]*(0.16666666666666699*hstep/pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2));
values[41*(Time+1)+41*(Time)+36+jt+1] += lambda[11*jt+2]*(0.16666666666666699*hstep/pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2));
values[42*(Time+1)+41*(Time)+36+jt] += lambda[11*jt+2]*(0.66666666666666696*hstep/pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2));
values[42*(Time+1)+42*(Time)+40+jt] += lambda[11*jt+2]*(0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2) - 1)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 0.33333333333333298*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2) - 1)/(Pval[16]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[42*(Time+1)+42*(Time)+40+jt+1] += lambda[11*jt+2]*(0.66666666666666696*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2) - 1)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 0.33333333333333298*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2) - 1)/(Pval[16]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[43*(Time+1)+42*(Time)+40+jt] += lambda[11*jt+2]*(2.6666666666666701*Pval[19]*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*(pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2) - 1)*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval2[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 1.3333333333333299*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval2[2] + 0.5*tanh((Xval2[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval2[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[16]), 2))*(pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2) - 1)/(Pval[16]*pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[43*(Time+1)+43*(Time)+40+jt] += lambda[11*jt+2]*(-0.16666666666666699*hstep*(pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2) - 1)/pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2));
values[43*(Time+1)+43*(Time)+40+jt+1] += lambda[11*jt+2]*(-0.16666666666666699*hstep*(pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2) - 1)/pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2));
values[44*(Time+1)+43*(Time)+40+jt] += lambda[11*jt+2]*(-0.66666666666666696*hstep*(pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2) - 1)/pow(Pval[19]*(1 - pow(tanh((Xval2[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2));
values[25*(Time+1)+25*(Time)+15+jt] += lambda[11*jt+3]*(1.3333333333333299*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 0.33333333333333298*Pval[24]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.33333333333333298*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[21]*Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.16666666666666699*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*tanh((Xval[0] - Pval[20])/Pval[21])/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23])));
values[25*(Time+1)+25*(Time)+15+jt+1] += lambda[11*jt+3]*(1.3333333333333299*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 0.33333333333333298*Pval[24]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.33333333333333298*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[21]*Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.16666666666666699*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*tanh((Xvalp1[0] - Pval[20])/Pval[21])/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23])));
values[26*(Time+1)+25*(Time)+15+jt] += lambda[11*jt+3]*(5.3333333333333304*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 1.3333333333333299*Pval[24]*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 2.6666666666666701*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 1.3333333333333299*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*tanh((Xval2[0] - Pval[20])/Pval[22])/(Pval[21]*Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.66666666666666696*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[21]), 2))*tanh((Xval2[0] - Pval[20])/Pval[21])/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23])));
values[4*(Time+1)+4*(Time)+0+jt] += lambda[11*jt+3]*(-0.33333333333333298*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[4*(Time+1)+4*(Time)+0+jt+1] += lambda[11*jt+3]*(-0.33333333333333298*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[5*(Time+1)+4*(Time)+0+jt] += lambda[11*jt+3]*(-1.3333333333333299*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*tanh((Xval2[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[44*(Time+1)+44*(Time)+45+jt] += lambda[11*jt+3]*(-1.3333333333333299*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) - 0.33333333333333298*Pval[24]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.33333333333333298*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[21]*Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.16666666666666699*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*tanh((Xval[0] - Pval[20])/Pval[21])/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23])));
values[44*(Time+1)+44*(Time)+45+jt+1] += lambda[11*jt+3]*(-1.3333333333333299*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) - 0.33333333333333298*Pval[24]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.33333333333333298*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[21]*Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.16666666666666699*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*tanh((Xvalp1[0] - Pval[20])/Pval[21])/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23])));
values[45*(Time+1)+44*(Time)+45+jt] += lambda[11*jt+3]*(-5.3333333333333304*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) - 1.3333333333333299*Pval[24]*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 2.6666666666666701*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 1.3333333333333299*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*tanh((Xval2[0] - Pval[20])/Pval[22])/(Pval[21]*Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.66666666666666696*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[21]), 2))*tanh((Xval2[0] - Pval[20])/Pval[21])/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23])));
values[45*(Time+1)+45*(Time)+45+jt] += lambda[11*jt+3]*(0.33333333333333298*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[45*(Time+1)+45*(Time)+45+jt+1] += lambda[11*jt+3]*(0.33333333333333298*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[46*(Time+1)+45*(Time)+45+jt] += lambda[11*jt+3]*(1.3333333333333299*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*tanh((Xval2[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[46*(Time+1)+46*(Time)+46+jt] += lambda[11*jt+3]*(-0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23])) - 0.16666666666666699*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(Xval[0] - Pval[20])*tanh((Xval[0] - Pval[20])/Pval[22])/(pow(Pval[21], 2)*Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.16666666666666699*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(Xval[0] - Pval[20])*tanh((Xval[0] - Pval[20])/Pval[21])/(pow(Pval[21], 3)*(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23])));
values[46*(Time+1)+46*(Time)+46+jt+1] += lambda[11*jt+3]*(-0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23])) - 0.16666666666666699*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(Xvalp1[0] - Pval[20])*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(pow(Pval[21], 2)*Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.16666666666666699*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(Xvalp1[0] - Pval[20])*tanh((Xvalp1[0] - Pval[20])/Pval[21])/(pow(Pval[21], 3)*(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23])));
values[47*(Time+1)+46*(Time)+46+jt] += lambda[11*jt+3]*(-0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[21]), 2))/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23])) - 0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*(Xval2[0] - Pval[20])*tanh((Xval2[0] - Pval[20])/Pval[22])/(pow(Pval[21], 2)*Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.66666666666666696*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[21]), 2))*(Xval2[0] - Pval[20])*tanh((Xval2[0] - Pval[20])/Pval[21])/(pow(Pval[21], 3)*(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23])));
values[47*(Time+1)+47*(Time)+48+jt] += lambda[11*jt+3]*(-0.33333333333333298*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 1.3333333333333299*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2), 2)*(Xval[0] - Pval[20])*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) - 0.33333333333333298*Pval[24]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2), 2)*(Xval[0] - Pval[20])*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(Xval[0] - Pval[20])*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.16666666666666699*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(Xval[0] - Pval[20])*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[21]*pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[47*(Time+1)+47*(Time)+48+jt+1] += lambda[11*jt+3]*(-0.33333333333333298*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 1.3333333333333299*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2), 2)*(Xvalp1[0] - Pval[20])*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) - 0.33333333333333298*Pval[24]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2), 2)*(Xvalp1[0] - Pval[20])*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(Xvalp1[0] - Pval[20])*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.16666666666666699*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(Xvalp1[0] - Pval[20])*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[21]*pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[48*(Time+1)+47*(Time)+48+jt] += lambda[11*jt+3]*(-1.3333333333333299*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval2[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 5.3333333333333304*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2), 2)*(Xval2[0] - Pval[20])*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) - 1.3333333333333299*Pval[24]*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2), 2)*(Xval2[0] - Pval[20])*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 2.6666666666666701*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*(Xval2[0] - Pval[20])*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*(Xval2[0] - Pval[20])*tanh((Xval2[0] - Pval[20])/Pval[22])/(Pval[21]*pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[48*(Time+1)+48*(Time)+48+jt] += lambda[11*jt+3]*(0.33333333333333298*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(Xval[0] - Pval[20])*tanh((Xval[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[48*(Time+1)+48*(Time)+48+jt+1] += lambda[11*jt+3]*(0.33333333333333298*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(Xvalp1[0] - Pval[20])*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[49*(Time+1)+48*(Time)+48+jt] += lambda[11*jt+3]*(1.3333333333333299*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*(Xval2[0] - Pval[20])*tanh((Xval2[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[49*(Time+1)+49*(Time)+51+jt] += lambda[11*jt+3]*(-0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) - 0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))/(Pval[21]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[49*(Time+1)+49*(Time)+51+jt+1] += lambda[11*jt+3]*(-0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) - 0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))/(Pval[21]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[50*(Time+1)+49*(Time)+51+jt] += lambda[11*jt+3]*(-2.6666666666666701*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval2[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) - 0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[21]), 2))/(Pval[21]*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[50*(Time+1)+50*(Time)+51+jt] += lambda[11*jt+3]*(0.16666666666666699*hstep/pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2));
values[50*(Time+1)+50*(Time)+51+jt+1] += lambda[11*jt+3]*(0.16666666666666699*hstep/pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2));
values[51*(Time+1)+50*(Time)+51+jt] += lambda[11*jt+3]*(0.66666666666666696*hstep/pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2));
values[51*(Time+1)+51*(Time)+55+jt] += lambda[11*jt+3]*(0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2) - 1)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 0.33333333333333298*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2) - 1)/(Pval[21]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[51*(Time+1)+51*(Time)+55+jt+1] += lambda[11*jt+3]*(0.66666666666666696*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2) - 1)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 0.33333333333333298*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2) - 1)/(Pval[21]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[52*(Time+1)+51*(Time)+55+jt] += lambda[11*jt+3]*(2.6666666666666701*Pval[24]*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*(pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2) - 1)*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval2[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 1.3333333333333299*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval2[3] + 0.5*tanh((Xval2[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval2[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[21]), 2))*(pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2) - 1)/(Pval[21]*pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[52*(Time+1)+52*(Time)+55+jt] += lambda[11*jt+3]*(-0.16666666666666699*hstep*(pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2) - 1)/pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2));
values[52*(Time+1)+52*(Time)+55+jt+1] += lambda[11*jt+3]*(-0.16666666666666699*hstep*(pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2) - 1)/pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2));
values[53*(Time+1)+52*(Time)+55+jt] += lambda[11*jt+3]*(-0.66666666666666696*hstep*(pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2) - 1)/pow(Pval[24]*(1 - pow(tanh((Xval2[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2));
values[25*(Time+1)+25*(Time)+15+jt] += lambda[11*jt+4]*(1.3333333333333299*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 0.33333333333333298*Pval[29]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.33333333333333298*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[26]*Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.16666666666666699*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*tanh((Xval[0] - Pval[25])/Pval[26])/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28])));
values[25*(Time+1)+25*(Time)+15+jt+1] += lambda[11*jt+4]*(1.3333333333333299*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 0.33333333333333298*Pval[29]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.33333333333333298*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[26]*Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.16666666666666699*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*tanh((Xvalp1[0] - Pval[25])/Pval[26])/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28])));
values[26*(Time+1)+25*(Time)+15+jt] += lambda[11*jt+4]*(5.3333333333333304*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 1.3333333333333299*Pval[29]*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 2.6666666666666701*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 1.3333333333333299*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*tanh((Xval2[0] - Pval[25])/Pval[27])/(Pval[26]*Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.66666666666666696*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[26]), 2))*tanh((Xval2[0] - Pval[25])/Pval[26])/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28])));
values[6*(Time+1)+6*(Time)+0+jt] += lambda[11*jt+4]*(-0.33333333333333298*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[6*(Time+1)+6*(Time)+0+jt+1] += lambda[11*jt+4]*(-0.33333333333333298*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[7*(Time+1)+6*(Time)+0+jt] += lambda[11*jt+4]*(-1.3333333333333299*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*tanh((Xval2[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[53*(Time+1)+53*(Time)+60+jt] += lambda[11*jt+4]*(-1.3333333333333299*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) - 0.33333333333333298*Pval[29]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.33333333333333298*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[26]*Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.16666666666666699*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*tanh((Xval[0] - Pval[25])/Pval[26])/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28])));
values[53*(Time+1)+53*(Time)+60+jt+1] += lambda[11*jt+4]*(-1.3333333333333299*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) - 0.33333333333333298*Pval[29]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.33333333333333298*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[26]*Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.16666666666666699*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*tanh((Xvalp1[0] - Pval[25])/Pval[26])/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28])));
values[54*(Time+1)+53*(Time)+60+jt] += lambda[11*jt+4]*(-5.3333333333333304*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) - 1.3333333333333299*Pval[29]*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 2.6666666666666701*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 1.3333333333333299*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*tanh((Xval2[0] - Pval[25])/Pval[27])/(Pval[26]*Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.66666666666666696*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[26]), 2))*tanh((Xval2[0] - Pval[25])/Pval[26])/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28])));
values[54*(Time+1)+54*(Time)+60+jt] += lambda[11*jt+4]*(0.33333333333333298*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[54*(Time+1)+54*(Time)+60+jt+1] += lambda[11*jt+4]*(0.33333333333333298*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[55*(Time+1)+54*(Time)+60+jt] += lambda[11*jt+4]*(1.3333333333333299*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*tanh((Xval2[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[55*(Time+1)+55*(Time)+61+jt] += lambda[11*jt+4]*(-0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28])) - 0.16666666666666699*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(Xval[0] - Pval[25])*tanh((Xval[0] - Pval[25])/Pval[27])/(pow(Pval[26], 2)*Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.16666666666666699*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(Xval[0] - Pval[25])*tanh((Xval[0] - Pval[25])/Pval[26])/(pow(Pval[26], 3)*(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28])));
values[55*(Time+1)+55*(Time)+61+jt+1] += lambda[11*jt+4]*(-0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28])) - 0.16666666666666699*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(Xvalp1[0] - Pval[25])*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(pow(Pval[26], 2)*Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.16666666666666699*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(Xvalp1[0] - Pval[25])*tanh((Xvalp1[0] - Pval[25])/Pval[26])/(pow(Pval[26], 3)*(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28])));
values[56*(Time+1)+55*(Time)+61+jt] += lambda[11*jt+4]*(-0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[26]), 2))/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28])) - 0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*(Xval2[0] - Pval[25])*tanh((Xval2[0] - Pval[25])/Pval[27])/(pow(Pval[26], 2)*Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.66666666666666696*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[26]), 2))*(Xval2[0] - Pval[25])*tanh((Xval2[0] - Pval[25])/Pval[26])/(pow(Pval[26], 3)*(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28])));
values[56*(Time+1)+56*(Time)+63+jt] += lambda[11*jt+4]*(-0.33333333333333298*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 1.3333333333333299*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2), 2)*(Xval[0] - Pval[25])*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) - 0.33333333333333298*Pval[29]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2), 2)*(Xval[0] - Pval[25])*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(Xval[0] - Pval[25])*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.16666666666666699*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(Xval[0] - Pval[25])*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[26]*pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[56*(Time+1)+56*(Time)+63+jt+1] += lambda[11*jt+4]*(-0.33333333333333298*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 1.3333333333333299*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2), 2)*(Xvalp1[0] - Pval[25])*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) - 0.33333333333333298*Pval[29]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2), 2)*(Xvalp1[0] - Pval[25])*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(Xvalp1[0] - Pval[25])*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.16666666666666699*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(Xvalp1[0] - Pval[25])*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[26]*pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[57*(Time+1)+56*(Time)+63+jt] += lambda[11*jt+4]*(-1.3333333333333299*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval2[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 5.3333333333333304*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2), 2)*(Xval2[0] - Pval[25])*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) - 1.3333333333333299*Pval[29]*hstep*pow(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2), 2)*(Xval2[0] - Pval[25])*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 2.6666666666666701*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*(Xval2[0] - Pval[25])*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*(Xval2[0] - Pval[25])*tanh((Xval2[0] - Pval[25])/Pval[27])/(Pval[26]*pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[57*(Time+1)+57*(Time)+63+jt] += lambda[11*jt+4]*(0.33333333333333298*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(Xval[0] - Pval[25])*tanh((Xval[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[57*(Time+1)+57*(Time)+63+jt+1] += lambda[11*jt+4]*(0.33333333333333298*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(Xvalp1[0] - Pval[25])*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[58*(Time+1)+57*(Time)+63+jt] += lambda[11*jt+4]*(1.3333333333333299*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*(Xval2[0] - Pval[25])*tanh((Xval2[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[58*(Time+1)+58*(Time)+66+jt] += lambda[11*jt+4]*(-0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) - 0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))/(Pval[26]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[58*(Time+1)+58*(Time)+66+jt+1] += lambda[11*jt+4]*(-0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) - 0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))/(Pval[26]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[59*(Time+1)+58*(Time)+66+jt] += lambda[11*jt+4]*(-2.6666666666666701*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval2[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) - 0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[26]), 2))/(Pval[26]*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[59*(Time+1)+59*(Time)+66+jt] += lambda[11*jt+4]*(0.16666666666666699*hstep/pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2));
values[59*(Time+1)+59*(Time)+66+jt+1] += lambda[11*jt+4]*(0.16666666666666699*hstep/pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2));
values[60*(Time+1)+59*(Time)+66+jt] += lambda[11*jt+4]*(0.66666666666666696*hstep/pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2));
values[60*(Time+1)+60*(Time)+70+jt] += lambda[11*jt+4]*(0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2) - 1)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 0.33333333333333298*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.083333333333333301*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2) - 1)/(Pval[26]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[60*(Time+1)+60*(Time)+70+jt+1] += lambda[11*jt+4]*(0.66666666666666696*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2) - 1)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 0.33333333333333298*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.083333333333333301*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2) - 1)/(Pval[26]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[61*(Time+1)+60*(Time)+70+jt] += lambda[11*jt+4]*(2.6666666666666701*Pval[29]*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*(pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2) - 1)*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval2[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 1.3333333333333299*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval2[4] + 0.5*tanh((Xval2[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval2[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.33333333333333298*hstep*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[26]), 2))*(pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2) - 1)/(Pval[26]*pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[61*(Time+1)+61*(Time)+70+jt] += lambda[11*jt+4]*(-0.16666666666666699*hstep*(pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2) - 1)/pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2));
values[61*(Time+1)+61*(Time)+70+jt+1] += lambda[11*jt+4]*(-0.16666666666666699*hstep*(pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2) - 1)/pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2));
values[62*(Time+1)+61*(Time)+70+jt] += lambda[11*jt+4]*(-0.66666666666666696*hstep*(pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2) - 1)/pow(Pval[29]*(1 - pow(tanh((Xval2[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2));
values[0*(Time+1)+0*(Time)+0+jt] += lambda[11*jt+5]*(-0.375*Pval[1]*Xval[2]*hstep*pow(Xval[1], 2)/Pval[0]);
values[0*(Time+1)+0*(Time)+0+jt+1] += lambda[11*jt+5]*(0.375*Pval[1]*Xvalp1[2]*hstep*pow(Xvalp1[1], 2)/Pval[0]);
values[1*(Time+1)+1*(Time)+0+jt] += lambda[11*jt+5]*(0.75*Pval[1]*Xval[2]*hstep*Xval[1]*(Pval[2] - Xval[0])/Pval[0]);
values[1*(Time+1)+1*(Time)+0+jt+1] += lambda[11*jt+5]*(-0.75*Pval[1]*Xvalp1[2]*hstep*Xvalp1[1]*(Pval[2] - Xvalp1[0])/Pval[0]);
values[2*(Time+1)+2*(Time)+0+jt] += lambda[11*jt+5]*(-0.125*Pval[1]*hstep*pow(Xval[1], 3)/Pval[0]);
values[2*(Time+1)+2*(Time)+0+jt+1] += lambda[11*jt+5]*(0.125*Pval[1]*hstep*pow(Xvalp1[1], 3)/Pval[0]);
values[3*(Time+1)+3*(Time)+0+jt] += lambda[11*jt+5]*(0.375*Pval[1]*hstep*pow(Xval[1], 2)*(Pval[2] - Xval[0])/Pval[0]);
values[3*(Time+1)+3*(Time)+0+jt+1] += lambda[11*jt+5]*(-0.375*Pval[1]*hstep*pow(Xvalp1[1], 2)*(Pval[2] - Xvalp1[0])/Pval[0]);
values[4*(Time+1)+4*(Time)+0+jt] += lambda[11*jt+5]*(-0.5*pow(Xval[3], 3)*Pval[3]*hstep/Pval[0]);
values[4*(Time+1)+4*(Time)+0+jt+1] += lambda[11*jt+5]*(0.5*pow(Xvalp1[3], 3)*Pval[3]*hstep/Pval[0]);
values[5*(Time+1)+5*(Time)+0+jt] += lambda[11*jt+5]*(1.5*pow(Xval[3], 2)*Pval[3]*hstep*(Pval[4] - Xval[0])/Pval[0]);
values[5*(Time+1)+5*(Time)+0+jt+1] += lambda[11*jt+5]*(-1.5*pow(Xvalp1[3], 2)*Pval[3]*hstep*(Pval[4] - Xvalp1[0])/Pval[0]);
values[6*(Time+1)+6*(Time)+0+jt] += lambda[11*jt+5]*(-0.125*Pval[7]*hstep/Pval[0]);
values[6*(Time+1)+6*(Time)+0+jt+1] += lambda[11*jt+5]*(0.125*Pval[7]*hstep/Pval[0]);
values[7*(Time+1)+7*(Time)+0+jt] += lambda[11*jt+5]*(-0.125*hstep);
values[7*(Time+1)+7*(Time)+0+jt+1] += lambda[11*jt+5]*(0.125*hstep);
values[8*(Time+1)+8*(Time)+0+jt] += lambda[11*jt+5]*(-0.125*hstep*(-pow(Xval[3], 4)*Pval[3] - Pval[5] - Pval[1]*Xval[2]*pow(Xval[1], 3) - Pval[7]*Xval[4])/pow(Pval[0], 2));
values[8*(Time+1)+8*(Time)+0+jt+1] += lambda[11*jt+5]*(0.125*hstep*(-pow(Xvalp1[3], 4)*Pval[3] - Pval[5] - Pval[1]*Xvalp1[2]*pow(Xvalp1[1], 3) - Pval[7]*Xvalp1[4])/pow(Pval[0], 2));
values[9*(Time+1)+9*(Time)+0+jt] += lambda[11*jt+5]*(-0.375*Pval[1]*Xval[2]*hstep*pow(Xval[1], 2)*(Pval[2] - Xval[0])/pow(Pval[0], 2));
values[9*(Time+1)+9*(Time)+0+jt+1] += lambda[11*jt+5]*(0.375*Pval[1]*Xvalp1[2]*hstep*pow(Xvalp1[1], 2)*(Pval[2] - Xvalp1[0])/pow(Pval[0], 2));
values[10*(Time+1)+10*(Time)+0+jt] += lambda[11*jt+5]*(-0.125*Pval[1]*hstep*pow(Xval[1], 3)*(Pval[2] - Xval[0])/pow(Pval[0], 2));
values[10*(Time+1)+10*(Time)+0+jt+1] += lambda[11*jt+5]*(0.125*Pval[1]*hstep*pow(Xvalp1[1], 3)*(Pval[2] - Xvalp1[0])/pow(Pval[0], 2));
values[11*(Time+1)+11*(Time)+0+jt] += lambda[11*jt+5]*(-0.5*pow(Xval[3], 3)*Pval[3]*hstep*(Pval[4] - Xval[0])/pow(Pval[0], 2));
values[11*(Time+1)+11*(Time)+0+jt+1] += lambda[11*jt+5]*(0.5*pow(Xvalp1[3], 3)*Pval[3]*hstep*(Pval[4] - Xvalp1[0])/pow(Pval[0], 2));
values[12*(Time+1)+12*(Time)+0+jt] += lambda[11*jt+5]*(-0.125*Pval[7]*hstep*(Pval[8] - Xval[0])/pow(Pval[0], 2));
values[12*(Time+1)+12*(Time)+0+jt+1] += lambda[11*jt+5]*(0.125*Pval[7]*hstep*(Pval[8] - Xvalp1[0])/pow(Pval[0], 2));
values[13*(Time+1)+13*(Time)+1+jt] += lambda[11*jt+5]*(-0.125*Xval[2]*hstep*pow(Xval[1], 3)/Pval[0]);
values[13*(Time+1)+13*(Time)+1+jt+1] += lambda[11*jt+5]*(0.125*Xvalp1[2]*hstep*pow(Xvalp1[1], 3)/Pval[0]);
values[14*(Time+1)+14*(Time)+1+jt] += lambda[11*jt+5]*(0.375*Xval[2]*hstep*pow(Xval[1], 2)*(Pval[2] - Xval[0])/Pval[0]);
values[14*(Time+1)+14*(Time)+1+jt+1] += lambda[11*jt+5]*(-0.375*Xvalp1[2]*hstep*pow(Xvalp1[1], 2)*(Pval[2] - Xvalp1[0])/Pval[0]);
values[15*(Time+1)+15*(Time)+1+jt] += lambda[11*jt+5]*(0.125*hstep*pow(Xval[1], 3)*(Pval[2] - Xval[0])/Pval[0]);
values[15*(Time+1)+15*(Time)+1+jt+1] += lambda[11*jt+5]*(-0.125*hstep*pow(Xvalp1[1], 3)*(Pval[2] - Xvalp1[0])/Pval[0]);
values[16*(Time+1)+16*(Time)+2+jt] += lambda[11*jt+5]*(0.375*Pval[1]*Xval[2]*hstep*pow(Xval[1], 2)/Pval[0]);
values[16*(Time+1)+16*(Time)+2+jt+1] += lambda[11*jt+5]*(-0.375*Pval[1]*Xvalp1[2]*hstep*pow(Xvalp1[1], 2)/Pval[0]);
values[17*(Time+1)+17*(Time)+2+jt] += lambda[11*jt+5]*(0.125*Pval[1]*hstep*pow(Xval[1], 3)/Pval[0]);
values[17*(Time+1)+17*(Time)+2+jt+1] += lambda[11*jt+5]*(-0.125*Pval[1]*hstep*pow(Xvalp1[1], 3)/Pval[0]);
values[18*(Time+1)+18*(Time)+4+jt] += lambda[11*jt+5]*(-0.125*pow(Xval[3], 4)*hstep/Pval[0]);
values[18*(Time+1)+18*(Time)+4+jt+1] += lambda[11*jt+5]*(0.125*pow(Xvalp1[3], 4)*hstep/Pval[0]);
values[19*(Time+1)+19*(Time)+4+jt] += lambda[11*jt+5]*(0.5*pow(Xval[3], 3)*hstep*(Pval[4] - Xval[0])/Pval[0]);
values[19*(Time+1)+19*(Time)+4+jt+1] += lambda[11*jt+5]*(-0.5*pow(Xvalp1[3], 3)*hstep*(Pval[4] - Xvalp1[0])/Pval[0]);
values[20*(Time+1)+20*(Time)+5+jt] += lambda[11*jt+5]*(0.5*pow(Xval[3], 3)*Pval[3]*hstep/Pval[0]);
values[20*(Time+1)+20*(Time)+5+jt+1] += lambda[11*jt+5]*(-0.5*pow(Xvalp1[3], 3)*Pval[3]*hstep/Pval[0]);
values[21*(Time+1)+21*(Time)+7+jt] += lambda[11*jt+5]*(-0.125*hstep/Pval[0]);
values[21*(Time+1)+21*(Time)+7+jt+1] += lambda[11*jt+5]*(0.125*hstep/Pval[0]);
values[22*(Time+1)+22*(Time)+10+jt] += lambda[11*jt+5]*(-0.125*hstep*Xval[4]/Pval[0]);
values[22*(Time+1)+22*(Time)+10+jt+1] += lambda[11*jt+5]*(0.125*hstep*Xvalp1[4]/Pval[0]);
values[23*(Time+1)+23*(Time)+10+jt] += lambda[11*jt+5]*(0.125*hstep*(Pval[8] - Xval[0])/Pval[0]);
values[23*(Time+1)+23*(Time)+10+jt+1] += lambda[11*jt+5]*(-0.125*hstep*(Pval[8] - Xvalp1[0])/Pval[0]);
values[24*(Time+1)+24*(Time)+11+jt] += lambda[11*jt+5]*(0.125*Pval[7]*hstep/Pval[0]);
values[24*(Time+1)+24*(Time)+11+jt+1] += lambda[11*jt+5]*(-0.125*Pval[7]*hstep/Pval[0]);
values[25*(Time+1)+25*(Time)+15+jt] += lambda[11*jt+6]*(1.0*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 0.25*Pval[14]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.5*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.25*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[11]*Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.125*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*tanh((Xval[0] - Pval[10])/Pval[11])/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13])));
values[25*(Time+1)+25*(Time)+15+jt+1] += lambda[11*jt+6]*(-1.0*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) - 0.25*Pval[14]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.5*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.25*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[11]*Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.125*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*tanh((Xvalp1[0] - Pval[10])/Pval[11])/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13])));
values[0*(Time+1)+0*(Time)+0+jt] += lambda[11*jt+6]*(-0.25*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[0*(Time+1)+0*(Time)+0+jt+1] += lambda[11*jt+6]*(0.25*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[26*(Time+1)+26*(Time)+15+jt] += lambda[11*jt+6]*(-1.0*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) - 0.25*Pval[14]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.5*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.25*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[11]*Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.125*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*tanh((Xval[0] - Pval[10])/Pval[11])/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13])));
values[26*(Time+1)+26*(Time)+15+jt+1] += lambda[11*jt+6]*(1.0*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 0.25*Pval[14]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2), 2)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.5*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.25*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[11]*Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.125*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*tanh((Xvalp1[0] - Pval[10])/Pval[11])/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13])));
values[27*(Time+1)+27*(Time)+15+jt] += lambda[11*jt+6]*(0.25*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[27*(Time+1)+27*(Time)+15+jt+1] += lambda[11*jt+6]*(-0.25*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[28*(Time+1)+28*(Time)+16+jt] += lambda[11*jt+6]*(-0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13])) - 0.125*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(Xval[0] - Pval[10])*tanh((Xval[0] - Pval[10])/Pval[12])/(pow(Pval[11], 2)*Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.125*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(Xval[0] - Pval[10])*tanh((Xval[0] - Pval[10])/Pval[11])/(pow(Pval[11], 3)*(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13])));
values[28*(Time+1)+28*(Time)+16+jt+1] += lambda[11*jt+6]*(0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))/(pow(Pval[11], 2)*(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13])) + 0.125*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(Xvalp1[0] - Pval[10])*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(pow(Pval[11], 2)*Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.125*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(Xvalp1[0] - Pval[10])*tanh((Xvalp1[0] - Pval[10])/Pval[11])/(pow(Pval[11], 3)*(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13])));
values[29*(Time+1)+29*(Time)+18+jt] += lambda[11*jt+6]*(-0.25*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 1.0*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2), 2)*(Xval[0] - Pval[10])*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) - 0.25*Pval[14]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2), 2)*(Xval[0] - Pval[10])*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.5*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(Xval[0] - Pval[10])*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.125*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(Xval[0] - Pval[10])*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[11]*pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[29*(Time+1)+29*(Time)+18+jt+1] += lambda[11*jt+6]*(0.25*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 1.0*pow(Pval[14], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2), 2)*(Xvalp1[0] - Pval[10])*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 0.25*Pval[14]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2), 2)*(Xvalp1[0] - Pval[10])*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.5*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(Xvalp1[0] - Pval[10])*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)/(pow(Pval[12], 3)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.125*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(Xvalp1[0] - Pval[10])*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[11]*pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[30*(Time+1)+30*(Time)+18+jt] += lambda[11*jt+6]*(0.25*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(Xval[0] - Pval[10])*tanh((Xval[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[30*(Time+1)+30*(Time)+18+jt+1] += lambda[11*jt+6]*(-0.25*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(Xvalp1[0] - Pval[10])*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(pow(Pval[12], 2)*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[31*(Time+1)+31*(Time)+21+jt] += lambda[11*jt+6]*(-0.5*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) - 0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))/(Pval[11]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[31*(Time+1)+31*(Time)+21+jt+1] += lambda[11*jt+6]*(0.5*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))/(Pval[11]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[32*(Time+1)+32*(Time)+21+jt] += lambda[11*jt+6]*(0.125*hstep/pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2));
values[32*(Time+1)+32*(Time)+21+jt+1] += lambda[11*jt+6]*(-0.125*hstep/pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2));
values[33*(Time+1)+33*(Time)+25+jt] += lambda[11*jt+6]*(0.5*Pval[14]*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2) - 1)*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) + 0.25*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xval[1] + 0.5*tanh((Xval[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xval[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) + 0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[11]), 2))*(pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2) - 1)/(Pval[11]*pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[33*(Time+1)+33*(Time)+25+jt+1] += lambda[11*jt+6]*(-0.5*Pval[14]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2) - 1)*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 3)) - 0.25*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2))*(-1.0*Xvalp1[1] + 0.5*tanh((Xvalp1[0] - Pval[10])/Pval[11]) + 0.5)*tanh((Xvalp1[0] - Pval[10])/Pval[12])/(Pval[12]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)) - 0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[11]), 2))*(pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2) - 1)/(Pval[11]*pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2)));
values[34*(Time+1)+34*(Time)+25+jt] += lambda[11*jt+6]*(-0.125*hstep*(pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2) - 1)/pow(Pval[14]*(1 - pow(tanh((Xval[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2));
values[34*(Time+1)+34*(Time)+25+jt+1] += lambda[11*jt+6]*(0.125*hstep*(pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2) - 1)/pow(Pval[14]*(1 - pow(tanh((Xvalp1[0] - Pval[10])/Pval[12]), 2)) + Pval[13], 2));
values[25*(Time+1)+25*(Time)+15+jt] += lambda[11*jt+7]*(1.0*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 0.25*Pval[19]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.5*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.25*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[16]*Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.125*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*tanh((Xval[0] - Pval[15])/Pval[16])/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18])));
values[25*(Time+1)+25*(Time)+15+jt+1] += lambda[11*jt+7]*(-1.0*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) - 0.25*Pval[19]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.5*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.25*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[16]*Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.125*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*tanh((Xvalp1[0] - Pval[15])/Pval[16])/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18])));
values[2*(Time+1)+2*(Time)+0+jt] += lambda[11*jt+7]*(-0.25*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[2*(Time+1)+2*(Time)+0+jt+1] += lambda[11*jt+7]*(0.25*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[35*(Time+1)+35*(Time)+30+jt] += lambda[11*jt+7]*(-1.0*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) - 0.25*Pval[19]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.5*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.25*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[16]*Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.125*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*tanh((Xval[0] - Pval[15])/Pval[16])/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18])));
values[35*(Time+1)+35*(Time)+30+jt+1] += lambda[11*jt+7]*(1.0*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 0.25*Pval[19]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2), 2)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.5*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.25*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[16]*Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.125*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*tanh((Xvalp1[0] - Pval[15])/Pval[16])/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18])));
values[36*(Time+1)+36*(Time)+30+jt] += lambda[11*jt+7]*(0.25*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[36*(Time+1)+36*(Time)+30+jt+1] += lambda[11*jt+7]*(-0.25*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[37*(Time+1)+37*(Time)+31+jt] += lambda[11*jt+7]*(-0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18])) - 0.125*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(Xval[0] - Pval[15])*tanh((Xval[0] - Pval[15])/Pval[17])/(pow(Pval[16], 2)*Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.125*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(Xval[0] - Pval[15])*tanh((Xval[0] - Pval[15])/Pval[16])/(pow(Pval[16], 3)*(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18])));
values[37*(Time+1)+37*(Time)+31+jt+1] += lambda[11*jt+7]*(0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))/(pow(Pval[16], 2)*(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18])) + 0.125*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(Xvalp1[0] - Pval[15])*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(pow(Pval[16], 2)*Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.125*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(Xvalp1[0] - Pval[15])*tanh((Xvalp1[0] - Pval[15])/Pval[16])/(pow(Pval[16], 3)*(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18])));
values[38*(Time+1)+38*(Time)+33+jt] += lambda[11*jt+7]*(-0.25*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 1.0*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2), 2)*(Xval[0] - Pval[15])*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) - 0.25*Pval[19]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2), 2)*(Xval[0] - Pval[15])*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.5*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(Xval[0] - Pval[15])*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.125*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(Xval[0] - Pval[15])*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[16]*pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[38*(Time+1)+38*(Time)+33+jt+1] += lambda[11*jt+7]*(0.25*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 1.0*pow(Pval[19], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2), 2)*(Xvalp1[0] - Pval[15])*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 0.25*Pval[19]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2), 2)*(Xvalp1[0] - Pval[15])*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.5*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(Xvalp1[0] - Pval[15])*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)/(pow(Pval[17], 3)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.125*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(Xvalp1[0] - Pval[15])*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[16]*pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[39*(Time+1)+39*(Time)+33+jt] += lambda[11*jt+7]*(0.25*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(Xval[0] - Pval[15])*tanh((Xval[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[39*(Time+1)+39*(Time)+33+jt+1] += lambda[11*jt+7]*(-0.25*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(Xvalp1[0] - Pval[15])*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(pow(Pval[17], 2)*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[40*(Time+1)+40*(Time)+36+jt] += lambda[11*jt+7]*(-0.5*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) - 0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))/(Pval[16]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[40*(Time+1)+40*(Time)+36+jt+1] += lambda[11*jt+7]*(0.5*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))/(Pval[16]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[41*(Time+1)+41*(Time)+36+jt] += lambda[11*jt+7]*(0.125*hstep/pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2));
values[41*(Time+1)+41*(Time)+36+jt+1] += lambda[11*jt+7]*(-0.125*hstep/pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2));
values[42*(Time+1)+42*(Time)+40+jt] += lambda[11*jt+7]*(0.5*Pval[19]*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2) - 1)*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) + 0.25*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xval[2] + 0.5*tanh((Xval[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xval[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) + 0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[16]), 2))*(pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2) - 1)/(Pval[16]*pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[42*(Time+1)+42*(Time)+40+jt+1] += lambda[11*jt+7]*(-0.5*Pval[19]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2) - 1)*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 3)) - 0.25*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2))*(-1.0*Xvalp1[2] + 0.5*tanh((Xvalp1[0] - Pval[15])/Pval[16]) + 0.5)*tanh((Xvalp1[0] - Pval[15])/Pval[17])/(Pval[17]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)) - 0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[16]), 2))*(pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2) - 1)/(Pval[16]*pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2)));
values[43*(Time+1)+43*(Time)+40+jt] += lambda[11*jt+7]*(-0.125*hstep*(pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2) - 1)/pow(Pval[19]*(1 - pow(tanh((Xval[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2));
values[43*(Time+1)+43*(Time)+40+jt+1] += lambda[11*jt+7]*(0.125*hstep*(pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2) - 1)/pow(Pval[19]*(1 - pow(tanh((Xvalp1[0] - Pval[15])/Pval[17]), 2)) + Pval[18], 2));
values[25*(Time+1)+25*(Time)+15+jt] += lambda[11*jt+8]*(1.0*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 0.25*Pval[24]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.5*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.25*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[21]*Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.125*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*tanh((Xval[0] - Pval[20])/Pval[21])/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23])));
values[25*(Time+1)+25*(Time)+15+jt+1] += lambda[11*jt+8]*(-1.0*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) - 0.25*Pval[24]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.5*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.25*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[21]*Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.125*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*tanh((Xvalp1[0] - Pval[20])/Pval[21])/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23])));
values[4*(Time+1)+4*(Time)+0+jt] += lambda[11*jt+8]*(-0.25*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[4*(Time+1)+4*(Time)+0+jt+1] += lambda[11*jt+8]*(0.25*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[44*(Time+1)+44*(Time)+45+jt] += lambda[11*jt+8]*(-1.0*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) - 0.25*Pval[24]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.5*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.25*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[21]*Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.125*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*tanh((Xval[0] - Pval[20])/Pval[21])/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23])));
values[44*(Time+1)+44*(Time)+45+jt+1] += lambda[11*jt+8]*(1.0*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 0.25*Pval[24]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2), 2)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.5*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.25*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[21]*Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.125*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*tanh((Xvalp1[0] - Pval[20])/Pval[21])/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23])));
values[45*(Time+1)+45*(Time)+45+jt] += lambda[11*jt+8]*(0.25*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[45*(Time+1)+45*(Time)+45+jt+1] += lambda[11*jt+8]*(-0.25*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[46*(Time+1)+46*(Time)+46+jt] += lambda[11*jt+8]*(-0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23])) - 0.125*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(Xval[0] - Pval[20])*tanh((Xval[0] - Pval[20])/Pval[22])/(pow(Pval[21], 2)*Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.125*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(Xval[0] - Pval[20])*tanh((Xval[0] - Pval[20])/Pval[21])/(pow(Pval[21], 3)*(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23])));
values[46*(Time+1)+46*(Time)+46+jt+1] += lambda[11*jt+8]*(0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))/(pow(Pval[21], 2)*(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23])) + 0.125*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(Xvalp1[0] - Pval[20])*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(pow(Pval[21], 2)*Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.125*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(Xvalp1[0] - Pval[20])*tanh((Xvalp1[0] - Pval[20])/Pval[21])/(pow(Pval[21], 3)*(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23])));
values[47*(Time+1)+47*(Time)+48+jt] += lambda[11*jt+8]*(-0.25*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 1.0*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2), 2)*(Xval[0] - Pval[20])*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) - 0.25*Pval[24]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2), 2)*(Xval[0] - Pval[20])*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.5*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(Xval[0] - Pval[20])*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.125*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(Xval[0] - Pval[20])*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[21]*pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[47*(Time+1)+47*(Time)+48+jt+1] += lambda[11*jt+8]*(0.25*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 1.0*pow(Pval[24], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2), 2)*(Xvalp1[0] - Pval[20])*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 0.25*Pval[24]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2), 2)*(Xvalp1[0] - Pval[20])*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.5*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(Xvalp1[0] - Pval[20])*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)/(pow(Pval[22], 3)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.125*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(Xvalp1[0] - Pval[20])*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[21]*pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[48*(Time+1)+48*(Time)+48+jt] += lambda[11*jt+8]*(0.25*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(Xval[0] - Pval[20])*tanh((Xval[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[48*(Time+1)+48*(Time)+48+jt+1] += lambda[11*jt+8]*(-0.25*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(Xvalp1[0] - Pval[20])*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(pow(Pval[22], 2)*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[49*(Time+1)+49*(Time)+51+jt] += lambda[11*jt+8]*(-0.5*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) - 0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))/(Pval[21]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[49*(Time+1)+49*(Time)+51+jt+1] += lambda[11*jt+8]*(0.5*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))/(Pval[21]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[50*(Time+1)+50*(Time)+51+jt] += lambda[11*jt+8]*(0.125*hstep/pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2));
values[50*(Time+1)+50*(Time)+51+jt+1] += lambda[11*jt+8]*(-0.125*hstep/pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2));
values[51*(Time+1)+51*(Time)+55+jt] += lambda[11*jt+8]*(0.5*Pval[24]*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2) - 1)*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) + 0.25*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xval[3] + 0.5*tanh((Xval[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xval[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) + 0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[21]), 2))*(pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2) - 1)/(Pval[21]*pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[51*(Time+1)+51*(Time)+55+jt+1] += lambda[11*jt+8]*(-0.5*Pval[24]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2) - 1)*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 3)) - 0.25*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2))*(-1.0*Xvalp1[3] + 0.5*tanh((Xvalp1[0] - Pval[20])/Pval[21]) + 0.5)*tanh((Xvalp1[0] - Pval[20])/Pval[22])/(Pval[22]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)) - 0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[21]), 2))*(pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2) - 1)/(Pval[21]*pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2)));
values[52*(Time+1)+52*(Time)+55+jt] += lambda[11*jt+8]*(-0.125*hstep*(pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2) - 1)/pow(Pval[24]*(1 - pow(tanh((Xval[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2));
values[52*(Time+1)+52*(Time)+55+jt+1] += lambda[11*jt+8]*(0.125*hstep*(pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2) - 1)/pow(Pval[24]*(1 - pow(tanh((Xvalp1[0] - Pval[20])/Pval[22]), 2)) + Pval[23], 2));
values[25*(Time+1)+25*(Time)+15+jt] += lambda[11*jt+9]*(1.0*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 0.25*Pval[29]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.5*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.25*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[26]*Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.125*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*tanh((Xval[0] - Pval[25])/Pval[26])/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28])));
values[25*(Time+1)+25*(Time)+15+jt+1] += lambda[11*jt+9]*(-1.0*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) - 0.25*Pval[29]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.5*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.25*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[26]*Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.125*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*tanh((Xvalp1[0] - Pval[25])/Pval[26])/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28])));
values[6*(Time+1)+6*(Time)+0+jt] += lambda[11*jt+9]*(-0.25*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[6*(Time+1)+6*(Time)+0+jt+1] += lambda[11*jt+9]*(0.25*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[53*(Time+1)+53*(Time)+60+jt] += lambda[11*jt+9]*(-1.0*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) - 0.25*Pval[29]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.5*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.25*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[26]*Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.125*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*tanh((Xval[0] - Pval[25])/Pval[26])/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28])));
values[53*(Time+1)+53*(Time)+60+jt+1] += lambda[11*jt+9]*(1.0*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 0.25*Pval[29]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2), 2)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.5*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.25*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[26]*Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.125*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*tanh((Xvalp1[0] - Pval[25])/Pval[26])/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28])));
values[54*(Time+1)+54*(Time)+60+jt] += lambda[11*jt+9]*(0.25*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[54*(Time+1)+54*(Time)+60+jt+1] += lambda[11*jt+9]*(-0.25*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[55*(Time+1)+55*(Time)+61+jt] += lambda[11*jt+9]*(-0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28])) - 0.125*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(Xval[0] - Pval[25])*tanh((Xval[0] - Pval[25])/Pval[27])/(pow(Pval[26], 2)*Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.125*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(Xval[0] - Pval[25])*tanh((Xval[0] - Pval[25])/Pval[26])/(pow(Pval[26], 3)*(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28])));
values[55*(Time+1)+55*(Time)+61+jt+1] += lambda[11*jt+9]*(0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))/(pow(Pval[26], 2)*(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28])) + 0.125*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(Xvalp1[0] - Pval[25])*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(pow(Pval[26], 2)*Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.125*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(Xvalp1[0] - Pval[25])*tanh((Xvalp1[0] - Pval[25])/Pval[26])/(pow(Pval[26], 3)*(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28])));
values[56*(Time+1)+56*(Time)+63+jt] += lambda[11*jt+9]*(-0.25*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 1.0*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2), 2)*(Xval[0] - Pval[25])*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) - 0.25*Pval[29]*hstep*pow(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2), 2)*(Xval[0] - Pval[25])*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.5*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(Xval[0] - Pval[25])*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.125*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(Xval[0] - Pval[25])*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[26]*pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[56*(Time+1)+56*(Time)+63+jt+1] += lambda[11*jt+9]*(0.25*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 1.0*pow(Pval[29], 2)*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2), 2)*(Xvalp1[0] - Pval[25])*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 0.25*Pval[29]*hstep*pow(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2), 2)*(Xvalp1[0] - Pval[25])*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.5*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(Xvalp1[0] - Pval[25])*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)/(pow(Pval[27], 3)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.125*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(Xvalp1[0] - Pval[25])*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[26]*pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[57*(Time+1)+57*(Time)+63+jt] += lambda[11*jt+9]*(0.25*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(Xval[0] - Pval[25])*tanh((Xval[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[57*(Time+1)+57*(Time)+63+jt+1] += lambda[11*jt+9]*(-0.25*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(Xvalp1[0] - Pval[25])*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(pow(Pval[27], 2)*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[58*(Time+1)+58*(Time)+66+jt] += lambda[11*jt+9]*(-0.5*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) - 0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))/(Pval[26]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[58*(Time+1)+58*(Time)+66+jt+1] += lambda[11*jt+9]*(0.5*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))/(Pval[26]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[59*(Time+1)+59*(Time)+66+jt] += lambda[11*jt+9]*(0.125*hstep/pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2));
values[59*(Time+1)+59*(Time)+66+jt+1] += lambda[11*jt+9]*(-0.125*hstep/pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2));
values[60*(Time+1)+60*(Time)+70+jt] += lambda[11*jt+9]*(0.5*Pval[29]*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2) - 1)*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) + 0.25*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xval[4] + 0.5*tanh((Xval[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xval[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) + 0.0625*hstep*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[26]), 2))*(pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2) - 1)/(Pval[26]*pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[60*(Time+1)+60*(Time)+70+jt+1] += lambda[11*jt+9]*(-0.5*Pval[29]*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2) - 1)*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 3)) - 0.25*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2))*(-1.0*Xvalp1[4] + 0.5*tanh((Xvalp1[0] - Pval[25])/Pval[26]) + 0.5)*tanh((Xvalp1[0] - Pval[25])/Pval[27])/(Pval[27]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)) - 0.0625*hstep*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[26]), 2))*(pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2) - 1)/(Pval[26]*pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2)));
values[61*(Time+1)+61*(Time)+70+jt] += lambda[11*jt+9]*(-0.125*hstep*(pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2) - 1)/pow(Pval[29]*(1 - pow(tanh((Xval[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2));
values[61*(Time+1)+61*(Time)+70+jt+1] += lambda[11*jt+9]*(0.125*hstep*(pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2) - 1)/pow(Pval[29]*(1 - pow(tanh((Xvalp1[0] - Pval[25])/Pval[27]), 2)) + Pval[28], 2));
} // end for loop
} // end else
return true;
}
void NAKLH_NLP::finalize_solution(SolverReturn status,
Index n, const Number* x, const Number* z_L, const Number* z_U,
Index m, const Number* g, const Number* lambda,
Number obj_value,
const IpoptData* ip_data,
IpoptCalculatedQuantities* ip_cq)
{
// here is where the solution is written to file
FILE *OUTPUT1;
FILE *OUTPUT2;
FILE *OUTPUT3;
FILE *OUTPUT4;
FILE *OUTPUT5;
OUTPUT1 = fopen ("param.dat","w");
OUTPUT2 = fopen ("data.dat","w");
OUTPUT3 = fopen ("Rvalue.dat","w");
OUTPUT4 = fopen ("Obj.dat","w");
OUTPUT5 = fopen ("carl.input","w");
// Final parameters
fprintf (OUTPUT1, "Cm\t%e\t%e\t%e\n", bounds[nY+2*nU+0][0],bounds[nY+2*nU+0][1],x[(2*Time+1)*(nY+2*nU)+0]);
printf("Parameter[1] = %e\n", x[(2*Time+1)*(nY+2*nU)+0]);
fprintf (OUTPUT1, "gNa\t%e\t%e\t%e\n", bounds[nY+2*nU+1][0],bounds[nY+2*nU+1][1],x[(2*Time+1)*(nY+2*nU)+1]);
printf("Parameter[2] = %e\n", x[(2*Time+1)*(nY+2*nU)+1]);
fprintf (OUTPUT1, "ENa\t%e\t%e\t%e\n", bounds[nY+2*nU+2][0],bounds[nY+2*nU+2][1],x[(2*Time+1)*(nY+2*nU)+2]);
printf("Parameter[3] = %e\n", x[(2*Time+1)*(nY+2*nU)+2]);
fprintf (OUTPUT1, "gA1\t%e\t%e\t%e\n", bounds[nY+2*nU+3][0],bounds[nY+2*nU+3][1],x[(2*Time+1)*(nY+2*nU)+3]);
printf("Parameter[4] = %e\n", x[(2*Time+1)*(nY+2*nU)+3]);
fprintf (OUTPUT1, "EK\t%e\t%e\t%e\n", bounds[nY+2*nU+4][0],bounds[nY+2*nU+4][1],x[(2*Time+1)*(nY+2*nU)+4]);
printf("Parameter[5] = %e\n", x[(2*Time+1)*(nY+2*nU)+4]);
fprintf (OUTPUT1, "gL\t%e\t%e\t%e\n", bounds[nY+2*nU+5][0],bounds[nY+2*nU+5][1],x[(2*Time+1)*(nY+2*nU)+5]);
printf("Parameter[6] = %e\n", x[(2*Time+1)*(nY+2*nU)+5]);
fprintf (OUTPUT1, "EL\t%e\t%e\t%e\n", bounds[nY+2*nU+6][0],bounds[nY+2*nU+6][1],x[(2*Time+1)*(nY+2*nU)+6]);
printf("Parameter[7] = %e\n", x[(2*Time+1)*(nY+2*nU)+6]);
fprintf (OUTPUT1, "gh\t%e\t%e\t%e\n", bounds[nY+2*nU+7][0],bounds[nY+2*nU+7][1],x[(2*Time+1)*(nY+2*nU)+7]);
printf("Parameter[8] = %e\n", x[(2*Time+1)*(nY+2*nU)+7]);
fprintf (OUTPUT1, "Eh\t%e\t%e\t%e\n", bounds[nY+2*nU+8][0],bounds[nY+2*nU+8][1],x[(2*Time+1)*(nY+2*nU)+8]);
printf("Parameter[9] = %e\n", x[(2*Time+1)*(nY+2*nU)+8]);
fprintf (OUTPUT1, "Isa\t%e\t%e\t%e\n", bounds[nY+2*nU+9][0],bounds[nY+2*nU+9][1],x[(2*Time+1)*(nY+2*nU)+9]);
printf("Parameter[10] = %e\n", x[(2*Time+1)*(nY+2*nU)+9]);
fprintf (OUTPUT1, "amV1\t%e\t%e\t%e\n", bounds[nY+2*nU+10][0],bounds[nY+2*nU+10][1],x[(2*Time+1)*(nY+2*nU)+10]);
printf("Parameter[11] = %e\n", x[(2*Time+1)*(nY+2*nU)+10]);
fprintf (OUTPUT1, "amV2\t%e\t%e\t%e\n", bounds[nY+2*nU+11][0],bounds[nY+2*nU+11][1],x[(2*Time+1)*(nY+2*nU)+11]);
printf("Parameter[12] = %e\n", x[(2*Time+1)*(nY+2*nU)+11]);
fprintf (OUTPUT1, "amV3\t%e\t%e\t%e\n", bounds[nY+2*nU+12][0],bounds[nY+2*nU+12][1],x[(2*Time+1)*(nY+2*nU)+12]);
printf("Parameter[13] = %e\n", x[(2*Time+1)*(nY+2*nU)+12]);
fprintf (OUTPUT1, "tm0\t%e\t%e\t%e\n", bounds[nY+2*nU+13][0],bounds[nY+2*nU+13][1],x[(2*Time+1)*(nY+2*nU)+13]);
printf("Parameter[14] = %e\n", x[(2*Time+1)*(nY+2*nU)+13]);
fprintf (OUTPUT1, "epsm\t%e\t%e\t%e\n", bounds[nY+2*nU+14][0],bounds[nY+2*nU+14][1],x[(2*Time+1)*(nY+2*nU)+14]);
printf("Parameter[15] = %e\n", x[(2*Time+1)*(nY+2*nU)+14]);
fprintf (OUTPUT1, "ahV1\t%e\t%e\t%e\n", bounds[nY+2*nU+15][0],bounds[nY+2*nU+15][1],x[(2*Time+1)*(nY+2*nU)+15]);
printf("Parameter[16] = %e\n", x[(2*Time+1)*(nY+2*nU)+15]);
fprintf (OUTPUT1, "ahV2\t%e\t%e\t%e\n", bounds[nY+2*nU+16][0],bounds[nY+2*nU+16][1],x[(2*Time+1)*(nY+2*nU)+16]);
printf("Parameter[17] = %e\n", x[(2*Time+1)*(nY+2*nU)+16]);
fprintf (OUTPUT1, "ahV3\t%e\t%e\t%e\n", bounds[nY+2*nU+17][0],bounds[nY+2*nU+17][1],x[(2*Time+1)*(nY+2*nU)+17]);
printf("Parameter[18] = %e\n", x[(2*Time+1)*(nY+2*nU)+17]);
fprintf (OUTPUT1, "th0\t%e\t%e\t%e\n", bounds[nY+2*nU+18][0],bounds[nY+2*nU+18][1],x[(2*Time+1)*(nY+2*nU)+18]);
printf("Parameter[19] = %e\n", x[(2*Time+1)*(nY+2*nU)+18]);
fprintf (OUTPUT1, "epsh\t%e\t%e\t%e\n", bounds[nY+2*nU+19][0],bounds[nY+2*nU+19][1],x[(2*Time+1)*(nY+2*nU)+19]);
printf("Parameter[20] = %e\n", x[(2*Time+1)*(nY+2*nU)+19]);
fprintf (OUTPUT1, "abV1\t%e\t%e\t%e\n", bounds[nY+2*nU+20][0],bounds[nY+2*nU+20][1],x[(2*Time+1)*(nY+2*nU)+20]);
printf("Parameter[21] = %e\n", x[(2*Time+1)*(nY+2*nU)+20]);
fprintf (OUTPUT1, "abV2\t%e\t%e\t%e\n", bounds[nY+2*nU+21][0],bounds[nY+2*nU+21][1],x[(2*Time+1)*(nY+2*nU)+21]);
printf("Parameter[22] = %e\n", x[(2*Time+1)*(nY+2*nU)+21]);
fprintf (OUTPUT1, "abV3\t%e\t%e\t%e\n", bounds[nY+2*nU+22][0],bounds[nY+2*nU+22][1],x[(2*Time+1)*(nY+2*nU)+22]);
printf("Parameter[23] = %e\n", x[(2*Time+1)*(nY+2*nU)+22]);
fprintf (OUTPUT1, "tb0\t%e\t%e\t%e\n", bounds[nY+2*nU+23][0],bounds[nY+2*nU+23][1],x[(2*Time+1)*(nY+2*nU)+23]);
printf("Parameter[24] = %e\n", x[(2*Time+1)*(nY+2*nU)+23]);
fprintf (OUTPUT1, "epsb\t%e\t%e\t%e\n", bounds[nY+2*nU+24][0],bounds[nY+2*nU+24][1],x[(2*Time+1)*(nY+2*nU)+24]);
printf("Parameter[25] = %e\n", x[(2*Time+1)*(nY+2*nU)+24]);
fprintf (OUTPUT1, "azV1\t%e\t%e\t%e\n", bounds[nY+2*nU+25][0],bounds[nY+2*nU+25][1],x[(2*Time+1)*(nY+2*nU)+25]);
printf("Parameter[26] = %e\n", x[(2*Time+1)*(nY+2*nU)+25]);
fprintf (OUTPUT1, "azV2\t%e\t%e\t%e\n", bounds[nY+2*nU+26][0],bounds[nY+2*nU+26][1],x[(2*Time+1)*(nY+2*nU)+26]);
printf("Parameter[27] = %e\n", x[(2*Time+1)*(nY+2*nU)+26]);
fprintf (OUTPUT1, "azV3\t%e\t%e\t%e\n", bounds[nY+2*nU+27][0],bounds[nY+2*nU+27][1],x[(2*Time+1)*(nY+2*nU)+27]);
printf("Parameter[28] = %e\n", x[(2*Time+1)*(nY+2*nU)+27]);
fprintf (OUTPUT1, "tz0\t%e\t%e\t%e\n", bounds[nY+2*nU+28][0],bounds[nY+2*nU+28][1],x[(2*Time+1)*(nY+2*nU)+28]);
printf("Parameter[29] = %e\n", x[(2*Time+1)*(nY+2*nU)+28]);
fprintf (OUTPUT1, "epsz\t%e\t%e\t%e\n", bounds[nY+2*nU+29][0],bounds[nY+2*nU+29][1],x[(2*Time+1)*(nY+2*nU)+29]);
printf("Parameter[30] = %e\n", x[(2*Time+1)*(nY+2*nU)+29]);
// Solution of the primal variables, x
for (Index i=0;i<Time;i++) {
fprintf(OUTPUT2,"%d %e %e %e %e %e %e %e \n", 2*i, x[0*(Time+1)+i], x[1*(Time+1)+i], x[2*(Time+1)+i], x[3*(Time+1)+i], x[4*(Time+1)+i], x[(nY+2*0)*(Time+1)+i], Vdata[2*i]);
fprintf(OUTPUT2,"%d %e %e %e %e %e %e %e \n", 2*i+1, x[(nY+2*nU)*(Time+1)+0*Time+i], x[(nY+2*nU)*(Time+1)+1*Time+i], x[(nY+2*nU)*(Time+1)+2*Time+i], x[(nY+2*nU)*(Time+1)+3*Time+i], x[(nY+2*nU)*(Time+1)+4*Time+i], x[(nY+2*nU)*(Time+1)+(nY+2*0)*Time+i], Vdata[2*i+1]);
}
fprintf(OUTPUT2,"%d %e %e %e %e %e %e %e \n", 2*Time, x[0*(Time+1)+Time], x[1*(Time+1)+Time], x[2*(Time+1)+Time], x[3*(Time+1)+Time], x[4*(Time+1)+Time], x[(nY+2*0)*(Time+1)+Time], Vdata[2*Time]);
// Output for cudaPIMC
for (Index i=0;i<Time;i++) {
for (Index j=0;j<nY;j++) {
fprintf(OUTPUT5,"%e\n", x[j*(Time+1)+i]);
}
for (Index j=0;j<nY;j++) {
fprintf(OUTPUT5,"%e\n", x[(nY+2*nU)*(Time+1)+j*Time+i]);
}
}
for (Index j=0;j<nY;j++) {
fprintf(OUTPUT5,"%e\n", x[j*(Time+1)+Time]);
}
for (Index j=0;j<nP;j++) {
fprintf(OUTPUT5,"%e\n", x[(2*Time+1)*(nY+2*nU)+j]);
}
// Output for Objective value printf("\n\nObjective value\n");
printf("f(x*) = %e\n", obj_value);
fprintf(OUTPUT4,"%e\n", obj_value);
// Calculation of synchronization error, R
for (Index jt=0;jt<Time;jt++) {
for(Index i=0;i<nY;i++) {
Xval[i] = x[jt + i*(Time+1)];
}
for(Index i=0;i<nU;i++) {
K11val[i] = x[jt + nY*(Time+1) + 2*i*(Time+1)];
}
Xdval[0] = Vdata[2*jt];
Ival[0] = Iinj[2*jt];
for(Index i=0;i<nP;i++) {
Pval[i] = x[(2*Time+1)*(nY+2*nU)+i];
} //end for loop
Rvalue[0] = pow((Ival[0]/Pval[9] + pow(Xval[3], 4)*Pval[3]*(Pval[4] - Xval[0]) + Pval[5]*(Pval[6] - Xval[0]) + Pval[1]*Xval[2]*pow(Xval[1], 3)*(Pval[2] - Xval[0]) + Pval[7]*Xval[4]*(Pval[8] - Xval[0]))/Pval[0],2)/(pow((Ival[0]/Pval[9] + pow(Xval[3], 4)*Pval[3]*(Pval[4] - Xval[0]) + Pval[5]*(Pval[6] - Xval[0]) + Pval[1]*Xval[2]*pow(Xval[1], 3)*(Pval[2] - Xval[0]) + Pval[7]*Xval[4]*(Pval[8] - Xval[0]))/Pval[0],2)+pow(K11val[0]*(-Xval[0] + Xdval[0]),2));
fprintf(OUTPUT3,"%d %e \n", 2*jt, Rvalue[0]);
} //end jt for loop
fclose (OUTPUT1);
fclose (OUTPUT2);
fclose (OUTPUT3);
fclose (OUTPUT4);
fclose (OUTPUT5);
}