Searched refs:p_shift (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/ts/tests/ |
| H A D | ex30.c | 580 PetscReal p_shift = p2_shift; in go() local
587 p_shift *= ctx->thermal_speed[grid] / ctx->v_0; in go()
591 maxwellian(dim, x, kT_m, vole, p_shift, &wp_t[grid][tid][pp]); in go()
593 …maxwellian(dim, x, kT_m, vole, -p_shift, &wp_t[grid][tid][pp]); // symmetric shift of electron pla… in go()
623 … if (ctx->num_grids == 1 && pp % 2 == 0) p_shift = 0; // one species, split bi-max in go()
624 p_shift *= ctx->thermal_speed[grid] / ctx->v_0; in go()
625 if (dim == 3) zz_t[grid][tid][pp] += p_shift; in go()
626 else yy_t[grid][tid][pp] += p_shift; in go()
628 if (p_shift <= 0) break; // add bi-max for electron plasma only in go()
629 p_shift = -p_shift; in go()
|