Lines Matching refs:fs
144 hf = (ctx->xmax - ctx->xmin) / 4.0 / (ctx->fs - ctx->sf); in FVSample_2WaySplit()
155 } else if (i < ctx->fs) { in FVSample_2WaySplit()
165 xi = ctx->xmin + ctx->sf * hs + (ctx->fs - ctx->sf) * hf + 0.5 * hs + (i - ctx->fs) * hs; in FVSample_2WaySplit()
192 hf = (ctx->xmax - ctx->xmin) / 4.0 / (ctx->fs - ctx->sf); in SolutionErrorNorms_2WaySplit()
196 if (i < ctx->sf || i > ctx->fs - 1) *nrm1 += hs * PetscAbs(ptr_X[i] - ptr_Y[i]); in SolutionErrorNorms_2WaySplit()
208 PetscInt i, j, k, Mx, dof, xs, xm, sf = ctx->sf, fs = ctx->fs; in FVRHSFunction_2WaySplit() local
219 hxf = (ctx->xmax - ctx->xmin) / 4.0 / (ctx->fs - ctx->sf); in FVRHSFunction_2WaySplit()
261 (*ctx->limit2)(&info, cjmpL, cjmpR, ctx->sf, ctx->fs, i, ctx->cslope); in FVRHSFunction_2WaySplit()
298 } else if (i > sf && i < fs) { /* fast region */ in FVRHSFunction_2WaySplit()
310 } else if (i == fs) { /* interface between the fast region and the slow region */ in FVRHSFunction_2WaySplit()
359 …PetscInt i, j, k, Mx, dof, xs, xm, islow = 0, sf = ctx->sf, fs = ctx->fs, lsbwidth = ctx->lsbw… in FVRHSFunctionslow_2WaySplit() local
370 hxf = (ctx->xmax - ctx->xmin) / 4.0 / (ctx->fs - ctx->sf); in FVRHSFunctionslow_2WaySplit()
390 …if (i < sf - lsbwidth + 1 || i > fs + rsbwidth - 2) { /* slow components and the first and last fa… in FVRHSFunctionslow_2WaySplit()
410 (*ctx->limit2)(&info, cjmpL, cjmpR, ctx->sf, ctx->fs, i, ctx->cslope); in FVRHSFunctionslow_2WaySplit()
449 if (i == fs + rsbwidth) { /* slow region */ in FVRHSFunctionslow_2WaySplit()
460 if (i > fs + rsbwidth) { /* slow region */ in FVRHSFunctionslow_2WaySplit()
486 …PetscInt i, j, k, Mx, dof, xs, xm, islow = 0, sf = ctx->sf, fs = ctx->fs, lsbwidth = ctx->lsbw… in FVRHSFunctionslowbuffer_2WaySplit() local
497 hxf = (ctx->xmax - ctx->xmin) / 4.0 / (ctx->fs - ctx->sf); in FVRHSFunctionslowbuffer_2WaySplit()
517 if ((i > sf - lsbwidth - 2 && i < sf + 1) || (i > fs - 2 && i < fs + rsbwidth + 1)) { in FVRHSFunctionslowbuffer_2WaySplit()
537 (*ctx->limit2)(&info, cjmpL, cjmpR, ctx->sf, ctx->fs, i, ctx->cslope); in FVRHSFunctionslowbuffer_2WaySplit()
586 if (i == fs) { /* interface between the fast region and the slow region */ in FVRHSFunctionslowbuffer_2WaySplit()
597 if (i > fs && i < fs + rsbwidth) { in FVRHSFunctionslowbuffer_2WaySplit()
611 if (i == fs + rsbwidth) { in FVRHSFunctionslowbuffer_2WaySplit()
633 PetscInt i, j, k, Mx, dof, xs, xm, ifast = 0, sf = ctx->sf, fs = ctx->fs; in FVRHSFunctionfast_2WaySplit() local
644 hxf = (ctx->xmax - ctx->xmin) / 4.0 / (ctx->fs - ctx->sf); in FVRHSFunctionfast_2WaySplit()
664 if (i > sf - 2 && i < fs + 1) { in FVRHSFunctionfast_2WaySplit()
682 (*ctx->limit2)(&info, cjmpL, cjmpR, ctx->sf, ctx->fs, i, ctx->cslope); in FVRHSFunctionfast_2WaySplit()
707 if (i > sf && i < fs) { /* fast region */ in FVRHSFunctionfast_2WaySplit()
721 if (i == fs) { /* interface between the fast region and the slow region */ in FVRHSFunctionfast_2WaySplit()
830 ctx.fs = ctx.sf + count_fast; in main()
842 if (i < ctx.sf - ctx.lsbwidth || i > ctx.fs + ctx.rsbwidth - 1) in main()
844 …else if ((i >= ctx.sf - ctx.lsbwidth && i < ctx.sf) || (i > ctx.fs - 1 && i <= ctx.fs + ctx.rsbwid… in main()
892 if (i < ctx.sf || i > ctx.fs - 1) { in main()
932 if (i < ctx.sf || i > ctx.fs - 1) in main()