diff options
| author | Péter Diviánszky <divipp@gmail.com> | 2016-02-26 19:05:37 +0100 |
|---|---|---|
| committer | Péter Diviánszky <divipp@gmail.com> | 2016-02-26 19:05:37 +0100 |
| commit | 3d2f2fba9af44efa5ee729eab59c9968114745fa (patch) | |
| tree | 6ef6b8dff4f0fb2b9d72a1f137f402fe63648225 /lc | |
| parent | 8002915b62b20c784879f5de011f8af02a4da167 (diff) | |
fix build
Diffstat (limited to 'lc')
| -rw-r--r-- | lc/Prelude.lc | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lc/Prelude.lc b/lc/Prelude.lc index ce9ad9af..66060066 100644 --- a/lc/Prelude.lc +++ b/lc/Prelude.lc | |||
| @@ -360,7 +360,10 @@ translateBefore4 :: Vec 3 Float -> Mat 4 4 Float -> Mat 4 4 Float | |||
| 360 | translateBefore4 v p4 = M44F r1 r2 r3 (ext0 u + r4) | 360 | translateBefore4 v p4 = M44F r1 r2 r3 (ext0 u + r4) |
| 361 | where | 361 | where |
| 362 | ext0 a = V4 a%x a%y a%z 0 | 362 | ext0 a = V4 a%x a%y a%z 0 |
| 363 | (M44F r1 r2 r3 r4) = p4 | 363 | r1 = p4 *. V4 1 0 0 0 |
| 364 | r2 = p4 *. V4 0 1 0 0 | ||
| 365 | r3 = p4 *. V4 0 0 1 0 | ||
| 366 | r4 = p4 *. V4 0 0 0 1 | ||
| 364 | u = v .* M33F r1%xyz r2%xyz r3%xyz | 367 | u = v .* M33F r1%xyz r2%xyz r3%xyz |
| 365 | 368 | ||
| 366 | -- | Camera transformation matrix. | 369 | -- | Camera transformation matrix. |