diff options
author | Joe Crayne <joe@jerkface.net> | 2019-05-17 13:39:48 -0400 |
---|---|---|
committer | Joe Crayne <joe@jerkface.net> | 2019-05-17 13:39:48 -0400 |
commit | 330649949aea845e0472d0d99fbd30fb00bd6183 (patch) | |
tree | 8f32a749ae28b12a48a767abab5a816189cddb51 /hello_obj2.lc | |
parent | b5d68cc4aba82fec53e156a6c0c2d2726ee6ff46 (diff) |
3d coordinate draw.
Diffstat (limited to 'hello_obj2.lc')
-rw-r--r-- | hello_obj2.lc | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/hello_obj2.lc b/hello_obj2.lc index 1181943..629bf59 100644 --- a/hello_obj2.lc +++ b/hello_obj2.lc | |||
@@ -46,7 +46,7 @@ makeFrame (cubemap :: TextureCube) | |||
46 | & accumulateWith (DepthOp Less True, ColorOp blendplane (V4 True True True True)) | 46 | & accumulateWith (DepthOp Less True, ColorOp blendplane (V4 True True True True)) |
47 | `overlay` | 47 | `overlay` |
48 | points | 48 | points |
49 | & mapPrimitives (\((p)) -> let p' = point p -- coordmap cam $ point p | 49 | & mapPrimitives (\((p)) -> let p' = coordmap cam $ point p |
50 | in (p', V4 1 1 0 1 :: Vec 4 Float)) | 50 | in (p', V4 1 1 0 1 :: Vec 4 Float)) |
51 | 51 | ||
52 | & renderPoints cam | 52 | & renderPoints cam |
@@ -58,7 +58,7 @@ renderPoints :: | |||
58 | , FragmentStream 1 ((Vec 4 Float)) ) | 58 | , FragmentStream 1 ((Vec 4 Float)) ) |
59 | renderPoints cam points = | 59 | renderPoints cam points = |
60 | points | 60 | points |
61 | & rasterizePrimitives (PointCtx (PointSize 10.0) 1.0 LowerLeft) ((Flat)) | 61 | & rasterizePrimitives (PointCtx (PointSize 5.0) 1.0 LowerLeft) ((Flat)) |
62 | & mapFragments (\((c)) -> ((c))) | 62 | & mapFragments (\((c)) -> ((c))) |
63 | & accumulateWith (DepthOp Always False, ColorOp NoBlending (V4 True True True True)) | 63 | & accumulateWith (DepthOp Always False, ColorOp NoBlending (V4 True True True True)) |
64 | 64 | ||