Searched refs:qyphbarcumul (Results 1 – 1 of 1) sorted by relevance
| /phasta/AcuStat/src/ |
| H A D | readnblk.f | 71 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)
|