Home
last modified time | relevance | path

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

/phasta/svLS/
H A DSPARMUL.f42 2 K, U, KU) argument
50 REAL*8, INTENT(IN) :: K(dof*dof,nnz), U(dof,nNo) local
60 KU(1,i) = KU(1,i) + K(1,j)*U(1,colPtr(j))
67 KU(1,i) = KU(1,i) + K(1,j)*U(1,col) + K(2,j)*U(2,col)
68 KU(2,i) = KU(2,i) + K(3,j)*U(1,col) + K(4,j)*U(2,col)
75 KU(1,i) = KU(1,i) + K(1,j)*U(1,col) + K(2,j)*U(2,col)
76 2 + K(3,j)*U(3,col)
77 KU(2,i) = KU(2,i) + K(4,j)*U(1,col) + K(5,j)*U(2,col)
78 2 + K(6,j)*U(3,col)
79 KU(3,i) = KU(3,i) + K(7,j)*U(1,col) + K(8,j)*U(2,col)
[all …]
H A DCGRAD.f118 2 rowPtr, colPtr, K, R) argument
127 REAL*8, INTENT(IN) :: K(dof*dof,nnz) local
154 2 K, P, KP)
177 2 rowPtr, colPtr, K, R) argument
186 REAL*8, INTENT(IN) :: K(nnz) local
212 CALL SPARMULSS(nNo, nnz, commu, cS, rowPtr, colPtr, K, P, KP)
/phasta/phSolver/common/
H A Dsymtri.c34 #define K 0.445948490915965 macro
70 {J,K,K},{K,J,K},{K,K,J}};
H A Dinput.config74 Blower Temperature: 305 305 #K
/phasta/phSolver/incompressible/e3source/
H A De3source.fRHSonly412 elseif(iRANS.eq.-2) then ! K-epsilon
466 c.... No source terms with the form (beta_i)*(phi,_i) for K or E
H A De3source.fimplicit426 elseif(iRANS.eq.-2) then ! K-epsilon
480 c.... No source terms with the form (beta_i)*(phi,_i) for K or E