Home
last modified time | relevance | path

Searched refs:udot_a (Results 1 – 1 of 1) sorted by relevance

/petsc/src/ts/tutorials/autodiff/
H A Dadr_ex1.cxx105 adouble udot_a[3]; /* 'active' double for independent variables */ in IFunctionActive2() local
115 udot_a[0] <<= udot[0]; in IFunctionActive2()
116 udot_a[1] <<= udot[1]; in IFunctionActive2()
117 udot_a[2] <<= udot[2]; /* Mark independence */ in IFunctionActive2()
118 f_a[0] = udot_a[0] + ctx->k * u[0] * u[1]; in IFunctionActive2()
119 f_a[1] = udot_a[1] + ctx->k * u[0] * u[1]; in IFunctionActive2()
120 f_a[2] = udot_a[2] - ctx->k * u[0] * u[1]; in IFunctionActive2()