Lines Matching refs:Sclr
2 & Sclr, shape, shgl, argument
82 & Sclr(npro)
112 Sclr = zero
115 Sclr = Sclr + shape(:,n) * ycl(:,n,isc)
120 call getthm (dui(:,1), dui(:,5), Sclr,
211 Sclr = zero
214 Sclr = Sclr + shape(:,n) * ycl(:,n,isc)
219 call getthm (pres, T, Sclr,
406 Sclr = zero
412 Sclr(i) = Sclr(i) + shape(i,n) * ycl(i,n,6) !scalar
424 & + cos(pi*Sclr(i)/epsilon_ls)) * gyti(i,1)
426 & + cos(pi*Sclr(i)/epsilon_ls)) * gyti(i,2)
428 & + cos(pi*Sclr(i)/epsilon_ls)) * gyti(i,3)
493 & dxidx, Sclr,
569 & ql(npro,nshl,(nflow-1)*nsd),Sclr(npro),
593 Sclr = zero
606 Sclr = Sclr + shape(:,n) * ycl(:,n,id)
642 call getthm (pres, T, Sclr,
651 & tmp, tmp, con, rho, Sclr)