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)
53       do i=0,nelem-1
57       call ceedelemrestrictioncreate(ceed,nelem,2,1,1,nx,ceed_mem_host,&
60       do i=0,nelem-1
65       call ceedelemrestrictioncreate(ceed,nelem,pcoarse,ncomp,nucoarse,&
69       do i=0,nelem-1
74       call ceedelemrestrictioncreate(ceed,nelem,pfine,ncomp,nufine,&
79       call ceedelemrestrictioncreatestrided(ceed,nelem,q,1,q*nelem,stridesu,&
108       call ceedvectorcreate(ceed,nelem*q,qdata,err)