Searched refs:outvec (Results 1 – 2 of 2) sorted by relevance
| /phasta/phSolver/incompressible/ |
| H A D | stats.f | 394 real*8 outvec(nshg,19) local
415 outvec(:,1) = stsPres(:)
416 outvec(:,2:4) = stsVel(:,:)
418 outvec(:,5) = zero ! later will be temperature
419 outvec(:,6) = stsPresSqr(:)
420 outvec(:,7:12) = stsVelSqr(:,:)
421 outvec(:,13) = zero ! later wil be tempSqr
422 outvec(:,14:19) = stsStress(:,:)
425 write (iofile) outvec(1:nshg,:)
|
| /phasta/phSolver/common/ |
| H A D | settauw.f | 22 real*8 outvec(nshg,nsd+nsd+nsd) local
|