Home
last modified time | relevance | path

Searched refs:yy (Results 1 – 5 of 5) sorted by relevance

/libCEED/tests/ !
H A Dt103-vector-f.f9011 real*8 yy(10) variable
34 call ceedvectorgetarrayread(y,ceed_mem_host,yy,yoffset,err)
37 diff=yy(i+yoffset)-10-i
40 write(*,*) 'Error reading array y(',i,')=',yy(i+yoffset)
45 call ceedvectorrestorearrayread(y,yy,yoffset,err)
H A Dt200-elemrestriction-f.f9017 real*8 yy(2*ne) variable
47 call ceedvectorgetarrayread(y,ceed_mem_host,yy,yoffset,err)
49 diff=10+i/2-yy(i+yoffset)
52 write(*,*) 'Error in restricted array y(',i,')=',yy(i+yoffset)
56 call ceedvectorrestorearrayread(y,yy,yoffset,err)
H A Dt201-elemrestriction-f.f9017 real*8 yy(2*ne) variable
43 call ceedvectorgetarrayread(y,ceed_mem_host,yy,yoffset,err)
48 diff=yy(yoffset+i*layout(1)+j*layout(2)+k*layout(3)+1)
53 & yy(yoffset+i*layout(1)+j*layout(2)+k*layout(3)+1)
59 call ceedvectorrestorearrayread(y,yy,yoffset,err)
H A Dt208-elemrestriction-f.f9018 real*8 yy(nb*blksize*elemsize) variable
50 call ceedvectorgetarrayread(y,ceed_mem_host,yy,yoffset,err)
59 diff=yy(yoffset+indx+1)
64 & yy(yoffset+indx+1)
70 call ceedvectorrestorearrayread(y,yy,yoffset,err)
H A Dt202-elemrestriction-f.f9018 real*8 yy(nb*blksize*elemsize) variable
50 call ceedvectorgetarrayread(y,ceed_mem_host,yy,yoffset,err)
58 diff=yy(yoffset+indx+1)
63 & yy(yoffset+indx+1)
69 call ceedvectorrestorearrayread(y,yy,yoffset,err)