31 PetscErrorCode CalcCholeskyDecomp(MPI_Comm comm, PetscInt nprofs, const CeedScalar Rij[6][nprofs], …  in CalcCholeskyDecomp()  argument
41     PetscCheck(!isnan(Cij[0][i]) && !isnan(Cij[1][i]) && !isnan(Cij[2][i]), comm, PETSC_ERR_FP,  in CalcCholeskyDecomp()
59 static PetscErrorCode ReadStgInflow(const MPI_Comm comm, const char path[PETSC_MAX_PATH_LEN], StgSh…  in ReadStgInflow()  argument
68   PetscCall(PhastaDatFileOpen(comm, path, char_array_len, dims, &fp));  in ReadStgInflow()
77     PetscCall(PetscSynchronizedFGets(comm, fp, char_array_len, line));  in ReadStgInflow()
79     PetscCheck(ndims == dims[1], comm, PETSC_ERR_FILE_UNEXPECTED,  in ReadStgInflow()
95 …PetscCheck(wall_dist[i] >= 0, comm, PETSC_ERR_FILE_UNEXPECTED, "Distance to wall in %s cannot be n…  in ReadStgInflow()
96 …PetscCheck(lt[i] >= 0, comm, PETSC_ERR_FILE_UNEXPECTED, "Turbulent length scale in %s cannot be ne…  in ReadStgInflow()
97 …PetscCheck(eps[i] >= 0, comm, PETSC_ERR_FILE_UNEXPECTED, "Turbulent dissipation in %s cannot be ne…  in ReadStgInflow()
101   PetscCall(CalcCholeskyDecomp(comm, stg_ctx->nprofs, rij, cij));  in ReadStgInflow()
102   PetscCall(PetscFClose(comm, fp));  in ReadStgInflow()
116 static PetscErrorCode ReadStgRand(const MPI_Comm comm, const char path[PETSC_MAX_PATH_LEN], StgShur…  in ReadStgRand()  argument
125   PetscCall(PhastaDatFileOpen(comm, path, char_array_len, dims, &fp));  in ReadStgRand()
132     PetscCall(PetscSynchronizedFGets(comm, fp, char_array_len, line));  in ReadStgRand()
134     PetscCheck(ndims == dims[1], comm, PETSC_ERR_FILE_UNEXPECTED,  in ReadStgRand()
146   PetscCall(PetscFClose(comm, fp));  in ReadStgRand()
162 PetscErrorCode GetStgContextData(const MPI_Comm comm, const DM dm, char stg_inflow_path[PETSC_MAX_P…  in GetStgContextData()  argument
167   PetscCall(PhastaDatFileGetNRows(comm, stg_inflow_path, &nprofs));  in GetStgContextData()
170     PetscCall(PhastaDatFileGetNRows(comm, stg_rand_path, &nmodes));  in GetStgContextData()
171     PetscCheck(nmodes < STG_NMODES_MAX, comm, PETSC_ERR_SUP,  in GetStgContextData()
200   PetscCall(ReadStgInflow(comm, stg_inflow_path, *stg_ctx));  in GetStgContextData()
202     PetscCall(ReadStgRand(comm, stg_rand_path, *stg_ctx));  in GetStgContextData()
237 PetscErrorCode SetupStg(const MPI_Comm comm, const DM dm, ProblemData problem, Honee honee, const b…  in SetupStg()  argument
248   PetscOptionsBegin(comm, NULL, "STG Boundary Condition Options", NULL);  in SetupStg()
258 …if (given_stg_dx && use_stgstrong) PetscCall(PetscPrintf(comm, "WARNING: -stg_dx is ignored for -s…  in SetupStg()
286 …PetscCheck((global_stg_ctx->dx > 0) && PetscIsNormalReal((PetscReal)global_stg_ctx->dx), comm, PET…  in SetupStg()
294   PetscCall(GetStgContextData(comm, dm, stg_inflow_path, stg_rand_path, &global_stg_ctx));  in SetupStg()