1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
|
/*
* Copyright 2008-2013 NVIDIA Corporation
*
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS,
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
* See the License for the specific language governing permissions and
* limitations under the License.
*/
// Portions of this code are derived from
//
// Manjunath Kudlur's Carbon library
//
// and
//
// Based on Boost.Phoenix v1.2
// Copyright (c) 2001-2002 Joel de Guzman
#pragma once
#include <thrust/detail/config.h>
#if defined(_CCCL_IMPLICIT_SYSTEM_HEADER_GCC)
# pragma GCC system_header
#elif defined(_CCCL_IMPLICIT_SYSTEM_HEADER_CLANG)
# pragma clang system_header
#elif defined(_CCCL_IMPLICIT_SYSTEM_HEADER_MSVC)
# pragma system_header
#endif // no system header
#include <thrust/detail/functional/actor.h>
#include <thrust/tuple.h>
THRUST_NAMESPACE_BEGIN
namespace detail
{
namespace functional
{
template <typename... Eval>
class composite;
template<typename Eval0, typename Eval1>
class composite<Eval0, Eval1>
{
public:
template<typename Env>
struct result
{
typedef typename Eval0::template result<
thrust::tuple<
typename Eval1::template result<Env>::type
>
>::type type;
};
__host__ __device__
composite(const Eval0 &e0, const Eval1 &e1)
: m_eval0(e0),
m_eval1(e1)
{}
template<typename Env>
__host__ __device__
typename result<Env>::type
eval(const Env &x) const
{
typename Eval1::template result<Env>::type result1 = m_eval1.eval(x);
return m_eval0.eval(thrust::tie(result1));
}
private:
Eval0 m_eval0;
Eval1 m_eval1;
}; // end composite<Eval0,Eval1>
template<typename Eval0, typename Eval1, typename Eval2>
class composite<Eval0, Eval1, Eval2>
{
public:
template<typename Env>
struct result
{
typedef typename Eval0::template result<
thrust::tuple<
typename Eval1::template result<Env>::type,
typename Eval2::template result<Env>::type
>
>::type type;
};
__host__ __device__
composite(const Eval0 &e0, const Eval1 &e1, const Eval2 &e2)
: m_eval0(e0),
m_eval1(e1),
m_eval2(e2)
{}
template<typename Env>
__host__ __device__
typename result<Env>::type
eval(const Env &x) const
{
typename Eval1::template result<Env>::type result1 = m_eval1.eval(x);
typename Eval2::template result<Env>::type result2 = m_eval2.eval(x);
return m_eval0.eval(thrust::tie(result1,result2));
}
private:
Eval0 m_eval0;
Eval1 m_eval1;
Eval2 m_eval2;
}; // end composite<Eval0,Eval1,Eval2>
template<typename Eval0, typename Eval1>
__host__ __device__
actor<composite<Eval0,Eval1> > compose(const Eval0 &e0, const Eval1 &e1)
{
return actor<composite<Eval0,Eval1> >(composite<Eval0,Eval1>(e0,e1));
}
template<typename Eval0, typename Eval1, typename Eval2>
__host__ __device__
actor<composite<Eval0,Eval1,Eval2> > compose(const Eval0 &e0, const Eval1 &e1, const Eval2 &e2)
{
return actor<composite<Eval0,Eval1,Eval2> >(composite<Eval0,Eval1,Eval2>(e0,e1,e2));
}
} // end functional
} // end detail
THRUST_NAMESPACE_END
|
