35 PetscErrorCode CalcCholeskyDecomp(MPI_Comm comm, PetscInt nprofs, const CeedScalar Rij[6][nprofs], …  in CalcCholeskyDecomp()  argument
45     PetscCheck(!isnan(Cij[0][i]) && !isnan(Cij[1][i]) && !isnan(Cij[2][i]), comm, PETSC_ERR_FP,  in CalcCholeskyDecomp()
63 static PetscErrorCode ReadStgInflow(const MPI_Comm comm, const char path[PETSC_MAX_PATH_LEN], StgSh…  in ReadStgInflow()  argument
72   PetscCall(PhastaDatFileOpen(comm, path, char_array_len, dims, &fp));  in ReadStgInflow()
81     PetscCall(PetscSynchronizedFGets(comm, fp, char_array_len, line));  in ReadStgInflow()
83     PetscCheck(ndims == dims[1], comm, PETSC_ERR_FILE_UNEXPECTED,  in ReadStgInflow()
99 …PetscCheck(wall_dist[i] >= 0, comm, PETSC_ERR_FILE_UNEXPECTED, "Distance to wall in %s cannot be n…  in ReadStgInflow()
100 …PetscCheck(lt[i] >= 0, comm, PETSC_ERR_FILE_UNEXPECTED, "Turbulent length scale in %s cannot be ne…  in ReadStgInflow()
101 …PetscCheck(eps[i] >= 0, comm, PETSC_ERR_FILE_UNEXPECTED, "Turbulent dissipation in %s cannot be ne…  in ReadStgInflow()
105   PetscCall(CalcCholeskyDecomp(comm, stg_ctx->nprofs, rij, cij));  in ReadStgInflow()
106   PetscCall(PetscFClose(comm, fp));  in ReadStgInflow()
120 static PetscErrorCode ReadStgRand(const MPI_Comm comm, const char path[PETSC_MAX_PATH_LEN], StgShur…  in ReadStgRand()  argument
129   PetscCall(PhastaDatFileOpen(comm, path, char_array_len, dims, &fp));  in ReadStgRand()
136     PetscCall(PetscSynchronizedFGets(comm, fp, char_array_len, line));  in ReadStgRand()
138     PetscCheck(ndims == dims[1], comm, PETSC_ERR_FILE_UNEXPECTED,  in ReadStgRand()
150   PetscCall(PetscFClose(comm, fp));  in ReadStgRand()
166 PetscErrorCode GetStgContextData(const MPI_Comm comm, const DM dm, char stg_inflow_path[PETSC_MAX_P…  in GetStgContextData()  argument
171   PetscCall(PhastaDatFileGetNRows(comm, stg_rand_path, &nmodes));  in GetStgContextData()
172   PetscCall(PhastaDatFileGetNRows(comm, stg_inflow_path, &nprofs));  in GetStgContextData()
173   PetscCheck(nmodes < STG_NMODES_MAX, comm, PETSC_ERR_SUP,  in GetStgContextData()
200   PetscCall(ReadStgInflow(comm, stg_inflow_path, *stg_ctx));  in GetStgContextData()
201   PetscCall(ReadStgRand(comm, stg_rand_path, *stg_ctx));  in GetStgContextData()
220 PetscErrorCode SetupStg(const MPI_Comm comm, const DM dm, ProblemData problem, User user, const boo…  in SetupStg()  argument
231   PetscOptionsBegin(comm, NULL, "STG Boundary Condition Options", NULL);  in SetupStg()
266 …PetscCheck((global_stg_ctx->dx > 0) && PetscIsNormalReal((PetscReal)global_stg_ctx->dx), comm, PET…  in SetupStg()
274   PetscCall(GetStgContextData(comm, dm, stg_inflow_path, stg_rand_path, &global_stg_ctx));  in SetupStg()