Home
last modified time | relevance | path

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

/phasta/M2N/src/
H A Dreadnblk.f68 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
[all …]
H A Dnew_interface.c35 int* ndofybar, in Write_M2N() argument
129 isize = (*nshg)*(*ndofybar); in Write_M2N()
132 iarray[ 1 ] = (*ndofybar); in Write_M2N()
/phasta/M2NFixBnd/src/
H A Dreadnblk.f59 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))
[all …]
H A Dnew_interface.c34 int* ndofybar, in Write_M2NFixBnd() argument
118 isize = (*nshg)*(*ndofybar); in Write_M2NFixBnd()
121 iarray[ 1 ] = (*ndofybar); in Write_M2NFixBnd()
/phasta/AcuStat/src/
H A Dreadnblk.f58 integer :: ndof, ndoferrors, ndofybar, ndofyphbar local
221 ndofybar=intfromfile(2)
230 allocate( qybarcumul(nshg2,ndofybar) ) ; qybarcumul = 0.d0
233 allocate( qread(nshg2,ndofybar) ) ; qread = 0.d0
234 iqsiz = nshg2*ndofybar
465 & qybarcumul, 'd', nshg2, ndofybar, tablets(numts,1))
H A Dnew_interface.c129 int* ndofybar, in Write_AcuStat2() argument
256 isize = (*nshg)*(*ndofybar); in Write_AcuStat2()
259 iarray[ 1 ] = (*ndofybar); in Write_AcuStat2()
/phasta/M2NFixBnd/include/
H A Dnew_interfaceM2NFixBnd.h27 int* ndofybar,
/phasta/AcuStat/include/
H A Dnew_interfaceAcuStat.h40 int* ndofybar,
/phasta/M2N/include/
H A Dnew_interfaceM2N.h30 int* ndofybar,