Searched refs:barth (Results 1 – 1 of 1) sorted by relevance
37 PetscReal barth = th - 24.0 * PetscFloorReal(th / 24.0); in k1() local39 …else return ctx->k1 * PetscExpReal(7.0 * PetscPowReal(PetscSinReal(.0625 * PETSC_PI * (barth - 4.0… in k1()