na (reference) in projects: phasta - OpenGrok search results

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

/phasta/phSolver/common/
H A D	cmass.f	`32 integer ne, na, nb, nodlcla, nodlclb, iel local 59 do na = 1, nshl 61 shp2 = shape(iel,na) * shape(iel,nb) 62 em(iel,na,nb) = em(iel,na,nb) + shp2WdetJ(iel) 85 integer ne, na, nb, nodlcla, nodlclb, iel local 159 do na = 1, nods !nenl !nshl 161 shp2 = shape(iel,na) shape(iel,nb) 162 em(iel,na,nb) = em(iel,na,nb) + shp2WdetJ(iel) 183 do na = 1, nods !nenl !nshl 184 em(iel,na,na) = em(iel,na,na)+flumpeml(iel,na) [all …]`
/phasta/phSolver/incompressible/
H A D	ftools.f	`52 subroutine fMtxVdimVecMult( a, b, c, na, nb, nc, m, n ) argument 57 integer na, nb, nc, m, n local 58 real8 a(n,na), b(n,nb), c(n,nc) 928 subroutine fMtxVdimVecCp( a, b, na, nb, m, n ) argument 933 integer na, nb, m, n local 934 real8 a(n,na), b(n,nb) 989 subroutine fMtxVdimVecDot2( a, b, c, na, nb, m, n ) argument 994 integer na, nb, m, n local 995 real*8 a(n,na), b(n,nb), c(m) 1061 subroutine fMtxVdimVecDaxpy( a, b, c, na, nb, m, n ) argument [all …]`