Lines Matching refs:ndofs
25 integer ndofs,nqpts,nx,ny
28 parameter(ndofs=(nx*2+1)*(ny*2+1))
31 real*8 arrx(d*ndofs),vv(ndofs)
46 arrx(i+j*(nx*2+1)+0*ndofs+1)=1.d0*i/(2*nx)
47 arrx(i+j*(nx*2+1)+1*ndofs+1)=1.d0*j/(2*ny)
50 call ceedvectorcreate(ceed,d*ndofs,x,err)
71 call ceedelemrestrictioncreate(ceed,nelem,p*p,d,ndofs,d*ndofs,&
74 call ceedelemrestrictioncreate(ceed,nelem,p*p,1,1,ndofs,&
160 call ceedvectorcreate(ceed,ndofs,u,err)
162 call ceedvectorcreate(ceed,ndofs,v,err)
169 do i=1,ndofs
215 do i=1,ndofs