Lines Matching refs:coord
359 static PetscErrorCode PhysicsFunctional_SW(Model mod, PetscReal time, const PetscReal *coord, const… in PhysicsFunctional_SW() argument
472 int initLinearWave(EulerNode *ux, const PetscReal gamma, const PetscReal coord[],…
560 static PetscErrorCode PhysicsFunctional_Euler(Model mod, PetscReal time, const PetscReal *coord, co… in PhysicsFunctional_Euler() argument
1365 PetscScalar *coord = &coords[i]; in main() local
1367 … coord[j] = mod->bounds[2 * j] + coord[j] * (mod->bounds[2 * j + 1] - mod->bounds[2 * j]); in main()
1370 coord[j] = .57735026918963; /* hack to get 60 deg skewed mesh */ in main()
1372 if (i == 2 || i == 10) coord[j] = mod->bounds[1] / 4.; in main()
1373 else if (i == 4) coord[j] = mod->bounds[1] / 2.; in main()
1374 else if (i == 12) coord[j] = 1.57735026918963 * mod->bounds[1] / 2.; in main()
1623 int initLinearWave(EulerNode *ux, const PetscReal gamma, const PetscReal coord[], const PetscReal L… in initLinearWave() argument
1645 wcp[2] = wc[2] + eps * PetscCosReal(coord[0] * 2. * twopi / Lx); in initLinearWave()