Home
last modified time | relevance | path

Searched refs:distance_cel_cel (Results 1 – 1 of 1) sorted by relevance

/dports/science/code_saturne/code_saturne-7.1.0/src/base/
H A Dcs_sat_coupling.c576 cs_real_t distance_cel_cel; in _sat_coupling_interpolate() local
722 distance_cel_cel = 0.; in _sat_coupling_interpolate()
732 distance_cel_cel += mesh_quantities->b_face_normal[ifac*3 + icoo] * in _sat_coupling_interpolate()
740 distance_cel_cel /= surface; in _sat_coupling_interpolate()
742 if (fabs(distance_cel_cel) > 1.e-12) in _sat_coupling_interpolate()
743 couplage->local_pond_fbr[ind] = distance_fbr_cel / distance_cel_cel; in _sat_coupling_interpolate()
775 distance_cel_cel = 0.; in _sat_coupling_interpolate()
785 distance_cel_cel += mesh_quantities->b_face_normal[ifac*3 + icoo] * in _sat_coupling_interpolate()
793 distance_cel_cel /= surface; in _sat_coupling_interpolate()
805 - 0.5*b_face_normal[ifac][icoo] *distance_cel_cel/surface); /*-n*I'J'/2*/ in _sat_coupling_interpolate()