Searched refs:uave (Results 1 – 1 of 1) sorted by relevance
199 PetscScalar *uarray, *f, *uoldarray, h, uave, c; in IFunction_LaxFriedrichs() local226 uave = 0.5 * (uoldarray[i - 1] + uoldarray[i + 1]); in IFunction_LaxFriedrichs()227 f[i] = uarray[i] - uave + c * 0.5 * (uoldarray[i + 1] - uoldarray[i - 1]); in IFunction_LaxFriedrichs()