Home
last modified time | relevance | path

Searched refs:offset2 (Results 1 – 3 of 3) sorted by relevance

/libCEED/tests/
H A Dt322-basis-f.f9035 integer*8 ioffset,offset1,offset2 variable
75 call ceedvectorgetarrayread(weights,ceed_mem_host,wweights,offset2,err)
78 val=val+ooutput(i+offset1)*wweights(i+offset2)
81 call ceedvectorrestorearrayread(weights,wweights,offset2,err)
H A Dt313-basis-f.f9044 integer*8 uqoffset,xoffset,offset1,offset2 variable
103 call ceedvectorgetarrayread(uq,ceed_mem_host,uuq,offset2,err)
110 if(dabs(uuq(i+offset2)-fx) > 1.0D-4) then
112 write(*,*) uuq(i+offset2),' not equal to ',fx,dimn,i
117 call ceedvectorrestorearrayread(uq,uuq,offset2,err)
H A Dt314-basis-f.f9049 integer*8 uoffset,xoffset,offset1,offset2,offset3 variable
110 call ceedvectorgetarrayread(u,ceed_mem_host,uu,offset2,err)
113 sum1=sum1+ggtposeones(i+offset1)*uu(i+offset2)
119 call ceedvectorrestorearrayread(u,uu,offset2,err)