Home
last modified time | relevance | path

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

/phasta/phSolver/compressible/
H A Ditrbc.f30 real*8 tmp(nshg), y1(nshg),q1(nshg) local
137 q1 = BC(:,1) ! density
139 q1 = one
149 & rk, q1, tmp,