Home
last modified time | relevance | path

Searched refs:val (Results 1 – 25 of 28) sorted by relevance

12

/libCEED/tests/
H A Dt323-basis-f.f907 subroutine feval(x1,x2,val) argument
8 real*8 x1,x2,val local
10 val=x1*x1+x2*x2+x1*x2+1
14 subroutine dfeval(x1,x2,val) argument
15 real*8 x1,x2,val local
17 val=2*x1+x2
40 real*8 val,diff variable
63 call feval(x1,x2,val)
64 iinput(i)=val
80 call dfeval(x1,x2,val)
[all …]
H A Dt322-basis-f.f907 subroutine feval(x1,x2,val) argument
8 real*8 x1,x2,val local
10 val=x1*x1+x2*x2+x1*x2+1
33 real*8 val,diff variable
56 call feval(x1,x2,val)
57 iinput(i)=val
76 val=0
78 val=val+ooutput(i+offset1)*wweights(i+offset2)
83 diff=val-17.d0/24.d0
86 write(*,'(A,I1,A,F12.8,A,F12.8)')'[',i,'] ',val,' != ',17.d0/24.d0
H A Dt101-vector-f.f9011 real*8 val variable
20 val=3.0
43 call ceedvectorsetvalue(x,val,err)
47 diff=b(boffset+i)-val
H A Dt553-operator-f.f9029 real*8 val variable
106 val=1.0
107 call ceedvectorsetvalue(pmultfine,val,err)
122 val=1.0
123 call ceedvectorsetvalue(ucoarse,val,err)
H A Dt550-operator-f.f9035 real*8 val
126 val=1.0
127 call ceedvectorsetvalue(pmultfine,val,err)
133 val=1.0
134 call ceedvectorsetvalue(ucoarse,val,err)
H A Dt552-operator-f.f9035 real*8 val
127 val=1.0
128 call ceedvectorsetvalue(pmultfine,val,err)
143 val=1.0
144 call ceedvectorsetvalue(ucoarse,val,err)
H A Dt511-operator-f.f9023 integer val,row,col,offset
56 val=(i/(nx*2+1))
57 arrx(i+1+ndofs)=val*(1.d0/(ny*2.d0))
H A Dt510-operator-f.f9023 integer val,row,col,offset
55 val=(i/(nx*2+1))
56 arrx(i+1+ndofs)=val*(1.d0/(ny*2.d0))
H A Dt536-operator-f.f9041 real*8 val
54 val=(i/(nx*2+1))
55 arrx(i+1+ndofs)=val*(1.d0/(ny*2.d0))
H A Djunit_common.py135 def cgns_tol(self, val): argument
136 self._cgns_tol = val
144 def csv_ztol(self, val): argument
145 self._csv_ztol = val
153 def csv_rtol(self, val): argument
154 self._csv_rtol = val
/libCEED/examples/mfem/
H A Dbp3.cpp46 double val = sin(M_PI * (x[0] + k[0] * pt(0))); in solution() local
47 for (int d = 1; d < pt.Size(); d++) val *= sin(M_PI * (x[d] + k[d] * pt(d))); in solution()
48 return val; in solution()
55 double f[3], l[3], val, lap; in rhs() local
58 val = f[0]; in rhs()
63 lap = lap * f[d] + val * l[d]; in rhs()
64 val = val * f[d]; in rhs()
/libCEED/backends/cuda-ref/kernels/
H A Dcuda-ref-vector.cu38 __global__ static void setValueK(CeedScalar *__restrict__ vec, CeedSize size, CeedScalar val) { in setValueK() argument
41 if (index < size) vec[index] = val; in setValueK()
47 extern "C" int CeedDeviceSetValue_Cuda(CeedScalar *d_array, CeedSize length, CeedScalar val) { in CeedDeviceSetValue_Cuda() argument
53 setValueK<<<grid_size, block_size>>>(d_array, length, val); in CeedDeviceSetValue_Cuda()
60 …idedK(CeedScalar *__restrict__ vec, CeedSize start, CeedSize stop, CeedSize step, CeedScalar val) { in setValueStridedK() argument
64 if (index % step == 0) vec[start + index] = val; in setValueStridedK()
71 …ueStrided_Cuda(CeedScalar *d_array, CeedSize start, CeedSize stop, CeedSize step, CeedScalar val) { in CeedDeviceSetValueStrided_Cuda() argument
77 setValueStridedK<<<grid_size, block_size>>>(d_array, start, stop, step, val); in CeedDeviceSetValueStrided_Cuda()
/libCEED/backends/hip-ref/kernels/
H A Dhip-ref-vector.hip.cpp38 __global__ static void setValueK(CeedScalar *__restrict__ vec, CeedSize size, CeedScalar val) { in setValueK() argument
41 if (index < size) vec[index] = val; in setValueK()
47 extern "C" int CeedDeviceSetValue_Hip(CeedScalar *d_array, CeedSize length, CeedScalar val) { in CeedDeviceSetValue_Hip() argument
53 hipLaunchKernelGGL(setValueK, dim3(grid_size), dim3(block_size), 0, 0, d_array, length, val); in CeedDeviceSetValue_Hip()
60 …idedK(CeedScalar *__restrict__ vec, CeedSize start, CeedSize stop, CeedSize step, CeedScalar val) { in setValueStridedK() argument
64 if (index % step == 0) vec[start + index] = val; in setValueStridedK()
71 …eedScalar *d_array, CeedSize start, CeedInt stop, CeedSize step, CeedSize length, CeedScalar val) { in CeedDeviceSetValueStrided_Hip() argument
77 …nelGGL(setValueStridedK, dim3(grid_size), dim3(block_size), 0, 0, d_array, start, stop, step, val); in CeedDeviceSetValueStrided_Hip()
/libCEED/include/ceed/jit-source/cuda/
H A Dcuda-atomic-add-fallback.h15 __device__ CeedScalar atomicAdd(CeedScalar *address, CeedScalar val) { in atomicAdd() argument
20 …old = atomicCAS(address_as_ull, assumed, __double_as_longlong(val + __longlong_as_double(assum… in atomicAdd()
H A Dcuda-ref-basis-nontensor-templates.h29 const CeedScalar val = U[i]; in Contract() local
31 for (CeedInt d = 0; d < Q_COMP; d++) r_V[d] += d_B[i + t_id * P + d * P * Q] * val; in Contract()
/libCEED/backends/sycl-ref/kernels/
H A Dsycl-ref-vector.cpp15 __global__ static void setValueK(CeedScalar *__restrict__ vec, CeedInt size, CeedScalar val) { in setValueK() argument
19 vec[index] = val; in setValueK()
25 extern "C" int CeedDeviceSetValue_Sycl(CeedScalar *d_array, CeedInt length, CeedScalar val) { in CeedDeviceSetValue_Sycl() argument
31 setValueK<<<grid_size, block_size>>>(d_array, length, val); in CeedDeviceSetValue_Sycl()
/libCEED/backends/cuda-ref/
H A Dceed-cuda-ref-vector.c290 static int CeedHostSetValue_Cuda(CeedScalar *h_array, CeedSize length, CeedScalar val) { in CeedHostSetValue_Cuda() argument
291 for (CeedSize i = 0; i < length; i++) h_array[i] = val; in CeedHostSetValue_Cuda()
298 int CeedDeviceSetValue_Cuda(CeedScalar *d_array, CeedSize length, CeedScalar val);
303 static int CeedVectorSetValue_Cuda(CeedVector vec, CeedScalar val) { in CeedVectorSetValue_Cuda() argument
324 if (val == 0) { in CeedVectorSetValue_Cuda()
327 CeedCallBackend(CeedDeviceSetValue_Cuda(impl->d_array, length, val)); in CeedVectorSetValue_Cuda()
331 CeedCallBackend(CeedHostSetValue_Cuda(impl->h_array, length, val)); in CeedVectorSetValue_Cuda()
340 …ueStrided_Cuda(CeedScalar *h_array, CeedSize start, CeedSize stop, CeedSize step, CeedScalar val) { in CeedHostSetValueStrided_Cuda() argument
341 for (CeedSize i = start; i < stop; i += step) h_array[i] = val; in CeedHostSetValueStrided_Cuda()
348 …lueStrided_Cuda(CeedScalar *d_array, CeedSize start, CeedSize stop, CeedSize step, CeedScalar val);
[all …]
/libCEED/include/ceed/jit-source/hip/
H A Dhip-ref-basis-nontensor-templates.h29 const CeedScalar val = U[i]; in Contract() local
31 for (CeedInt d = 0; d < Q_COMP; d++) r_V[d] += d_B[i + t_id * P + d * P * Q] * val; in Contract()
/libCEED/backends/hip-ref/
H A Dceed-hip-ref-vector.c345 static int CeedHostSetValue_Hip(CeedScalar *h_array, CeedSize length, CeedScalar val) { in CeedHostSetValue_Hip() argument
346 for (CeedSize i = 0; i < length; i++) h_array[i] = val; in CeedHostSetValue_Hip()
353 int CeedDeviceSetValue_Hip(CeedScalar *d_array, CeedSize length, CeedScalar val);
358 static int CeedVectorSetValue_Hip(CeedVector vec, CeedScalar val) { in CeedVectorSetValue_Hip() argument
381 if (val == 0 && !impl->h_array_borrowed) { in CeedVectorSetValue_Hip()
384 CeedCallBackend(CeedDeviceSetValue_Hip(impl->d_array, length, val)); in CeedVectorSetValue_Hip()
388 CeedCallBackend(CeedHostSetValue_Hip(impl->h_array, length, val)); in CeedVectorSetValue_Hip()
397 …lueStrided_Hip(CeedScalar *h_array, CeedSize start, CeedSize stop, CeedSize step, CeedScalar val) { in CeedHostSetValueStrided_Hip() argument
398 for (CeedSize i = start; i < stop; i += step) h_array[i] = val; in CeedHostSetValueStrided_Hip()
405 …alueStrided_Hip(CeedScalar *d_array, CeedSize start, CeedSize stop, CeedSize step, CeedScalar val);
[all …]
/libCEED/julia/LibCEED.jl/src/
H A DCeedVector.jl63 setvalue!(v::CeedVector, val::Real)
67 setvalue!(v::CeedVector, val::Real) = C.CeedVectorSetValue(v[], val)
69 setindex!(v::CeedVector, val::Real)
70 v[] = val
74 Base.setindex!(v::CeedVector, val::Real) = setvalue!(v, val)
/libCEED/backends/hip/
H A Dceed-hip-compile.cpp67 int val; in CeedCompileCore_Hip() local
71 val = va_arg(args, int); in CeedCompileCore_Hip()
72 code << "#define " << name << " " << val << "\n"; in CeedCompileCore_Hip()
/libCEED/backends/sycl-ref/
H A Dceed-sycl-vector.sycl.cpp276 static int CeedHostSetValue_Sycl(CeedScalar *h_array, CeedSize length, CeedScalar val) { in CeedHostSetValue_Sycl() argument
277 for (CeedSize i = 0; i < length; i++) h_array[i] = val; in CeedHostSetValue_Sycl()
284 …eviceSetValue_Sycl(sycl::queue &sycl_queue, CeedScalar *d_array, CeedSize length, CeedScalar val) { in CeedDeviceSetValue_Sycl() argument
288 sycl_queue.fill(d_array, val, length, e); in CeedDeviceSetValue_Sycl()
295 static int CeedVectorSetValue_Sycl(CeedVector vec, CeedScalar val) { in CeedVectorSetValue_Sycl() argument
322 CeedCallBackend(CeedDeviceSetValue_Sycl(data->sycl_queue, impl->d_array, length, val)); in CeedVectorSetValue_Sycl()
326 CeedCallBackend(CeedHostSetValue_Sycl(impl->h_array, length, val)); in CeedVectorSetValue_Sycl()
/libCEED/julia/LibCEED.jl/.style/
H A Dceed_style.jl27 (op.val == "<:" || op.val == ">:") &&
79 elseif op.val in RADICAL_OPS
/libCEED/examples/fluids/src/
H A Dmisc.c100 PetscInt32 val; in BinaryReadIntoInt() local
101 PetscCall(PetscViewerBinaryRead(viewer, &val, 1, NULL, PETSC_INT32)); in BinaryReadIntoInt()
102 *out = val; in BinaryReadIntoInt()
104 PetscInt64 val; in BinaryReadIntoInt() local
105 PetscCall(PetscViewerBinaryRead(viewer, &val, 1, NULL, PETSC_INT64)); in BinaryReadIntoInt()
106 *out = val; in BinaryReadIntoInt()
/libCEED/backends/cuda/
H A Dceed-cuda-compile.cpp97 int val; in CeedCompileCore_Cuda() local
101 val = va_arg(args, int); in CeedCompileCore_Cuda()
102 code << "#define " << name << " " << val << "\n"; in CeedCompileCore_Cuda()

12