Lines Matching refs:nelem

20       integer nelem,pcoarse,pfine,q,ncomp
22       parameter(nelem=15)
27       parameter(nx=nelem+1)
28       parameter(nucoarse=nelem*(pcoarse-1)+1)
29       parameter(nufine=nelem*(pfine-1)+1)
30       integer indx(nelem*2)
31       integer inducoarse(nelem*pcoarse)
32       integer indufine(nelem*pfine)
50       do i=0,nelem-1
54       call ceedelemrestrictioncreate(ceed,nelem,2,1,1,nx,ceed_mem_host,&
57       do i=0,nelem-1
62       call ceedelemrestrictioncreate(ceed,nelem,pcoarse,ncomp,nucoarse,&
66       do i=0,nelem-1
71       call ceedelemrestrictioncreate(ceed,nelem,pfine,ncomp,nufine,&
76       call ceedelemrestrictioncreatestrided(ceed,nelem,q,1,q*nelem,stridesu,&
107       call ceedvectorcreate(ceed,nelem*q,qdata,err)