Searched refs:qvorticity (Results 1 – 1 of 1) sorted by relevance
| /phasta/AcuStat/src/ |
| H A D | readnblk.f | 71 real*8, allocatable :: qyphbarcumul(:,:,:), qvorticity(:,:) local
376 allocate( qvorticity(nshg2,ndofvort) )
377 qvorticity(:,:) = -9.87654321e32
382 qvorticity(1:nshg2,1:ndofvort) = qread(1:nshg2,1:ndofvort)
455 call write_field(myrank,'a','vorticity',9,qvorticity,
492 deallocate(qvorticity)
|