Lines Matching refs:ndofybar
68 integer :: ndofdwal,ndofybar,ndoferrors,ndofyphbar,ndofvort local
385 ndofybar=0
396 ndofybar=intfromfile(2)
399 if(ndofybar .ne. 0) then
400 allocate( ybar(nshg,ndofybar) )
401 iqsiz=nshg*ndofybar
760 allocate(ybarN(nshgN,ndofybar)) ! size of my final mapped field array
817 numvar = 1+ndof+ndofybar+ndoferrors
863 do idof=1,ndofybar
920 do idof=1,ndofybar
928 sumvar = 1+ndof+ndofybar+idof
937 sumvar = 1+ndof+ndofybar+ndoferrors+
947 sumvar = 1+ndof+ndofybar+ndoferrors+
955 sumvar = 1+ndof+ndofybar+ndoferrors+
983 do idof=1,ndofybar
991 sumvar = 1+ndof+ndofybar+idof
1000 sumvar = 1+ndof+ndofybar+ndoferrors+
1010 sumvar = 1+ndof+ndofybar+ndoferrors+
1018 sumvar = 1+ndof+ndofybar+ndoferrors+
1426 & nshgN,ndofybar,lstep)