Lines Matching refs:nshg2
327 nshg2=intfromfile(1)
333 allocate( qread(nshg2,ndof2) )
335 if (nshg2 .ne. nshg) then
337 & //' on rank', myrank, ' :',nshg,nshg2,
342 iqsiz=nshg2*ndof2
346 qold(1:nshg2,1:ndof2)=qread(1:nshg2,1:ndof2)
376 nshg2=intfromfile(1)
382 allocate( qread(nshg2,ndofybar) )
384 iqsiz=nshg2*ndofybar
387 ybar(1:nshg2,1:ndofybar)=qread(1:nshg2,1:ndofybar)
407 nshg2=intfromfile(1)
413 allocate( qread(nshg2,ndoferrors) )
414 iqsiz=nshg2*ndoferrors
417 errors(1:nshg2,1:ndoferrors)=qread(1:nshg2,1:ndoferrors)
445 nshg2=intfromfile(1)
456 allocate( qread(nshg2,ndofyphbar) )
457 iqsiz = nshg2*ndofyphbar
460 yphbar(1:nshg2,1:ndofyphbar,iphavg) =
461 & qread(1:nshg2,1:ndofyphbar)
490 nshg2=intfromfile(1)
497 allocate(qread(nshg2,ndofvort))
498 iqsiz = nshg2*ndofvort
501 vort(1:nshg2,1:ndofvort)=qread(1:nshg2,1:ndofvort)
524 nshg2=intfromfile(1)
533 allocate( qread1(nshg2) )
534 iqsiz=nshg2*1
537 dwal(1:nshg2)=qread1(1:nshg2)