Loading [MathJax]/extensions/tex2jax.js
Neko
0.9.1
A portable framework for high-order spectral element flow simulations
Toggle main menu visibility
Main Page
User Guide
Developer Guide
Modules
Modules List
Module Members
All
a
b
c
d
e
f
g
h
i
j
k
l
m
n
o
p
q
r
s
t
u
v
w
x
z
Functions/Subroutines
a
b
c
d
e
f
g
h
i
j
k
l
m
n
o
p
q
r
s
t
u
v
w
x
z
Variables
a
c
d
e
f
g
h
i
j
k
l
m
n
o
p
q
r
s
t
x
Enumerator
c
h
Data Types
Data Types List
Data Type Index
Class Hierarchy
Data Fields
All
a
b
c
d
e
f
g
h
i
j
k
l
m
n
o
p
q
r
s
t
u
v
w
x
y
z
Functions/Subroutines
a
b
c
d
e
f
g
h
i
j
k
l
m
n
o
p
q
r
s
t
u
v
w
x
Variables
a
b
c
d
e
f
g
h
i
j
k
l
m
n
o
p
q
r
s
t
u
v
w
x
y
z
Files
File List
File Members
All
_
a
b
c
d
e
f
g
h
i
j
l
m
n
o
p
r
s
t
u
v
w
x
Functions/Subroutines
_
a
c
d
e
f
g
h
i
j
l
m
n
o
p
r
s
t
v
Variables
a
b
c
d
e
f
g
h
i
j
l
m
n
o
p
r
s
t
u
v
w
x
Typedefs
Macros
c
d
g
h
m
n
p
s
Examples
•
All
Classes
Namespaces
Files
Functions
Variables
Typedefs
Enumerator
Macros
Pages
Loading...
Searching...
No Matches
dummy_device.F90
Go to the documentation of this file.
1
! Copyright (c) 2023, The Neko Authors
2
! All rights reserved.
3
!
4
! Redistribution and use in source and binary forms, with or without
5
! modification, are permitted provided that the following conditions
6
! are met:
7
!
8
! * Redistributions of source code must retain the above copyright
9
! notice, this list of conditions and the following disclaimer.
10
!
11
! * Redistributions in binary form must reproduce the above
12
! copyright notice, this list of conditions and the following
13
! disclaimer in the documentation and/or other materials provided
14
! with the distribution.
15
!
16
! * Neither the name of the authors nor the names of its
17
! contributors may be used to endorse or promote products derived
18
! from this software without specific prior written permission.
19
!
20
! THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
21
! "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
22
! LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
23
! FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
24
! COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
25
! INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
26
! BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
27
! LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
28
! CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29
! LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
30
! ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
31
! POSSIBILITY OF SUCH DAMAGE.
32
!
34
module
dummy_device
35
use,
intrinsic
:: iso_c_binding
36
implicit none
37
private
38
39
#if !defined(HAVE_CUDA) && !defined(HAVE_HIP) && !defined(HAVE_OPENCL)
40
42
type
(c_ptr),
public
,
bind(c)
:: glb_cmd_queue = c_null_ptr
43
45
type
(c_ptr),
public
,
bind(c)
:: aux_cmd_queue = c_null_ptr
46
47
#endif
48
49
end module
dummy_device
dummy_device
Dummy device interface.
Definition
dummy_device.F90:34
src
device
dummy_device.F90
Generated on Sun Dec 29 2024 14:19:48 for Neko by
1.9.8