Home
last modified time | relevance | path

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

/petsc/src/ts/tutorials/eimex/
H A Dallen_cahn.c179 PetscReal hx, x_map; in FormInitialSolution() local
185 x_map = user->xleft + i * hx; in FormInitialSolution()
186 if (x_map >= 0.7065) { in FormInitialSolution()
187 x[i] = PetscTanhReal((x_map - 0.8) / (2. * PetscSqrtReal(user->param))); in FormInitialSolution()
188 } else if (x_map >= 0.4865) { in FormInitialSolution()
189 x[i] = PetscTanhReal((0.613 - x_map) / (2. * PetscSqrtReal(user->param))); in FormInitialSolution()
190 } else if (x_map >= 0.28) { in FormInitialSolution()
191 x[i] = PetscTanhReal((x_map - 0.36) / (2. * PetscSqrtReal(user->param))); in FormInitialSolution()
192 } else if (x_map >= -0.7) { in FormInitialSolution()
193 x[i] = PetscTanhReal((0.2 - x_map) / (2. * PetscSqrtReal(user->param))); in FormInitialSolution()
[all …]