Lines Matching refs:ndofs
24 integer ndofs,nqpts,nx,ny
27 parameter(ndofs=(nx*2+1)*(ny*2+1))
30 real*8 arrx(d*ndofs),aa(nqpts),uu(ndofs),vv(ndofs),atrue(ndofs)
44 arrx(i+j*(nx*2+1)+0*ndofs+1)=1.d0*i/(2*nx)
45 arrx(i+j*(nx*2+1)+1*ndofs+1)=1.d0*j/(2*ny)
48 call ceedvectorcreate(ceed,d*ndofs,x,err)
69 call ceedelemrestrictioncreate(ceed,nelem,p*p,d,ndofs,d*ndofs,&
72 call ceedelemrestrictioncreate(ceed,nelem,p*p,1,1,ndofs,&
158 call ceedvectorcreate(ceed,ndofs,a,err)
163 call ceedvectorcreate(ceed,ndofs,u,err)
165 call ceedvectorcreate(ceed,ndofs,v,err)
166 do i=1,ndofs
183 do i=1,ndofs