Lines Matching refs:ndofs
28 integer ndofs,nqpts,nx,ny
31 parameter(ndofs=(nx*2+1)*(ny*2+1))
34 real*8 arrx(d*ndofs),aa(nqpts),uu(ndofs),vv(ndofs),atrue(ndofs)
51 do i=0,ndofs-1
55 arrx(i+1+ndofs)=val*(1.d0/(ny*2.d0))
57 call ceedvectorcreate(ceed,d*ndofs,x,err)
87 call ceedelemrestrictioncreate(ceed,nelem,p,d,ndofs,d*ndofs,&
90 call ceedelemrestrictioncreate(ceed,nelem,p,1,1,ndofs,&
180 call ceedvectorcreate(ceed,ndofs,a,err)
185 call ceedvectorcreate(ceed,ndofs,u,err)
187 call ceedvectorcreate(ceed,ndofs,v,err)
188 do i=1,ndofs
205 do i=1,ndofs