Lines Matching refs:Ncomp
98 const PetscInt Ncomp = dim; in zero_vector() local
101 for (comp = 0; comp < Ncomp; ++comp) u[comp] = 0.0; in zero_vector()
107 const PetscInt Ncomp = dim; in coordinates() local
110 for (comp = 0; comp < Ncomp; ++comp) u[comp] = x[comp]; in coordinates()
130 const PetscInt Ncomp = dim; in f1_u_3d() local
132 PetscReal cofu_x[9 /* Ncomp*dim */], detu_x, p = PetscRealPart(u[Ncomp]); in f1_u_3d()
140 for (comp = 0; comp < Ncomp; ++comp) { in f1_u_3d()
147 const PetscInt Ncomp = dim; in g3_uu_3d() local
149 PetscReal cofu_x[9 /* Ncomp*dim */], detu_x, pp, pm, p = PetscRealPart(u[Ncomp]); in g3_uu_3d()
159 for (compI = 0; compI < Ncomp; ++compI) { in g3_uu_3d()
160 for (compJ = 0; compJ < Ncomp; ++compJ) { in g3_uu_3d()
167 …g3[((compI * Ncomp + compJ) * dim + d1) * dim + d2] = g * G * mu + pp * cofu_x[compI * dim + d1] *… in g3_uu_3d()
176 const PetscInt Ncomp = dim; in f0_bd_u_3d() local
182 for (comp = 0; comp < Ncomp; ++comp) { in f0_bd_u_3d()
190 const PetscInt Ncomp = dim; in g1_bd_uu_3d() local
199 for (comp = 0; comp < Ncomp; ++comp) in g1_bd_uu_3d()
201 for (compI = 0; compI < Ncomp; ++compI) { in g1_bd_uu_3d()
202 for (compJ = 0; compJ < Ncomp; ++compJ) { in g1_bd_uu_3d()
203 …for (d = 0; d < dim; ++d) g1[(compI * Ncomp + compJ) * dim + d] = p * (m[compI] * cofu_x[compJ * d… in g1_bd_uu_3d()