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),uu(ndofs),vv(ndofs),vvlin(ndofs)
45 arrx(i+j*(nx*2+1)+0*ndofs+1)=1.d0*i/(2*nx)+j*0.5
46 arrx(i+j*(nx*2+1)+1*ndofs+1)=1.d0*j/(2*ny)+i*0.5
49 call ceedvectorcreate(ceed,d*ndofs,x,err)
59 call ceedvectorcreate(ceed,ndofs,u,err)
62 call ceedvectorcreate(ceed,ndofs,v,err)
63 call ceedvectorcreate(ceed,ndofs,v_lin,err)
81 call ceedelemrestrictioncreate(ceed,nelem,p*p,d,ndofs,d*ndofs,&
84 call ceedelemrestrictioncreate(ceed,nelem,p*p,1,1,ndofs,&
170 do i=1,ndofs