Lines Matching refs:ndofybar
59 integer :: ndof, ndoferrors, ndofybar local
367 ndofybar = 0
377 ndofybar=intfromfile(2)
379 if(ndofybar .ne. 0) then
380 allocate( ybar(nshg,ndofybar) )
382 allocate( qread(nshg2,ndofybar) )
384 iqsiz=nshg2*ndofybar
387 ybar(1:nshg2,1:ndofybar)=qread(1:nshg2,1:ndofybar)
627 call commuMax (ybar, point2ilwork, ndofybar, 'in '//char(0))
628 call commuMax (ybar, point2ilwork, ndofybar, 'out'//char(0))
692 do idof=1,ndofybar
792 & nshg,ndofybar,lstep)