Lines Matching refs:fs
488 hf = (ctx->xmax - ctx->xmin) / 4.0 / (ctx->fs - ctx->sf); in FVSample_2WaySplit()
499 } else if (i < ctx->fs) { in FVSample_2WaySplit()
509 xi = ctx->xmin + ctx->sf * hs + (ctx->fs - ctx->sf) * hf + 0.5 * hs + (i - ctx->fs) * hs; in FVSample_2WaySplit()
536 hf = (ctx->xmax - ctx->xmin) / 4.0 / (ctx->fs - ctx->sf); in SolutionErrorNorms_2WaySplit()
540 if (i < ctx->sf || i > ctx->fs - 1) *nrm1 += hs * PetscAbs(ptr_X[i] - ptr_Y[i]); in SolutionErrorNorms_2WaySplit()
552 PetscInt i, j, k, Mx, dof, xs, xm, sf = ctx->sf, fs = ctx->fs; in FVRHSFunction_2WaySplit() local
563 hxf = (ctx->xmax - ctx->xmin) / 4.0 / (ctx->fs - ctx->sf); in FVRHSFunction_2WaySplit()
630 (*ctx->limit2)(&info, cjmpL, cjmpR, ctx->sf, ctx->fs, i, ctx->cslope); in FVRHSFunction_2WaySplit()
667 } else if (i > sf && i < fs) { /* fast region */ in FVRHSFunction_2WaySplit()
679 } else if (i == fs) { /* interface between the fast region and the slow region */ in FVRHSFunction_2WaySplit()
728 …PetscInt i, j, k, Mx, dof, xs, xm, islow = 0, sf = ctx->sf, fs = ctx->fs, lsbwidth = ctx->lsbw… in FVRHSFunctionslow_2WaySplit() local
739 hxf = (ctx->xmax - ctx->xmin) / 4.0 / (ctx->fs - ctx->sf); in FVRHSFunctionslow_2WaySplit()
783 …if (i < sf - lsbwidth + 1 || i > fs + rsbwidth - 2) { /* slow components and the first and last fa… in FVRHSFunctionslow_2WaySplit()
803 (*ctx->limit2)(&info, cjmpL, cjmpR, ctx->sf, ctx->fs, i, ctx->cslope); in FVRHSFunctionslow_2WaySplit()
842 if (i == fs + rsbwidth) { /* slow region */ in FVRHSFunctionslow_2WaySplit()
853 if (i > fs + rsbwidth) { /* slow region */ in FVRHSFunctionslow_2WaySplit()
879 …PetscInt i, j, k, Mx, dof, xs, xm, islow = 0, sf = ctx->sf, fs = ctx->fs, lsbwidth = ctx->lsbw… in FVRHSFunctionslowbuffer_2WaySplit() local
890 hxf = (ctx->xmax - ctx->xmin) / 4.0 / (ctx->fs - ctx->sf); in FVRHSFunctionslowbuffer_2WaySplit()
934 if ((i > sf - lsbwidth - 2 && i < sf + 1) || (i > fs - 2 && i < fs + rsbwidth + 1)) { in FVRHSFunctionslowbuffer_2WaySplit()
954 (*ctx->limit2)(&info, cjmpL, cjmpR, ctx->sf, ctx->fs, i, ctx->cslope); in FVRHSFunctionslowbuffer_2WaySplit()
1003 if (i == fs) { /* interface between the fast region and the slow region */ in FVRHSFunctionslowbuffer_2WaySplit()
1014 if (i > fs && i < fs + rsbwidth) { in FVRHSFunctionslowbuffer_2WaySplit()
1028 if (i == fs + rsbwidth) { in FVRHSFunctionslowbuffer_2WaySplit()
1050 PetscInt i, j, k, Mx, dof, xs, xm, ifast = 0, sf = ctx->sf, fs = ctx->fs; in FVRHSFunctionfast_2WaySplit() local
1061 hxf = (ctx->xmax - ctx->xmin) / 4.0 / (ctx->fs - ctx->sf); in FVRHSFunctionfast_2WaySplit()
1105 if (i > sf - 2 && i < fs + 1) { in FVRHSFunctionfast_2WaySplit()
1123 (*ctx->limit2)(&info, cjmpL, cjmpR, ctx->sf, ctx->fs, i, ctx->cslope); in FVRHSFunctionfast_2WaySplit()
1148 if (i > sf && i < fs) { /* fast region */ in FVRHSFunctionfast_2WaySplit()
1162 if (i == fs) { /* interface between the fast region and the slow region */ in FVRHSFunctionfast_2WaySplit()
1278 ctx.fs = ctx.sf + count_fast; in main()
1286 if (i < ctx.sf - ctx.lsbwidth || i > ctx.fs + ctx.rsbwidth - 1) in main()
1288 …else if ((i >= ctx.sf - ctx.lsbwidth && i < ctx.sf) || (i > ctx.fs - 1 && i <= ctx.fs + ctx.rsbwid… in main()
1335 if (i < ctx.sf || i > ctx.fs - 1) { in main()
1375 if (i < ctx.sf || i > ctx.fs - 1) in main()