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
|
Pipeline
{ info = ""
, backend = OpenGL33
, textures = []
, samplers = []
, targets =
[ RenderTarget
{ renderTargets =
[ TargetItem
{ targetSemantic = Color , targetRef = Just (Framebuffer Color) }
]
}
]
, programs =
[ Program
{ programUniforms = fromList []
, programStreams =
fromList
[ ( "vi1" , Parameter { name = "position4" , ty = V4F } ) ]
, programInTextures = fromList []
, programOutput = [ Parameter { name = "f0" , ty = V4F } ]
, vertexShader =
"""
#version 330 core
vec4 texture2D(sampler2D s,vec2 uv) {
return texture(s,uv);
}
in vec4 vi1;
smooth out vec4 vo1;
void main() {
gl_Position = vi1;
vo1 = vi1;
}
"""
, geometryShader = Nothing
, fragmentShader =
"""
#version 330 core
vec4 texture2D(sampler2D s,vec2 uv) {
return texture(s,uv);
}
smooth in vec4 vo1;
out vec4 f0;
void main() {
f0 = vec4 (1.0,0.0,0.0,1.0);
}
"""
}
, Program
{ programUniforms = fromList []
, programStreams =
fromList
[ ( "vi1" , Parameter { name = "position4" , ty = V4F } ) ]
, programInTextures = fromList []
, programOutput = [ Parameter { name = "f0" , ty = V4F } ]
, vertexShader =
"""
#version 330 core
vec4 texture2D(sampler2D s,vec2 uv) {
return texture(s,uv);
}
in vec4 vi1;
smooth out vec4 vo1;
void main() {
gl_Position = vi1;
vo1 = vi1;
}
"""
, geometryShader = Nothing
, fragmentShader =
"""
#version 330 core
vec4 texture2D(sampler2D s,vec2 uv) {
return texture(s,uv);
}
smooth in vec4 vo1;
out vec4 f0;
void main() {
f0 = vec4 (0.0,1.0,0.0,1.0);
}
"""
}
]
, slots =
[ Slot
{ slotName = "stream4"
, slotStreams = fromList [ ( "position4" , V4F ) ]
, slotUniforms = fromList []
, slotPrimitive = Triangles
, slotPrograms = [ 0 , 1 ]
}
]
, streams = []
, commands =
[ SetRenderTarget 0
, ClearRenderTarget
[ ClearImage
{ imageSemantic = Color , clearValue = VV4F (V4 0.0 0.0 1.0 1.0) }
]
, SetProgram 1
, SetRasterContext
(TriangleCtx CullNone PolygonFill NoOffset LastVertex)
, SetAccumulationContext
AccumulationContext
{ accViewportName = Nothing
, accOperations =
[ ColorOp NoBlending (VV4B (V4 False True False False)) ]
}
, RenderSlot 0
, SetProgram 0
, SetRasterContext
(TriangleCtx CullNone PolygonFill NoOffset LastVertex)
, SetAccumulationContext
AccumulationContext
{ accViewportName = Nothing
, accOperations =
[ ColorOp NoBlending (VV4B (V4 True False False False)) ]
}
, RenderSlot 0
]
}
|
