Home
last modified time | relevance | path

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

/phasta/AcuStat/src/
H A Dreadnblk.f71 real*8, allocatable :: qyphbarcumul(:,:,:), qvorticity(:,:) local
312 allocate( qyphbarcumul(nshg2,ndofyphbar,numphavg) )
313 qyphbarcumul = 0.d0
322 qyphbarcumul(:,:,iphavg) = qyphbarcumul(:,:,iphavg)
437 qyphbarcumul(:,:,iphavg) = qyphbarcumul(:,:,iphavg)/totsumts
470 & numphavg,qyphbarcumul(:,:,iphavg),'d',nshg2,ndofyphbar,
489 deallocate(qyphbarcumul)