Lines Matching refs:nelem

18       integer nelem,p,q
19       parameter(nelem=15)
23       parameter(nx=nelem+1)
24       parameter(nu=nelem*(p-1)+1)
25       integer indx(nelem*2)
26       integer indu(nelem*p)
52       call ceedvectorcreate(ceed,nelem*q,qdata,err)
54       do i=0,nelem-1
58       call ceedelemrestrictioncreate(ceed,nelem,2,1,1,nx,ceed_mem_host,&
61       do i=0,nelem-1
67       call ceedelemrestrictioncreate(ceed,nelem,p,1,1,nu,ceed_mem_host,&
70       call ceedelemrestrictioncreatestrided(ceed,nelem,q,1,q*nelem,stridesu,&