refactoring & fix build

236 files changed, 16566 insertions, 16566 deletions

diff --git a/testdata/Builtins.out b/testdata/Builtins.out
index 13c8dff7..97d4d268 100644
--- a/testdata/Builtins.out
+++ b/testdata/Builtins.out
@@ -3381,1568 +3381,1568 @@ zero
           a
           (match'Bool (\d' -> d') (_rhs False) a (_rhs (undefined a))))))
 ------------ tooltips
-Builtins.lc 10:1-10:3
+10:1-10:3
     forall a . a -> a
-Builtins.lc 10:8-10:9
+10:8-10:9
     _b
-Builtins.lc 14:6-14:10
+14:6-14:10
     Type -> Nat -> Type | Type -> Nat -> Type | Type | Type
       -> Nat -> Type | Type | Type
-Builtins.lc 14:6-17:37
+14:6-17:37
     Type | Type | Type | Type
-Builtins.lc 14:17-14:21
+14:17-14:21
     Type | Type | Type | Type | Type
-Builtins.lc 14:26-14:29
+14:26-14:29
     Type
-Builtins.lc 14:26-14:37
+14:26-14:37
     Type
-Builtins.lc 14:33-14:37
+14:33-14:37
     Type | Type
-Builtins.lc 15:3-15:5
+15:3-15:5
     forall a . a -> a -> VecS a 2 | VecS _d 2
-Builtins.lc 15:3-15:27
+15:3-15:27
     Type | Type | Type
-Builtins.lc 15:9-15:10
+15:9-15:10
     Type
-Builtins.lc 15:9-15:27
+15:9-15:27
     Type
-Builtins.lc 15:14-15:15
+15:14-15:15
     Type
-Builtins.lc 15:14-15:27
+15:14-15:27
     Type
-Builtins.lc 15:19-15:23
+15:19-15:23
     Type -> Nat -> Type
-Builtins.lc 15:19-15:25
+15:19-15:25
     Nat -> Type
-Builtins.lc 15:19-15:27
+15:19-15:27
     Type | Type
-Builtins.lc 15:24-15:25
+15:24-15:25
     Type
-Builtins.lc 15:26-15:27
+15:26-15:27
     _b | _b
-Builtins.lc 16:3-16:5
+16:3-16:5
     forall a . a -> a -> a -> VecS a 3 | VecS _f 3
-Builtins.lc 16:3-16:32
+16:3-16:32
     Type | Type | Type | Type
-Builtins.lc 16:9-16:10
+16:9-16:10
     Type
-Builtins.lc 16:9-16:32
+16:9-16:32
     Type
-Builtins.lc 16:14-16:15
+16:14-16:15
     Type
-Builtins.lc 16:14-16:32
+16:14-16:32
     Type
-Builtins.lc 16:19-16:20
+16:19-16:20
     Type
-Builtins.lc 16:19-16:32
+16:19-16:32
     Type
-Builtins.lc 16:24-16:28
+16:24-16:28
     Type -> Nat -> Type
-Builtins.lc 16:24-16:30
+16:24-16:30
     Nat -> Type
-Builtins.lc 16:24-16:32
+16:24-16:32
     Type | Type
-Builtins.lc 16:29-16:30
+16:29-16:30
     Type
-Builtins.lc 16:31-16:32
+16:31-16:32
     _b | _b
-Builtins.lc 17:3-17:5
+17:3-17:5
     forall a . a -> a -> a -> a -> VecS a 4 | VecS _h 4
-Builtins.lc 17:3-17:37
+17:3-17:37
     Type | Type | Type | Type | Type
-Builtins.lc 17:9-17:10
+17:9-17:10
     Type
-Builtins.lc 17:9-17:37
+17:9-17:37
     Type
-Builtins.lc 17:14-17:15
+17:14-17:15
     Type
-Builtins.lc 17:14-17:37
+17:14-17:37
     Type
-Builtins.lc 17:19-17:20
+17:19-17:20
     Type
-Builtins.lc 17:19-17:37
+17:19-17:37
     Type
-Builtins.lc 17:24-17:25
+17:24-17:25
     Type
-Builtins.lc 17:24-17:37
+17:24-17:37
     Type
-Builtins.lc 17:29-17:33
+17:29-17:33
     Type -> Nat -> Type
-Builtins.lc 17:29-17:35
+17:29-17:35
     Nat -> Type
-Builtins.lc 17:29-17:37
+17:29-17:37
     Type | Type
-Builtins.lc 17:34-17:35
+17:34-17:35
     Type
-Builtins.lc 17:36-17:37
+17:36-17:37
     _b | _b
-Builtins.lc 19:11-19:43
+19:11-19:43
     Type | Type | Type
-Builtins.lc 19:12-19:13
+19:12-19:13
     _f
-Builtins.lc 19:17-19:18
+19:17-19:18
     _e | Type
-Builtins.lc 19:23-19:27
+19:23-19:27
     Type -> Nat -> Type
-Builtins.lc 19:23-19:29
+19:23-19:29
     Nat -> Type
-Builtins.lc 19:23-19:31
+19:23-19:31
     Type
-Builtins.lc 19:23-19:43
+19:23-19:43
     Type
-Builtins.lc 19:28-19:29
+19:28-19:29
     Type
-Builtins.lc 19:30-19:31
+19:30-19:31
     _c
-Builtins.lc 19:35-19:39
+19:35-19:39
     Type -> Nat -> Type
-Builtins.lc 19:35-19:41
+19:35-19:41
     Nat -> Type
-Builtins.lc 19:35-19:43
+19:35-19:43
     Type | Type
-Builtins.lc 19:40-19:41
+19:40-19:41
     Type
-Builtins.lc 19:42-19:43
+19:42-19:43
     Nat
-Builtins.lc 20:1-20:7
+20:1-20:7
     forall a b (c :: Nat) . (a -> b) -> VecS a c -> VecS b c
-Builtins.lc 20:21-20:23
+20:21-20:23
     forall a . a -> a -> VecS a 2
-Builtins.lc 20:21-20:29
+20:21-20:29
     _f -> VecS _f 2
-Builtins.lc 20:21-20:35
+20:21-20:35
     VecS _f 2
-Builtins.lc 20:21-21:43
+20:21-21:43
     (forall (a :: _e) (b :: _e) (c :: _e) -> _e -> VecS _d 4)
       -> forall (d :: Nat) . VecS _e d -> VecS _d d
-Builtins.lc 20:21-22:51
+20:21-22:51
     forall (a :: Nat) . VecS _e a -> VecS _d a
-Builtins.lc 20:25-20:26
+20:25-20:26
     _i -> _h
-Builtins.lc 20:25-20:28
+20:25-20:28
     _f
-Builtins.lc 20:27-20:28
+20:27-20:28
     _c
-Builtins.lc 20:31-20:32
+20:31-20:32
     _g -> _f
-Builtins.lc 20:31-20:34
+20:31-20:34
     _f
-Builtins.lc 20:33-20:34
+20:33-20:34
     _g
-Builtins.lc 21:23-21:25
+21:23-21:25
     forall a . a -> a -> a -> VecS a 3
-Builtins.lc 21:23-21:31
+21:23-21:31
     _g -> _g -> VecS _g 3
-Builtins.lc 21:23-21:37
+21:23-21:37
     _g -> VecS _g 3
-Builtins.lc 21:23-21:43
+21:23-21:43
     VecS _g 3
-Builtins.lc 21:27-21:28
+21:27-21:28
     _i -> _h
-Builtins.lc 21:27-21:30
+21:27-21:30
     _g
-Builtins.lc 21:29-21:30
+21:29-21:30
     _h
-Builtins.lc 21:33-21:34
+21:33-21:34
     _h -> _g
-Builtins.lc 21:33-21:36
+21:33-21:36
     _g
-Builtins.lc 21:35-21:36
+21:35-21:36
     _h
-Builtins.lc 21:39-21:40
+21:39-21:40
     _h -> _g
-Builtins.lc 21:39-21:42
+21:39-21:42
     _g
-Builtins.lc 21:41-21:42
+21:41-21:42
     _h
-Builtins.lc 22:25-22:27
+22:25-22:27
     forall a . a -> a -> a -> a -> VecS a 4
-Builtins.lc 22:25-22:33
+22:25-22:33
     _h -> _h -> _h -> VecS _h 4
-Builtins.lc 22:25-22:39
+22:25-22:39
     _h -> _h -> VecS _h 4
-Builtins.lc 22:25-22:45
+22:25-22:45
     _h -> VecS _h 4
-Builtins.lc 22:25-22:51
+22:25-22:51
     VecS _h 4
-Builtins.lc 22:29-22:30
+22:29-22:30
     _j -> _i
-Builtins.lc 22:29-22:32
+22:29-22:32
     _h
-Builtins.lc 22:31-22:32
+22:31-22:32
     _i
-Builtins.lc 22:35-22:36
+22:35-22:36
     _i -> _h
-Builtins.lc 22:35-22:38
+22:35-22:38
     _h
-Builtins.lc 22:37-22:38
+22:37-22:38
     _i
-Builtins.lc 22:41-22:42
+22:41-22:42
     _i -> _h
-Builtins.lc 22:41-22:44
+22:41-22:44
     _h
-Builtins.lc 22:43-22:44
+22:43-22:44
     _i
-Builtins.lc 22:47-22:48
+22:47-22:48
     _i -> _h
-Builtins.lc 22:47-22:50
+22:47-22:50
     _h
-Builtins.lc 22:49-22:50
+22:49-22:50
     _i
-Builtins.lc 24:23-24:26
+24:23-24:26
     Type
-Builtins.lc 24:37-24:40
+24:37-24:40
     Nat -> Type -> Type
-Builtins.lc 24:47-24:51
+24:47-24:51
     Type -> Nat -> Type
-Builtins.lc 24:47-24:53
+24:47-24:53
     Nat -> Type
-Builtins.lc 24:47-24:55
+24:47-24:55
     Type
-Builtins.lc 24:52-24:53
+24:52-24:53
     Type
-Builtins.lc 24:54-24:55
+24:54-24:55
     Nat
-Builtins.lc 27:29-27:32
+27:29-27:32
     Type
-Builtins.lc 28:5-28:14
+28:5-28:14
     Nat -> Type -> Type
-Builtins.lc 28:21-28:22
+28:21-28:22
     Type
-Builtins.lc 28:21-29:60
+28:21-29:60
     Nat -> Type
-Builtins.lc 29:37-29:40
+29:37-29:40
     Nat -> Type -> Type
-Builtins.lc 29:37-29:58
+29:37-29:58
     Type -> Type
-Builtins.lc 29:37-29:60
+29:37-29:60
     Type
-Builtins.lc 29:42-29:47
+29:42-29:47
     Nat -> Nat
-Builtins.lc 29:42-29:57
+29:42-29:57
     Nat
-Builtins.lc 29:49-29:54
+29:49-29:54
     Nat -> Nat
-Builtins.lc 29:49-29:56
+29:49-29:56
     Nat
-Builtins.lc 29:55-29:56
+29:55-29:56
     Nat
-Builtins.lc 29:59-29:60
+29:59-29:60
     Type
-Builtins.lc 32:6-32:9
+32:6-32:9
     Nat -> Nat -> Type -> Type | Nat
       -> Nat -> Type -> Type | Type | Type | Type | Nat
       -> Nat -> Type -> Type | Type | Type | Type | Type
-Builtins.lc 32:6-41:84
+32:6-41:84
     Type | Type | Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 32:13-32:16
+32:13-32:16
     Type
-Builtins.lc 32:20-32:23
+32:20-32:23
     Type
-Builtins.lc 32:20-32:39
+32:20-32:39
     Type
-Builtins.lc 32:27-32:31
+32:27-32:31
     Type
-Builtins.lc 32:27-32:39
+32:27-32:39
     Type
-Builtins.lc 32:35-32:39
+32:35-32:39
     Type | Type
-Builtins.lc 33:3-33:7
+33:3-33:7
     Vec 2 Float -> Vec 2 Float -> Mat 2 2 Float | Mat 2 2 Float
-Builtins.lc 33:3-33:54
+33:3-33:54
     Type | Type | Type
-Builtins.lc 33:11-33:14
+33:11-33:14
     Nat -> Type -> Type
-Builtins.lc 33:11-33:16
+33:11-33:16
     Type -> Type
-Builtins.lc 33:11-33:22
+33:11-33:22
     Type
-Builtins.lc 33:15-33:16
+33:15-33:16
     _b
-Builtins.lc 33:17-33:22
+33:17-33:22
     Type
-Builtins.lc 33:26-33:29
+33:26-33:29
     Nat -> Type -> Type
-Builtins.lc 33:26-33:31
+33:26-33:31
     Type -> Type
-Builtins.lc 33:26-33:37
+33:26-33:37
     Type
-Builtins.lc 33:26-33:54
+33:26-33:54
     Type
-Builtins.lc 33:30-33:31
+33:30-33:31
     _b
-Builtins.lc 33:32-33:37
+33:32-33:37
     Type
-Builtins.lc 33:41-33:44
+33:41-33:44
     Nat -> Nat -> Type -> Type
-Builtins.lc 33:41-33:46
+33:41-33:46
     Nat -> Type -> Type
-Builtins.lc 33:41-33:48
+33:41-33:48
     Type -> Type
-Builtins.lc 33:41-33:54
+33:41-33:54
     Type | Type
-Builtins.lc 33:45-33:46
+33:45-33:46
     _b | _b
-Builtins.lc 33:45-33:48
+33:45-33:48
     forall a -> Mat 2 2 a -> Type
-Builtins.lc 33:45-33:54
+33:45-33:54
     Mat 2 2 Float -> Type
-Builtins.lc 33:47-33:48
+33:47-33:48
     _b | _b
-Builtins.lc 33:49-33:54
+33:49-33:54
     Type | Type
-Builtins.lc 34:3-34:7
+34:3-34:7
     Vec 3 Float -> Vec 3 Float -> Mat 3 2 Float | Mat 3 2 Float
-Builtins.lc 34:3-34:54
+34:3-34:54
     Type | Type | Type
-Builtins.lc 34:11-34:14
+34:11-34:14
     Nat -> Type -> Type
-Builtins.lc 34:11-34:16
+34:11-34:16
     Type -> Type
-Builtins.lc 34:11-34:22
+34:11-34:22
     Type
-Builtins.lc 34:15-34:16
+34:15-34:16
     _b
-Builtins.lc 34:17-34:22
+34:17-34:22
     Type
-Builtins.lc 34:26-34:29
+34:26-34:29
     Nat -> Type -> Type
-Builtins.lc 34:26-34:31
+34:26-34:31
     Type -> Type
-Builtins.lc 34:26-34:37
+34:26-34:37
     Type
-Builtins.lc 34:26-34:54
+34:26-34:54
     Type
-Builtins.lc 34:30-34:31
+34:30-34:31
     _b
-Builtins.lc 34:32-34:37
+34:32-34:37
     Type
-Builtins.lc 34:41-34:44
+34:41-34:44
     Nat -> Nat -> Type -> Type
-Builtins.lc 34:41-34:46
+34:41-34:46
     Nat -> Type -> Type
-Builtins.lc 34:41-34:48
+34:41-34:48
     Type -> Type
-Builtins.lc 34:41-34:54
+34:41-34:54
     Type | Type
-Builtins.lc 34:45-34:46
+34:45-34:46
     _b | _b
-Builtins.lc 34:45-34:48
+34:45-34:48
     forall a -> Mat 3 2 a -> Type
-Builtins.lc 34:45-34:54
+34:45-34:54
     Mat 3 2 Float -> Type
-Builtins.lc 34:47-34:48
+34:47-34:48
     _b | _b
-Builtins.lc 34:49-34:54
+34:49-34:54
     Type | Type
-Builtins.lc 35:3-35:7
+35:3-35:7
     Vec 4 Float -> Vec 4 Float -> Mat 4 2 Float | Mat 4 2 Float
-Builtins.lc 35:3-35:54
+35:3-35:54
     Type | Type | Type
-Builtins.lc 35:11-35:14
+35:11-35:14
     Nat -> Type -> Type
-Builtins.lc 35:11-35:16
+35:11-35:16
     Type -> Type
-Builtins.lc 35:11-35:22
+35:11-35:22
     Type
-Builtins.lc 35:15-35:16
+35:15-35:16
     _b
-Builtins.lc 35:17-35:22
+35:17-35:22
     Type
-Builtins.lc 35:26-35:29
+35:26-35:29
     Nat -> Type -> Type
-Builtins.lc 35:26-35:31
+35:26-35:31
     Type -> Type
-Builtins.lc 35:26-35:37
+35:26-35:37
     Type
-Builtins.lc 35:26-35:54
+35:26-35:54
     Type
-Builtins.lc 35:30-35:31
+35:30-35:31
     _b
-Builtins.lc 35:32-35:37
+35:32-35:37
     Type
-Builtins.lc 35:41-35:44
+35:41-35:44
     Nat -> Nat -> Type -> Type
-Builtins.lc 35:41-35:46
+35:41-35:46
     Nat -> Type -> Type
-Builtins.lc 35:41-35:48
+35:41-35:48
     Type -> Type
-Builtins.lc 35:41-35:54
+35:41-35:54
     Type | Type
-Builtins.lc 35:45-35:46
+35:45-35:46
     _b | _b
-Builtins.lc 35:45-35:48
+35:45-35:48
     forall a -> Mat 4 2 a -> Type
-Builtins.lc 35:45-35:54
+35:45-35:54
     Mat 4 2 Float -> Type
-Builtins.lc 35:47-35:48
+35:47-35:48
     _b | _b
-Builtins.lc 35:49-35:54
+35:49-35:54
     Type | Type
-Builtins.lc 36:3-36:7
+36:3-36:7
     Vec 2 Float -> Vec 2 Float -> Vec 2 Float -> Mat 2 3 Float | Mat 2 3 Float
-Builtins.lc 36:3-36:69
+36:3-36:69
     Type | Type | Type | Type
-Builtins.lc 36:11-36:14
+36:11-36:14
     Nat -> Type -> Type
-Builtins.lc 36:11-36:16
+36:11-36:16
     Type -> Type
-Builtins.lc 36:11-36:22
+36:11-36:22
     Type
-Builtins.lc 36:15-36:16
+36:15-36:16
     _b
-Builtins.lc 36:17-36:22
+36:17-36:22
     Type
-Builtins.lc 36:26-36:29
+36:26-36:29
     Nat -> Type -> Type
-Builtins.lc 36:26-36:31
+36:26-36:31
     Type -> Type
-Builtins.lc 36:26-36:37
+36:26-36:37
     Type
-Builtins.lc 36:26-36:69
+36:26-36:69
     Type
-Builtins.lc 36:30-36:31
+36:30-36:31
     _b
-Builtins.lc 36:32-36:37
+36:32-36:37
     Type
-Builtins.lc 36:41-36:44
+36:41-36:44
     Nat -> Type -> Type
-Builtins.lc 36:41-36:46
+36:41-36:46
     Type -> Type
-Builtins.lc 36:41-36:52
+36:41-36:52
     Type
-Builtins.lc 36:41-36:69
+36:41-36:69
     Type
-Builtins.lc 36:45-36:46
+36:45-36:46
     _b
-Builtins.lc 36:47-36:52
+36:47-36:52
     Type
-Builtins.lc 36:56-36:59
+36:56-36:59
     Nat -> Nat -> Type -> Type
-Builtins.lc 36:56-36:61
+36:56-36:61
     Nat -> Type -> Type
-Builtins.lc 36:56-36:63
+36:56-36:63
     Type -> Type
-Builtins.lc 36:56-36:69
+36:56-36:69
     Type | Type
-Builtins.lc 36:60-36:61
+36:60-36:61
     _b | _b
-Builtins.lc 36:60-36:63
+36:60-36:63
     forall a -> Mat 2 3 a -> Type
-Builtins.lc 36:60-36:69
+36:60-36:69
     Mat 2 3 Float -> Type
-Builtins.lc 36:62-36:63
+36:62-36:63
     _b | _b
-Builtins.lc 36:64-36:69
+36:64-36:69
     Type | Type
-Builtins.lc 37:3-37:7
+37:3-37:7
     Vec 3 Float -> Vec 3 Float -> Vec 3 Float -> Mat 3 3 Float | Mat 3 3 Float
-Builtins.lc 37:3-37:69
+37:3-37:69
     Type | Type | Type | Type
-Builtins.lc 37:11-37:14
+37:11-37:14
     Nat -> Type -> Type
-Builtins.lc 37:11-37:16
+37:11-37:16
     Type -> Type
-Builtins.lc 37:11-37:22
+37:11-37:22
     Type
-Builtins.lc 37:15-37:16
+37:15-37:16
     _b
-Builtins.lc 37:17-37:22
+37:17-37:22
     Type
-Builtins.lc 37:26-37:29
+37:26-37:29
     Nat -> Type -> Type
-Builtins.lc 37:26-37:31
+37:26-37:31
     Type -> Type
-Builtins.lc 37:26-37:37
+37:26-37:37
     Type
-Builtins.lc 37:26-37:69
+37:26-37:69
     Type
-Builtins.lc 37:30-37:31
+37:30-37:31
     _b
-Builtins.lc 37:32-37:37
+37:32-37:37
     Type
-Builtins.lc 37:41-37:44
+37:41-37:44
     Nat -> Type -> Type
-Builtins.lc 37:41-37:46
+37:41-37:46
     Type -> Type
-Builtins.lc 37:41-37:52
+37:41-37:52
     Type
-Builtins.lc 37:41-37:69
+37:41-37:69
     Type
-Builtins.lc 37:45-37:46
+37:45-37:46
     _b
-Builtins.lc 37:47-37:52
+37:47-37:52
     Type
-Builtins.lc 37:56-37:59
+37:56-37:59
     Nat -> Nat -> Type -> Type
-Builtins.lc 37:56-37:61
+37:56-37:61
     Nat -> Type -> Type
-Builtins.lc 37:56-37:63
+37:56-37:63
     Type -> Type
-Builtins.lc 37:56-37:69
+37:56-37:69
     Type | Type
-Builtins.lc 37:60-37:61
+37:60-37:61
     _b | _b
-Builtins.lc 37:60-37:63
+37:60-37:63
     forall a -> Mat 3 3 a -> Type
-Builtins.lc 37:60-37:69
+37:60-37:69
     Mat 3 3 Float -> Type
-Builtins.lc 37:62-37:63
+37:62-37:63
     _b | _b
-Builtins.lc 37:64-37:69
+37:64-37:69
     Type | Type
-Builtins.lc 38:3-38:7
+38:3-38:7
     Vec 4 Float -> Vec 4 Float -> Vec 4 Float -> Mat 4 3 Float | Mat 4 3 Float
-Builtins.lc 38:3-38:69
+38:3-38:69
     Type | Type | Type | Type
-Builtins.lc 38:11-38:14
+38:11-38:14
     Nat -> Type -> Type
-Builtins.lc 38:11-38:16
+38:11-38:16
     Type -> Type
-Builtins.lc 38:11-38:22
+38:11-38:22
     Type
-Builtins.lc 38:15-38:16
+38:15-38:16
     _b
-Builtins.lc 38:17-38:22
+38:17-38:22
     Type
-Builtins.lc 38:26-38:29
+38:26-38:29
     Nat -> Type -> Type
-Builtins.lc 38:26-38:31
+38:26-38:31
     Type -> Type
-Builtins.lc 38:26-38:37
+38:26-38:37
     Type
-Builtins.lc 38:26-38:69
+38:26-38:69
     Type
-Builtins.lc 38:30-38:31
+38:30-38:31
     _b
-Builtins.lc 38:32-38:37
+38:32-38:37
     Type
-Builtins.lc 38:41-38:44
+38:41-38:44
     Nat -> Type -> Type
-Builtins.lc 38:41-38:46
+38:41-38:46
     Type -> Type
-Builtins.lc 38:41-38:52
+38:41-38:52
     Type
-Builtins.lc 38:41-38:69
+38:41-38:69
     Type
-Builtins.lc 38:45-38:46
+38:45-38:46
     _b
-Builtins.lc 38:47-38:52
+38:47-38:52
     Type
-Builtins.lc 38:56-38:59
+38:56-38:59
     Nat -> Nat -> Type -> Type
-Builtins.lc 38:56-38:61
+38:56-38:61
     Nat -> Type -> Type
-Builtins.lc 38:56-38:63
+38:56-38:63
     Type -> Type
-Builtins.lc 38:56-38:69
+38:56-38:69
     Type | Type
-Builtins.lc 38:60-38:61
+38:60-38:61
     _b | _b
-Builtins.lc 38:60-38:63
+38:60-38:63
     forall a -> Mat 4 3 a -> Type
-Builtins.lc 38:60-38:69
+38:60-38:69
     Mat 4 3 Float -> Type
-Builtins.lc 38:62-38:63
+38:62-38:63
     _b | _b
-Builtins.lc 38:64-38:69
+38:64-38:69
     Type | Type
-Builtins.lc 39:3-39:7
+39:3-39:7
     Vec 2 Float -> Vec 2 Float -> Vec 2 Float -> Vec 2 Float -> Mat 2 4 Float | Mat
       2
       4
       Float
-Builtins.lc 39:3-39:84
+39:3-39:84
     Type | Type | Type | Type | Type
-Builtins.lc 39:11-39:14
+39:11-39:14
     Nat -> Type -> Type
-Builtins.lc 39:11-39:16
+39:11-39:16
     Type -> Type
-Builtins.lc 39:11-39:22
+39:11-39:22
     Type
-Builtins.lc 39:15-39:16
+39:15-39:16
     _b
-Builtins.lc 39:17-39:22
+39:17-39:22
     Type
-Builtins.lc 39:26-39:29
+39:26-39:29
     Nat -> Type -> Type
-Builtins.lc 39:26-39:31
+39:26-39:31
     Type -> Type
-Builtins.lc 39:26-39:37
+39:26-39:37
     Type
-Builtins.lc 39:26-39:84
+39:26-39:84
     Type
-Builtins.lc 39:30-39:31
+39:30-39:31
     _b
-Builtins.lc 39:32-39:37
+39:32-39:37
     Type
-Builtins.lc 39:41-39:44
+39:41-39:44
     Nat -> Type -> Type
-Builtins.lc 39:41-39:46
+39:41-39:46
     Type -> Type
-Builtins.lc 39:41-39:52
+39:41-39:52
     Type
-Builtins.lc 39:41-39:84
+39:41-39:84
     Type
-Builtins.lc 39:45-39:46
+39:45-39:46
     _b
-Builtins.lc 39:47-39:52
+39:47-39:52
     Type
-Builtins.lc 39:56-39:59
+39:56-39:59
     Nat -> Type -> Type
-Builtins.lc 39:56-39:61
+39:56-39:61
     Type -> Type
-Builtins.lc 39:56-39:67
+39:56-39:67
     Type
-Builtins.lc 39:56-39:84
+39:56-39:84
     Type
-Builtins.lc 39:60-39:61
+39:60-39:61
     _b
-Builtins.lc 39:62-39:67
+39:62-39:67
     Type
-Builtins.lc 39:71-39:74
+39:71-39:74
     Nat -> Nat -> Type -> Type
-Builtins.lc 39:71-39:76
+39:71-39:76
     Nat -> Type -> Type
-Builtins.lc 39:71-39:78
+39:71-39:78
     Type -> Type
-Builtins.lc 39:71-39:84
+39:71-39:84
     Type | Type
-Builtins.lc 39:75-39:76
+39:75-39:76
     _b | _b
-Builtins.lc 39:75-39:78
+39:75-39:78
     forall a -> Mat 2 4 a -> Type
-Builtins.lc 39:75-39:84
+39:75-39:84
     Mat 2 4 Float -> Type
-Builtins.lc 39:77-39:78
+39:77-39:78
     _b | _b
-Builtins.lc 39:79-39:84
+39:79-39:84
     Type | Type
-Builtins.lc 40:3-40:7
+40:3-40:7
     Vec 3 Float -> Vec 3 Float -> Vec 3 Float -> Vec 3 Float -> Mat 3 4 Float | Mat
       3
       4
       Float
-Builtins.lc 40:3-40:84
+40:3-40:84
     Type | Type | Type | Type | Type
-Builtins.lc 40:11-40:14
+40:11-40:14
     Nat -> Type -> Type
-Builtins.lc 40:11-40:16
+40:11-40:16
     Type -> Type
-Builtins.lc 40:11-40:22
+40:11-40:22
     Type
-Builtins.lc 40:15-40:16
+40:15-40:16
     _b
-Builtins.lc 40:17-40:22
+40:17-40:22
     Type
-Builtins.lc 40:26-40:29
+40:26-40:29
     Nat -> Type -> Type
-Builtins.lc 40:26-40:31
+40:26-40:31
     Type -> Type
-Builtins.lc 40:26-40:37
+40:26-40:37
     Type
-Builtins.lc 40:26-40:84
+40:26-40:84
     Type
-Builtins.lc 40:30-40:31
+40:30-40:31
     _b
-Builtins.lc 40:32-40:37
+40:32-40:37
     Type
-Builtins.lc 40:41-40:44
+40:41-40:44
     Nat -> Type -> Type
-Builtins.lc 40:41-40:46
+40:41-40:46
     Type -> Type
-Builtins.lc 40:41-40:52
+40:41-40:52
     Type
-Builtins.lc 40:41-40:84
+40:41-40:84
     Type
-Builtins.lc 40:45-40:46
+40:45-40:46
     _b
-Builtins.lc 40:47-40:52
+40:47-40:52
     Type
-Builtins.lc 40:56-40:59
+40:56-40:59
     Nat -> Type -> Type
-Builtins.lc 40:56-40:61
+40:56-40:61
     Type -> Type
-Builtins.lc 40:56-40:67
+40:56-40:67
     Type
-Builtins.lc 40:56-40:84
+40:56-40:84
     Type
-Builtins.lc 40:60-40:61
+40:60-40:61
     _b
-Builtins.lc 40:62-40:67
+40:62-40:67
     Type
-Builtins.lc 40:71-40:74
+40:71-40:74
     Nat -> Nat -> Type -> Type
-Builtins.lc 40:71-40:76
+40:71-40:76
     Nat -> Type -> Type
-Builtins.lc 40:71-40:78
+40:71-40:78
     Type -> Type
-Builtins.lc 40:71-40:84
+40:71-40:84
     Type | Type
-Builtins.lc 40:75-40:76
+40:75-40:76
     _b | _b
-Builtins.lc 40:75-40:78
+40:75-40:78
     forall a -> Mat 3 4 a -> Type
-Builtins.lc 40:75-40:84
+40:75-40:84
     Mat 3 4 Float -> Type
-Builtins.lc 40:77-40:78
+40:77-40:78
     _b | _b
-Builtins.lc 40:79-40:84
+40:79-40:84
     Type | Type
-Builtins.lc 41:3-41:7
+41:3-41:7
     Vec 4 Float -> Vec 4 Float -> Vec 4 Float -> Vec 4 Float -> Mat 4 4 Float | Mat
       4
       4
       Float
-Builtins.lc 41:3-41:84
+41:3-41:84
     Type | Type | Type | Type | Type
-Builtins.lc 41:11-41:14
+41:11-41:14
     Nat -> Type -> Type
-Builtins.lc 41:11-41:16
+41:11-41:16
     Type -> Type
-Builtins.lc 41:11-41:22
+41:11-41:22
     Type
-Builtins.lc 41:15-41:16
+41:15-41:16
     _b
-Builtins.lc 41:17-41:22
+41:17-41:22
     Type
-Builtins.lc 41:26-41:29
+41:26-41:29
     Nat -> Type -> Type
-Builtins.lc 41:26-41:31
+41:26-41:31
     Type -> Type
-Builtins.lc 41:26-41:37
+41:26-41:37
     Type
-Builtins.lc 41:26-41:84
+41:26-41:84
     Type
-Builtins.lc 41:30-41:31
+41:30-41:31
     _b
-Builtins.lc 41:32-41:37
+41:32-41:37
     Type
-Builtins.lc 41:41-41:44
+41:41-41:44
     Nat -> Type -> Type
-Builtins.lc 41:41-41:46
+41:41-41:46
     Type -> Type
-Builtins.lc 41:41-41:52
+41:41-41:52
     Type
-Builtins.lc 41:41-41:84
+41:41-41:84
     Type
-Builtins.lc 41:45-41:46
+41:45-41:46
     _b
-Builtins.lc 41:47-41:52
+41:47-41:52
     Type
-Builtins.lc 41:56-41:59
+41:56-41:59
     Nat -> Type -> Type
-Builtins.lc 41:56-41:61
+41:56-41:61
     Type -> Type
-Builtins.lc 41:56-41:67
+41:56-41:67
     Type
-Builtins.lc 41:56-41:84
+41:56-41:84
     Type
-Builtins.lc 41:60-41:61
+41:60-41:61
     _b
-Builtins.lc 41:62-41:67
+41:62-41:67
     Type
-Builtins.lc 41:71-41:74
+41:71-41:74
     Nat -> Nat -> Type -> Type
-Builtins.lc 41:71-41:76
+41:71-41:76
     Nat -> Type -> Type
-Builtins.lc 41:71-41:78
+41:71-41:78
     Type -> Type
-Builtins.lc 41:71-41:84
+41:71-41:84
     Type | Type
-Builtins.lc 41:75-41:76
+41:75-41:76
     _b | _b
-Builtins.lc 41:75-41:78
+41:75-41:78
     forall a -> Mat 4 4 a -> Type
-Builtins.lc 41:75-41:84
+41:75-41:84
     Mat 4 4 Float -> Type
-Builtins.lc 41:77-41:78
+41:77-41:78
     _b | _b
-Builtins.lc 41:79-41:84
+41:79-41:84
     Type | Type
-Builtins.lc 44:5-44:21
+44:5-44:21
     Type -> Type
-Builtins.lc 44:30-44:35
+44:30-44:35
     Type
-Builtins.lc 44:30-48:37
+44:30-48:37
     Type
-Builtins.lc 45:29-45:33
+45:29-45:33
     Type
-Builtins.lc 45:29-48:37
+45:29-48:37
     Type
-Builtins.lc 46:28-46:31
+46:28-46:31
     Type
-Builtins.lc 46:28-48:37
+46:28-48:37
     Type
-Builtins.lc 47:35-47:36
+47:35-47:36
     Type
-Builtins.lc 47:35-48:37
+47:35-48:37
     Type
-Builtins.lc 48:36-48:37
+48:36-48:37
     Type
-Builtins.lc 52:7-52:13
+52:7-52:13
     Type -> Constraint
-Builtins.lc 57:7-57:16
+57:7-57:16
     Type -> Constraint | Type -> Constraint | Constraint | Type
       -> Constraint | Constraint
-Builtins.lc 57:7-58:12
+57:7-58:12
     Type
-Builtins.lc 57:7-59:11
+57:7-59:11
     Type
-Builtins.lc 58:3-58:7
+58:3-58:7
     forall a . Component a => a
-Builtins.lc 58:11-58:12
+58:11-58:12
     Type | Type
-Builtins.lc 59:3-59:6
+59:3-59:6
     forall a . Component a => a
-Builtins.lc 59:10-59:11
+59:10-59:11
     Type | Type
-Builtins.lc 62:10-62:11
+62:10-62:11
     _b
-Builtins.lc 62:10-89:36
+62:10-89:36
     _b
-Builtins.lc 62:15-62:18
+62:15-62:18
     Type
-Builtins.lc 63:9-63:10
+63:9-63:10
     _b
-Builtins.lc 63:9-90:31
+63:9-90:31
     _b
-Builtins.lc 63:14-63:17
+63:14-63:17
     Type
-Builtins.lc 65:10-65:11
+65:10-65:11
     _b
-Builtins.lc 65:10-89:36
+65:10-89:36
     _b
-Builtins.lc 65:15-65:19
+65:15-65:19
     Type
-Builtins.lc 66:9-66:10
+66:9-66:10
     _b
-Builtins.lc 66:9-90:31
+66:9-90:31
     _b
-Builtins.lc 66:14-66:18
+66:14-66:18
     Type
-Builtins.lc 68:10-68:13
+68:10-68:13
     Float
-Builtins.lc 68:10-89:36
+68:10-89:36
     _b
-Builtins.lc 69:9-69:12
+69:9-69:12
     Float
-Builtins.lc 69:9-90:31
+69:9-90:31
     _b
-Builtins.lc 71:10-71:12
+71:10-71:12
     forall a . a -> a -> VecS a 2
-Builtins.lc 71:10-71:16
+71:10-71:16
     Float -> VecS Float 2
-Builtins.lc 71:10-71:20
+71:10-71:20
     VecS Float 2
-Builtins.lc 71:10-77:28
+71:10-77:28
     forall (a :: Nat) -> VecS Float ('Succ ('Succ a))
-Builtins.lc 71:10-89:36
+71:10-89:36
     VecS _b _a
-Builtins.lc 71:13-71:16
+71:13-71:16
     Float
-Builtins.lc 71:17-71:20
+71:17-71:20
     Float
-Builtins.lc 72:9-72:11
+72:9-72:11
     forall a . a -> a -> VecS a 2
-Builtins.lc 72:9-72:15
+72:9-72:15
     Float -> VecS Float 2
-Builtins.lc 72:9-72:19
+72:9-72:19
     VecS Float 2
-Builtins.lc 72:9-78:27
+72:9-78:27
     forall (a :: Nat) -> VecS Float ('Succ ('Succ a))
-Builtins.lc 72:9-90:31
+72:9-90:31
     VecS _b _a
-Builtins.lc 72:12-72:15
+72:12-72:15
     Float
-Builtins.lc 72:16-72:19
+72:16-72:19
     Float
-Builtins.lc 74:10-74:12
+74:10-74:12
     forall a . a -> a -> a -> VecS a 3
-Builtins.lc 74:10-74:16
+74:10-74:16
     Float -> Float -> VecS Float 3
-Builtins.lc 74:10-74:20
+74:10-74:20
     Float -> VecS Float 3
-Builtins.lc 74:10-74:24
+74:10-74:24
     VecS Float 3
-Builtins.lc 74:10-77:28
+74:10-77:28
     forall (a :: Nat) -> VecS Float ('Succ ('Succ ('Succ a)))
-Builtins.lc 74:13-74:16
+74:13-74:16
     Float
-Builtins.lc 74:17-74:20
+74:17-74:20
     Float
-Builtins.lc 74:21-74:24
+74:21-74:24
     Float
-Builtins.lc 75:9-75:11
+75:9-75:11
     forall a . a -> a -> a -> VecS a 3
-Builtins.lc 75:9-75:15
+75:9-75:15
     Float -> Float -> VecS Float 3
-Builtins.lc 75:9-75:19
+75:9-75:19
     Float -> VecS Float 3
-Builtins.lc 75:9-75:23
+75:9-75:23
     VecS Float 3
-Builtins.lc 75:9-78:27
+75:9-78:27
     forall (a :: Nat) -> VecS Float ('Succ ('Succ ('Succ a)))
-Builtins.lc 75:12-75:15
+75:12-75:15
     Float
-Builtins.lc 75:16-75:19
+75:16-75:19
     Float
-Builtins.lc 75:20-75:23
+75:20-75:23
     Float
-Builtins.lc 77:10-77:12
+77:10-77:12
     forall a . a -> a -> a -> a -> VecS a 4
-Builtins.lc 77:10-77:16
+77:10-77:16
     Float -> Float -> Float -> VecS Float 4
-Builtins.lc 77:10-77:20
+77:10-77:20
     Float -> Float -> VecS Float 4
-Builtins.lc 77:10-77:24
+77:10-77:24
     Float -> VecS Float 4
-Builtins.lc 77:10-77:28
+77:10-77:28
     VecS Float 4
-Builtins.lc 77:13-77:16
+77:13-77:16
     Float
-Builtins.lc 77:17-77:20
+77:17-77:20
     Float
-Builtins.lc 77:21-77:24
+77:21-77:24
     Float
-Builtins.lc 77:25-77:28
+77:25-77:28
     Float
-Builtins.lc 78:9-78:11
+78:9-78:11
     forall a . a -> a -> a -> a -> VecS a 4
-Builtins.lc 78:9-78:15
+78:9-78:15
     Float -> Float -> Float -> VecS Float 4
-Builtins.lc 78:9-78:19
+78:9-78:19
     Float -> Float -> VecS Float 4
-Builtins.lc 78:9-78:23
+78:9-78:23
     Float -> VecS Float 4
-Builtins.lc 78:9-78:27
+78:9-78:27
     VecS Float 4
-Builtins.lc 78:12-78:15
+78:12-78:15
     Float
-Builtins.lc 78:16-78:19
+78:16-78:19
     Float
-Builtins.lc 78:20-78:23
+78:20-78:23
     Float
-Builtins.lc 78:24-78:27
+78:24-78:27
     Float
-Builtins.lc 80:10-80:15
+80:10-80:15
     Bool
-Builtins.lc 81:9-81:13
+81:9-81:13
     Bool
-Builtins.lc 83:10-83:12
+83:10-83:12
     forall a . a -> a -> VecS a 2
-Builtins.lc 83:10-83:18
+83:10-83:18
     Bool -> VecS Bool 2
-Builtins.lc 83:10-83:24
+83:10-83:24
     VecS Bool 2
-Builtins.lc 83:10-89:36
+83:10-89:36
     forall (a :: Nat) -> VecS Bool ('Succ ('Succ a))
-Builtins.lc 83:13-83:18
+83:13-83:18
     Bool
-Builtins.lc 83:19-83:24
+83:19-83:24
     Bool
-Builtins.lc 84:9-84:11
+84:9-84:11
     forall a . a -> a -> VecS a 2
-Builtins.lc 84:9-84:16
+84:9-84:16
     Bool -> VecS Bool 2
-Builtins.lc 84:9-84:21
+84:9-84:21
     VecS Bool 2
-Builtins.lc 84:9-90:31
+84:9-90:31
     forall (a :: Nat) -> VecS Bool ('Succ ('Succ a))
-Builtins.lc 84:12-84:16
+84:12-84:16
     Bool
-Builtins.lc 84:17-84:21
+84:17-84:21
     Bool
-Builtins.lc 86:10-86:12
+86:10-86:12
     forall a . a -> a -> a -> VecS a 3
-Builtins.lc 86:10-86:18
+86:10-86:18
     Bool -> Bool -> VecS Bool 3
-Builtins.lc 86:10-86:24
+86:10-86:24
     Bool -> VecS Bool 3
-Builtins.lc 86:10-86:30
+86:10-86:30
     VecS Bool 3
-Builtins.lc 86:10-89:36
+86:10-89:36
     forall (a :: Nat) -> VecS Bool ('Succ ('Succ ('Succ a)))
-Builtins.lc 86:13-86:18
+86:13-86:18
     Bool
-Builtins.lc 86:19-86:24
+86:19-86:24
     Bool
-Builtins.lc 86:25-86:30
+86:25-86:30
     Bool
-Builtins.lc 87:9-87:11
+87:9-87:11
     forall a . a -> a -> a -> VecS a 3
-Builtins.lc 87:9-87:16
+87:9-87:16
     Bool -> Bool -> VecS Bool 3
-Builtins.lc 87:9-87:21
+87:9-87:21
     Bool -> VecS Bool 3
-Builtins.lc 87:9-87:26
+87:9-87:26
     VecS Bool 3
-Builtins.lc 87:9-90:31
+87:9-90:31
     forall (a :: Nat) -> VecS Bool ('Succ ('Succ ('Succ a)))
-Builtins.lc 87:12-87:16
+87:12-87:16
     Bool
-Builtins.lc 87:17-87:21
+87:17-87:21
     Bool
-Builtins.lc 87:22-87:26
+87:22-87:26
     Bool
-Builtins.lc 89:10-89:12
+89:10-89:12
     forall a . a -> a -> a -> a -> VecS a 4
-Builtins.lc 89:10-89:18
+89:10-89:18
     Bool -> Bool -> Bool -> VecS Bool 4
-Builtins.lc 89:10-89:24
+89:10-89:24
     Bool -> Bool -> VecS Bool 4
-Builtins.lc 89:10-89:30
+89:10-89:30
     Bool -> VecS Bool 4
-Builtins.lc 89:10-89:36
+89:10-89:36
     VecS Bool 4
-Builtins.lc 89:13-89:18
+89:13-89:18
     Bool
-Builtins.lc 89:19-89:24
+89:19-89:24
     Bool
-Builtins.lc 89:25-89:30
+89:25-89:30
     Bool
-Builtins.lc 89:31-89:36
+89:31-89:36
     Bool
-Builtins.lc 90:9-90:11
+90:9-90:11
     forall a . a -> a -> a -> a -> VecS a 4
-Builtins.lc 90:9-90:16
+90:9-90:16
     Bool -> Bool -> Bool -> VecS Bool 4
-Builtins.lc 90:9-90:21
+90:9-90:21
     Bool -> Bool -> VecS Bool 4
-Builtins.lc 90:9-90:26
+90:9-90:26
     Bool -> VecS Bool 4
-Builtins.lc 90:9-90:31
+90:9-90:31
     VecS Bool 4
-Builtins.lc 90:12-90:16
+90:12-90:16
     Bool
-Builtins.lc 90:17-90:21
+90:17-90:21
     Bool
-Builtins.lc 90:22-90:26
+90:22-90:26
     Bool
-Builtins.lc 90:27-90:31
+90:27-90:31
     Bool
-Builtins.lc 92:7-92:15
+92:7-92:15
     Type -> Constraint
-Builtins.lc 97:7-97:15
+97:7-97:15
     Type -> Constraint
-Builtins.lc 118:1-118:8
+118:1-118:8
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Builtins.lc 118:10-118:17
+118:10-118:17
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Builtins.lc 118:19-118:26
+118:19-118:26
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Builtins.lc 118:34-118:37
+118:34-118:37
     Type -> Constraint | Type -> Constraint | Type -> Constraint
-Builtins.lc 118:34-118:58
+118:34-118:58
     Constraint | Constraint | Constraint
-Builtins.lc 118:34-118:73
+118:34-118:73
     Type | Type | Type
-Builtins.lc 118:39-118:55
+118:39-118:55
     Type -> Type | Type -> Type | Type -> Type
-Builtins.lc 118:39-118:57
+118:39-118:57
     Type | Type | Type
-Builtins.lc 118:56-118:57
+118:56-118:57
     _b | _b | _b
-Builtins.lc 118:62-118:63
+118:62-118:63
     Type | Type | Type
-Builtins.lc 118:62-118:73
+118:62-118:73
     Type | Type | Type
-Builtins.lc 118:67-118:68
+118:67-118:68
     Type | Type | Type
-Builtins.lc 118:67-118:73
+118:67-118:73
     Type | Type | Type
-Builtins.lc 118:72-118:73
+118:72-118:73
     Type | Type | Type | Type | Type | Type
-Builtins.lc 119:1-119:9
+119:1-119:9
     forall a b . (a ~ MatVecScalarElem b, Num a) => b -> a -> b
-Builtins.lc 119:11-119:19
+119:11-119:19
     forall a b . (a ~ MatVecScalarElem b, Num a) => b -> a -> b
-Builtins.lc 119:21-119:29
+119:21-119:29
     forall a b . (a ~ MatVecScalarElem b, Num a) => b -> a -> b
-Builtins.lc 119:34-119:80
+119:34-119:80
     Type | Type | Type | Type | Type | Type
-Builtins.lc 119:35-119:36
+119:35-119:36
     _e | _e | _e
-Builtins.lc 119:35-119:38
+119:35-119:38
     _d -> Constraint | _d -> Constraint | _d -> Constraint
-Builtins.lc 119:35-119:57
+119:35-119:57
     Constraint | Constraint | Constraint
-Builtins.lc 119:37-119:38
+119:37-119:38
     forall a . a -> a -> Constraint | forall a . a -> a -> Constraint | forall a
       . a -> a -> Constraint
-Builtins.lc 119:39-119:55
+119:39-119:55
     Type -> Type | Type -> Type | Type -> Type
-Builtins.lc 119:39-119:57
+119:39-119:57
     Type | Type | Type
-Builtins.lc 119:56-119:57
+119:56-119:57
     _b | _b | _b
-Builtins.lc 119:59-119:62
+119:59-119:62
     Type -> Constraint | Type -> Constraint | Type -> Constraint
-Builtins.lc 119:59-119:64
+119:59-119:64
     Constraint | Constraint | Constraint
-Builtins.lc 119:59-119:80
+119:59-119:80
     Type | Type | Type
-Builtins.lc 119:63-119:64
+119:63-119:64
     Type | Type | Type
-Builtins.lc 119:69-119:70
+119:69-119:70
     Type | Type | Type
-Builtins.lc 119:69-119:80
+119:69-119:80
     Type | Type | Type
-Builtins.lc 119:74-119:75
+119:74-119:75
     Type | Type | Type
-Builtins.lc 119:74-119:80
+119:74-119:80
     Type | Type | Type
-Builtins.lc 119:79-119:80
+119:79-119:80
     Type | Type | Type | Type | Type | Type
-Builtins.lc 120:1-120:8
+120:1-120:8
     forall a b (c :: Nat) . (Num a, b ~ VecScalar c a) => b -> b -> b
-Builtins.lc 120:10-120:17
+120:10-120:17
     forall a b (c :: Nat) . (Num a, b ~ VecScalar c a) => b -> b -> b
-Builtins.lc 120:34-120:75
+120:34-120:75
     Type | Type | Type | Type | Type | Type
-Builtins.lc 120:35-120:38
+120:35-120:38
     Type -> Constraint | Type -> Constraint
-Builtins.lc 120:35-120:40
+120:35-120:40
     Constraint | Constraint
-Builtins.lc 120:39-120:40
+120:39-120:40
     _f | _f
-Builtins.lc 120:42-120:43
+120:42-120:43
     _f | _f
-Builtins.lc 120:42-120:45
+120:42-120:45
     _e -> Constraint | _e -> Constraint
-Builtins.lc 120:42-120:59
+120:42-120:59
     Constraint | Constraint
-Builtins.lc 120:42-120:75
+120:42-120:75
     Type | Type
-Builtins.lc 120:44-120:45
+120:44-120:45
     forall a . a -> a -> Constraint | forall a . a -> a -> Constraint
-Builtins.lc 120:46-120:55
+120:46-120:55
     Nat -> Type -> Type | Nat -> Type -> Type
-Builtins.lc 120:46-120:57
+120:46-120:57
     Type -> Type | Type -> Type
-Builtins.lc 120:46-120:59
+120:46-120:59
     Type | Type
-Builtins.lc 120:56-120:57
+120:56-120:57
     _c | _c
-Builtins.lc 120:58-120:59
+120:58-120:59
     Type | Type
-Builtins.lc 120:64-120:65
+120:64-120:65
     Type | Type
-Builtins.lc 120:64-120:75
+120:64-120:75
     Type | Type
-Builtins.lc 120:69-120:70
+120:69-120:70
     Type | Type
-Builtins.lc 120:69-120:75
+120:69-120:75
     Type | Type
-Builtins.lc 120:74-120:75
+120:74-120:75
     Type | Type | Type | Type
-Builtins.lc 121:1-121:9
+121:1-121:9
     forall a b (c :: Nat) . (Num a, b ~ VecScalar c a) => b -> a -> b
-Builtins.lc 121:11-121:19
+121:11-121:19
     forall a b (c :: Nat) . (Num a, b ~ VecScalar c a) => b -> a -> b
-Builtins.lc 121:34-121:75
+121:34-121:75
     Type | Type | Type | Type | Type | Type
-Builtins.lc 121:35-121:38
+121:35-121:38
     Type -> Constraint | Type -> Constraint
-Builtins.lc 121:35-121:40
+121:35-121:40
     Constraint | Constraint
-Builtins.lc 121:39-121:40
+121:39-121:40
     _f | _f
-Builtins.lc 121:42-121:43
+121:42-121:43
     _f | _f
-Builtins.lc 121:42-121:45
+121:42-121:45
     _e -> Constraint | _e -> Constraint
-Builtins.lc 121:42-121:59
+121:42-121:59
     Constraint | Constraint
-Builtins.lc 121:42-121:75
+121:42-121:75
     Type | Type
-Builtins.lc 121:44-121:45
+121:44-121:45
     forall a . a -> a -> Constraint | forall a . a -> a -> Constraint
-Builtins.lc 121:46-121:55
+121:46-121:55
     Nat -> Type -> Type | Nat -> Type -> Type
-Builtins.lc 121:46-121:57
+121:46-121:57
     Type -> Type | Type -> Type
-Builtins.lc 121:46-121:59
+121:46-121:59
     Type | Type
-Builtins.lc 121:56-121:57
+121:56-121:57
     _c | _c
-Builtins.lc 121:58-121:59
+121:58-121:59
     Type | Type
-Builtins.lc 121:64-121:65
+121:64-121:65
     Type | Type
-Builtins.lc 121:64-121:75
+121:64-121:75
     Type | Type
-Builtins.lc 121:69-121:70
+121:69-121:70
     Type | Type
-Builtins.lc 121:69-121:75
+121:69-121:75
     Type | Type
-Builtins.lc 121:74-121:75
+121:74-121:75
     Type | Type | Type | Type
-Builtins.lc 122:1-122:8
+122:1-122:8
     forall a . Signed (MatVecScalarElem a) => a -> a
-Builtins.lc 122:34-122:40
+122:34-122:40
     Type -> Constraint
-Builtins.lc 122:34-122:61
+122:34-122:61
     Constraint
-Builtins.lc 122:34-122:71
+122:34-122:71
     Type
-Builtins.lc 122:42-122:58
+122:42-122:58
     Type -> Type
-Builtins.lc 122:42-122:60
+122:42-122:60
     Type
-Builtins.lc 122:59-122:60
+122:59-122:60
     _b
-Builtins.lc 122:65-122:66
+122:65-122:66
     Type
-Builtins.lc 122:65-122:71
+122:65-122:71
     Type
-Builtins.lc 122:70-122:71
+122:70-122:71
     Type | Type
-Builtins.lc 124:1-124:9
+124:1-124:9
     forall a b (c :: Nat) . (Integral a, b ~ VecScalar c a) => b -> b -> b
-Builtins.lc 124:11-124:18
+124:11-124:18
     forall a b (c :: Nat) . (Integral a, b ~ VecScalar c a) => b -> b -> b
-Builtins.lc 124:20-124:28
+124:20-124:28
     forall a b (c :: Nat) . (Integral a, b ~ VecScalar c a) => b -> b -> b
-Builtins.lc 124:34-124:80
+124:34-124:80
     Type | Type | Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 124:35-124:43
+124:35-124:43
     Type -> Constraint | Type -> Constraint | Type -> Constraint
-Builtins.lc 124:35-124:45
+124:35-124:45
     Constraint | Constraint | Constraint
-Builtins.lc 124:44-124:45
+124:44-124:45
     _f | _f | _f
-Builtins.lc 124:47-124:48
+124:47-124:48
     _f | _f | _f
-Builtins.lc 124:47-124:50
+124:47-124:50
     _e -> Constraint | _e -> Constraint | _e -> Constraint
-Builtins.lc 124:47-124:64
+124:47-124:64
     Constraint | Constraint | Constraint
-Builtins.lc 124:47-124:80
+124:47-124:80
     Type | Type | Type
-Builtins.lc 124:49-124:50
+124:49-124:50
     forall a . a -> a -> Constraint | forall a . a -> a -> Constraint | forall a
       . a -> a -> Constraint
-Builtins.lc 124:51-124:60
+124:51-124:60
     Nat -> Type -> Type | Nat -> Type -> Type | Nat -> Type -> Type
-Builtins.lc 124:51-124:62
+124:51-124:62
     Type -> Type | Type -> Type | Type -> Type
-Builtins.lc 124:51-124:64
+124:51-124:64
     Type | Type | Type
-Builtins.lc 124:61-124:62
+124:61-124:62
     _c | _c | _c
-Builtins.lc 124:63-124:64
+124:63-124:64
     Type | Type | Type
-Builtins.lc 124:69-124:70
+124:69-124:70
     Type | Type | Type
-Builtins.lc 124:69-124:80
+124:69-124:80
     Type | Type | Type
-Builtins.lc 124:74-124:75
+124:74-124:75
     Type | Type | Type
-Builtins.lc 124:74-124:80
+124:74-124:80
     Type | Type | Type
-Builtins.lc 124:79-124:80
+124:79-124:80
     Type | Type | Type | Type | Type | Type
-Builtins.lc 125:1-125:10
+125:1-125:10
     forall a b (c :: Nat) . (Integral a, b ~ VecScalar c a) => b -> a -> b
-Builtins.lc 125:12-125:20
+125:12-125:20
     forall a b (c :: Nat) . (Integral a, b ~ VecScalar c a) => b -> a -> b
-Builtins.lc 125:22-125:31
+125:22-125:31
     forall a b (c :: Nat) . (Integral a, b ~ VecScalar c a) => b -> a -> b
-Builtins.lc 125:34-125:80
+125:34-125:80
     Type | Type | Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 125:35-125:43
+125:35-125:43
     Type -> Constraint | Type -> Constraint | Type -> Constraint
-Builtins.lc 125:35-125:45
+125:35-125:45
     Constraint | Constraint | Constraint
-Builtins.lc 125:44-125:45
+125:44-125:45
     _f | _f | _f
-Builtins.lc 125:47-125:48
+125:47-125:48
     _f | _f | _f
-Builtins.lc 125:47-125:50
+125:47-125:50
     _e -> Constraint | _e -> Constraint | _e -> Constraint
-Builtins.lc 125:47-125:64
+125:47-125:64
     Constraint | Constraint | Constraint
-Builtins.lc 125:47-125:80
+125:47-125:80
     Type | Type | Type
-Builtins.lc 125:49-125:50
+125:49-125:50
     forall a . a -> a -> Constraint | forall a . a -> a -> Constraint | forall a
       . a -> a -> Constraint
-Builtins.lc 125:51-125:60
+125:51-125:60
     Nat -> Type -> Type | Nat -> Type -> Type | Nat -> Type -> Type
-Builtins.lc 125:51-125:62
+125:51-125:62
     Type -> Type | Type -> Type | Type -> Type
-Builtins.lc 125:51-125:64
+125:51-125:64
     Type | Type | Type
-Builtins.lc 125:61-125:62
+125:61-125:62
     _c | _c | _c
-Builtins.lc 125:63-125:64
+125:63-125:64
     Type | Type | Type
-Builtins.lc 125:69-125:70
+125:69-125:70
     Type | Type | Type
-Builtins.lc 125:69-125:80
+125:69-125:80
     Type | Type | Type
-Builtins.lc 125:74-125:75
+125:74-125:75
     Type | Type | Type
-Builtins.lc 125:74-125:80
+125:74-125:80
     Type | Type | Type
-Builtins.lc 125:79-125:80
+125:79-125:80
     Type | Type | Type | Type | Type | Type
-Builtins.lc 126:1-126:9
+126:1-126:9
     forall a b (c :: Nat) . (Integral a, b ~ VecScalar c a) => b -> b
-Builtins.lc 126:34-126:75
+126:34-126:75
     Type | Type | Type
-Builtins.lc 126:35-126:43
+126:35-126:43
     Type -> Constraint
-Builtins.lc 126:35-126:45
+126:35-126:45
     Constraint
-Builtins.lc 126:44-126:45
+126:44-126:45
     _f
-Builtins.lc 126:47-126:48
+126:47-126:48
     _f
-Builtins.lc 126:47-126:50
+126:47-126:50
     _e -> Constraint
-Builtins.lc 126:47-126:64
+126:47-126:64
     Constraint
-Builtins.lc 126:47-126:75
+126:47-126:75
     Type
-Builtins.lc 126:49-126:50
+126:49-126:50
     forall a . a -> a -> Constraint
-Builtins.lc 126:51-126:60
+126:51-126:60
     Nat -> Type -> Type
-Builtins.lc 126:51-126:62
+126:51-126:62
     Type -> Type
-Builtins.lc 126:51-126:64
+126:51-126:64
     Type
-Builtins.lc 126:61-126:62
+126:61-126:62
     _c
-Builtins.lc 126:63-126:64
+126:63-126:64
     Type
-Builtins.lc 126:69-126:70
+126:69-126:70
     Type
-Builtins.lc 126:69-126:75
+126:69-126:75
     Type
-Builtins.lc 126:74-126:75
+126:74-126:75
     Type | Type
-Builtins.lc 127:1-127:12
+127:1-127:12
     forall a b (c :: Nat) d
       . (Integral a, b ~ VecScalar c a, d ~ VecScalar c Word) => b -> d -> b
-Builtins.lc 127:14-127:25
+127:14-127:25
     forall a b (c :: Nat) d
       . (Integral a, b ~ VecScalar c a, d ~ VecScalar c Word) => b -> d -> b
-Builtins.lc 127:34-127:102
+127:34-127:102
     Type | Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 127:35-127:43
+127:35-127:43
     Type -> Constraint | Type -> Constraint
-Builtins.lc 127:35-127:45
+127:35-127:45
     Constraint | Constraint
-Builtins.lc 127:44-127:45
+127:44-127:45
     _h | _h
-Builtins.lc 127:47-127:48
+127:47-127:48
     _h | _h
-Builtins.lc 127:47-127:50
+127:47-127:50
     _g -> Constraint | _g -> Constraint
-Builtins.lc 127:47-127:64
+127:47-127:64
     Constraint | Constraint
-Builtins.lc 127:47-127:102
+127:47-127:102
     Type | Type
-Builtins.lc 127:49-127:50
+127:49-127:50
     forall a . a -> a -> Constraint | forall a . a -> a -> Constraint
-Builtins.lc 127:51-127:60
+127:51-127:60
     Nat -> Type -> Type | Nat -> Type -> Type
-Builtins.lc 127:51-127:62
+127:51-127:62
     Type -> Type | Type -> Type
-Builtins.lc 127:51-127:64
+127:51-127:64
     Type | Type
-Builtins.lc 127:61-127:62
+127:61-127:62
     _e | _e
-Builtins.lc 127:63-127:64
+127:63-127:64
     Type | Type
-Builtins.lc 127:66-127:67
+127:66-127:67
     _e | _e
-Builtins.lc 127:66-127:69
+127:66-127:69
     _d -> Constraint | _d -> Constraint
-Builtins.lc 127:66-127:86
+127:66-127:86
     Constraint | Constraint
-Builtins.lc 127:66-127:102
+127:66-127:102
     Type | Type
-Builtins.lc 127:68-127:69
+127:68-127:69
     forall a . a -> a -> Constraint | forall a . a -> a -> Constraint
-Builtins.lc 127:70-127:79
+127:70-127:79
     Nat -> Type -> Type | Nat -> Type -> Type
-Builtins.lc 127:70-127:81
+127:70-127:81
     Type -> Type | Type -> Type
-Builtins.lc 127:70-127:86
+127:70-127:86
     Type | Type
-Builtins.lc 127:80-127:81
+127:80-127:81
     Nat | Nat
-Builtins.lc 127:82-127:86
+127:82-127:86
     Type | Type
-Builtins.lc 127:91-127:92
+127:91-127:92
     Type | Type
-Builtins.lc 127:91-127:102
+127:91-127:102
     Type | Type
-Builtins.lc 127:96-127:97
+127:96-127:97
     Type | Type
-Builtins.lc 127:96-127:102
+127:96-127:102
     Type | Type
-Builtins.lc 127:101-127:102
+127:101-127:102
     Type | Type | Type | Type
-Builtins.lc 128:1-128:13
+128:1-128:13
     forall a b (c :: Nat) . (Integral a, b ~ VecScalar c a) => b -> Word -> b
-Builtins.lc 128:15-128:27
+128:15-128:27
     forall a b (c :: Nat) . (Integral a, b ~ VecScalar c a) => b -> Word -> b
-Builtins.lc 128:34-128:83
+128:34-128:83
     Type | Type | Type | Type | Type | Type
-Builtins.lc 128:35-128:43
+128:35-128:43
     Type -> Constraint | Type -> Constraint
-Builtins.lc 128:35-128:45
+128:35-128:45
     Constraint | Constraint
-Builtins.lc 128:44-128:45
+128:44-128:45
     _f | _f
-Builtins.lc 128:47-128:48
+128:47-128:48
     _f | _f
-Builtins.lc 128:47-128:50
+128:47-128:50
     _e -> Constraint | _e -> Constraint
-Builtins.lc 128:47-128:64
+128:47-128:64
     Constraint | Constraint
-Builtins.lc 128:47-128:83
+128:47-128:83
     Type | Type
-Builtins.lc 128:49-128:50
+128:49-128:50
     forall a . a -> a -> Constraint | forall a . a -> a -> Constraint
-Builtins.lc 128:51-128:60
+128:51-128:60
     Nat -> Type -> Type | Nat -> Type -> Type
-Builtins.lc 128:51-128:62
+128:51-128:62
     Type -> Type | Type -> Type
-Builtins.lc 128:51-128:64
+128:51-128:64
     Type | Type
-Builtins.lc 128:61-128:62
+128:61-128:62
     _c | _c
-Builtins.lc 128:63-128:64
+128:63-128:64
     Type | Type
-Builtins.lc 128:69-128:70
+128:69-128:70
     Type | Type
-Builtins.lc 128:69-128:83
+128:69-128:83
     Type | Type
-Builtins.lc 128:74-128:78
+128:74-128:78
     Type | Type
-Builtins.lc 128:74-128:83
+128:74-128:83
     Type | Type
-Builtins.lc 128:82-128:83
+128:82-128:83
     Type | Type | Type | Type
-Builtins.lc 130:1-130:8
+130:1-130:8
     Bool -> Bool -> Bool
-Builtins.lc 130:10-130:16
+130:10-130:16
     Bool -> Bool -> Bool
-Builtins.lc 130:18-130:25
+130:18-130:25
     Bool -> Bool -> Bool
-Builtins.lc 130:34-130:38
+130:34-130:38
     Type | Type | Type
-Builtins.lc 130:42-130:46
+130:42-130:46
     Type | Type | Type
-Builtins.lc 130:42-130:54
+130:42-130:54
     Type | Type | Type
-Builtins.lc 130:50-130:54
+130:50-130:54
     Type | Type | Type | Type | Type | Type
-Builtins.lc 131:1-131:8
+131:1-131:8
     forall a (b :: Nat) . (a ~ VecScalar b Bool) => a -> a
-Builtins.lc 131:47-131:79
+131:47-131:79
     Type | Type
-Builtins.lc 131:48-131:49
+131:48-131:49
     _e
-Builtins.lc 131:48-131:51
+131:48-131:51
     _d -> Constraint
-Builtins.lc 131:48-131:68
+131:48-131:68
     Constraint
-Builtins.lc 131:50-131:51
+131:50-131:51
     forall a . a -> a -> Constraint
-Builtins.lc 131:52-131:61
+131:52-131:61
     Nat -> Type -> Type
-Builtins.lc 131:52-131:63
+131:52-131:63
     Type -> Type
-Builtins.lc 131:52-131:68
+131:52-131:68
     Type
-Builtins.lc 131:62-131:63
+131:62-131:63
     _b
-Builtins.lc 131:64-131:68
+131:64-131:68
     Type
-Builtins.lc 131:73-131:74
+131:73-131:74
     Type
-Builtins.lc 131:73-131:79
+131:73-131:79
     Type
-Builtins.lc 131:78-131:79
+131:78-131:79
     Type | Type
-Builtins.lc 132:1-132:8
+132:1-132:8
     forall (a :: Nat) . VecScalar a Bool -> Bool
-Builtins.lc 132:10-132:17
+132:10-132:17
     forall (a :: Nat) . VecScalar a Bool -> Bool
-Builtins.lc 132:34-132:43
+132:34-132:43
     Nat -> Type -> Type | Nat -> Type -> Type
-Builtins.lc 132:34-132:45
+132:34-132:45
     Type -> Type | Type -> Type
-Builtins.lc 132:34-132:50
+132:34-132:50
     Type | Type
-Builtins.lc 132:34-132:58
+132:34-132:58
     Type | Type
-Builtins.lc 132:44-132:45
+132:44-132:45
     _b | _b
-Builtins.lc 132:46-132:50
+132:46-132:50
     Type | Type
-Builtins.lc 132:54-132:58
+132:54-132:58
     Type | Type | Type | Type
-Builtins.lc 135:1-135:9
+135:1-135:9
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 135:11-135:20
+135:11-135:20
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 135:22-135:30
+135:22-135:30
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 135:32-135:41
+135:32-135:41
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 135:43-135:51
+135:43-135:51
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 135:53-135:62
+135:53-135:62
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 135:64-135:71
+135:64-135:71
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 135:73-135:81
+135:73-135:81
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 135:83-135:94
+135:83-135:94
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 135:96-135:107
+135:96-135:107
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 135:109-135:116
+135:109-135:116
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 135:118-135:126
+135:118-135:126
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 135:128-135:135
+135:128-135:135
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 135:137-135:145
+135:137-135:145
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 135:147-135:154
+135:147-135:154
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 135:156-135:163
+135:156-135:163
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 135:165-135:173
+135:165-135:173
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 135:175-135:183
+135:175-135:183
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 135:185-135:193
+135:185-135:193
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 135:195-135:206
+135:195-135:206
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 136:34-136:67
+136:34-136:67
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 136:35-136:36
+136:35-136:36
     _e | _e | _e | _e | _e | _e | _e | _e | _e | _e | _e | _e | _e | _e | _e | _e | _e | _e | _e | _e
-Builtins.lc 136:35-136:38
+136:35-136:38
     _d -> Constraint | _d -> Constraint | _d -> Constraint | _d -> Constraint | _d
       -> Constraint | _d -> Constraint | _d -> Constraint | _d -> Constraint | _d
       -> Constraint | _d -> Constraint | _d -> Constraint | _d -> Constraint | _d
       -> Constraint | _d -> Constraint | _d -> Constraint | _d -> Constraint | _d
       -> Constraint | _d -> Constraint | _d -> Constraint | _d -> Constraint
-Builtins.lc 136:35-136:56
+136:35-136:56
     Constraint | Constraint | Constraint | Constraint | Constraint | Constraint | Constraint | Constraint | Constraint | Constraint | Constraint | Constraint | Constraint | Constraint | Constraint | Constraint | Constraint | Constraint | Constraint | Constraint
-Builtins.lc 136:37-136:38
+136:37-136:38
     forall a . a -> a -> Constraint | forall a . a -> a -> Constraint | forall a
       . a -> a -> Constraint | forall a . a -> a -> Constraint | forall a
       . a -> a -> Constraint | forall a . a -> a -> Constraint | forall a
@@ -4953,7 +4953,7 @@ Builtins.lc 136:37-136:38
       . a -> a -> Constraint | forall a . a -> a -> Constraint | forall a
       . a -> a -> Constraint | forall a . a -> a -> Constraint | forall a
       . a -> a -> Constraint | forall a . a -> a -> Constraint
-Builtins.lc 136:39-136:48
+136:39-136:48
     Nat -> Type -> Type | Nat -> Type -> Type | Nat -> Type -> Type | Nat
       -> Type -> Type | Nat -> Type -> Type | Nat -> Type -> Type | Nat
       -> Type -> Type | Nat -> Type -> Type | Nat -> Type -> Type | Nat
@@ -4961,3770 +4961,3770 @@ Builtins.lc 136:39-136:48
       -> Type -> Type | Nat -> Type -> Type | Nat -> Type -> Type | Nat
       -> Type -> Type | Nat -> Type -> Type | Nat -> Type -> Type | Nat
       -> Type -> Type | Nat -> Type -> Type
-Builtins.lc 136:39-136:50
+136:39-136:50
     Type -> Type | Type -> Type | Type -> Type | Type -> Type | Type -> Type | Type
       -> Type | Type -> Type | Type -> Type | Type -> Type | Type -> Type | Type
       -> Type | Type -> Type | Type -> Type | Type -> Type | Type -> Type | Type
       -> Type | Type -> Type | Type -> Type | Type -> Type | Type -> Type
-Builtins.lc 136:39-136:56
+136:39-136:56
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 136:49-136:50
+136:49-136:50
     _b | _b | _b | _b | _b | _b | _b | _b | _b | _b | _b | _b | _b | _b | _b | _b | _b | _b | _b | _b
-Builtins.lc 136:51-136:56
+136:51-136:56
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 136:61-136:62
+136:61-136:62
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 136:61-136:67
+136:61-136:67
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 136:66-136:67
+136:66-136:67
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 137:1-137:8
+137:1-137:8
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a -> a
-Builtins.lc 137:10-137:19
+137:10-137:19
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a -> a
-Builtins.lc 137:34-137:72
+137:34-137:72
     Type | Type | Type | Type
-Builtins.lc 137:35-137:36
+137:35-137:36
     _e | _e
-Builtins.lc 137:35-137:38
+137:35-137:38
     _d -> Constraint | _d -> Constraint
-Builtins.lc 137:35-137:56
+137:35-137:56
     Constraint | Constraint
-Builtins.lc 137:37-137:38
+137:37-137:38
     forall a . a -> a -> Constraint | forall a . a -> a -> Constraint
-Builtins.lc 137:39-137:48
+137:39-137:48
     Nat -> Type -> Type | Nat -> Type -> Type
-Builtins.lc 137:39-137:50
+137:39-137:50
     Type -> Type | Type -> Type
-Builtins.lc 137:39-137:56
+137:39-137:56
     Type | Type
-Builtins.lc 137:49-137:50
+137:49-137:50
     _b | _b
-Builtins.lc 137:51-137:56
+137:51-137:56
     Type | Type
-Builtins.lc 137:61-137:62
+137:61-137:62
     Type | Type
-Builtins.lc 137:61-137:72
+137:61-137:72
     Type | Type
-Builtins.lc 137:66-137:67
+137:66-137:67
     Type | Type
-Builtins.lc 137:66-137:72
+137:66-137:72
     Type | Type
-Builtins.lc 137:71-137:72
+137:71-137:72
     Type | Type | Type | Type
-Builtins.lc 139:1-139:10
+139:1-139:10
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 139:12-139:21
+139:12-139:21
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 139:23-139:32
+139:23-139:32
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 139:34-139:47
+139:34-139:47
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 139:49-139:57
+139:49-139:57
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 139:59-139:68
+139:59-139:68
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 140:34-140:67
+140:34-140:67
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 140:35-140:36
+140:35-140:36
     _e | _e | _e | _e | _e | _e
-Builtins.lc 140:35-140:38
+140:35-140:38
     _d -> Constraint | _d -> Constraint | _d -> Constraint | _d -> Constraint | _d
       -> Constraint | _d -> Constraint
-Builtins.lc 140:35-140:56
+140:35-140:56
     Constraint | Constraint | Constraint | Constraint | Constraint | Constraint
-Builtins.lc 140:37-140:38
+140:37-140:38
     forall a . a -> a -> Constraint | forall a . a -> a -> Constraint | forall a
       . a -> a -> Constraint | forall a . a -> a -> Constraint | forall a
       . a -> a -> Constraint | forall a . a -> a -> Constraint
-Builtins.lc 140:39-140:48
+140:39-140:48
     Nat -> Type -> Type | Nat -> Type -> Type | Nat -> Type -> Type | Nat
       -> Type -> Type | Nat -> Type -> Type | Nat -> Type -> Type
-Builtins.lc 140:39-140:50
+140:39-140:50
     Type -> Type | Type -> Type | Type -> Type | Type -> Type | Type -> Type | Type
       -> Type
-Builtins.lc 140:39-140:56
+140:39-140:56
     Type | Type | Type | Type | Type | Type
-Builtins.lc 140:49-140:50
+140:49-140:50
     _b | _b | _b | _b | _b | _b
-Builtins.lc 140:51-140:56
+140:51-140:56
     Type | Type | Type | Type | Type | Type
-Builtins.lc 140:61-140:62
+140:61-140:62
     Type | Type | Type | Type | Type | Type
-Builtins.lc 140:61-140:67
+140:61-140:67
     Type | Type | Type | Type | Type | Type
-Builtins.lc 140:66-140:67
+140:66-140:67
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 141:1-141:8
+141:1-141:8
     forall a b (c :: Nat) . (Num a, b ~ VecScalar c a) => b -> b -> b
-Builtins.lc 141:10-141:17
+141:10-141:17
     forall a b (c :: Nat) . (Num a, b ~ VecScalar c a) => b -> b -> b
-Builtins.lc 141:34-141:75
+141:34-141:75
     Type | Type | Type | Type | Type | Type
-Builtins.lc 141:35-141:38
+141:35-141:38
     Type -> Constraint | Type -> Constraint
-Builtins.lc 141:35-141:40
+141:35-141:40
     Constraint | Constraint
-Builtins.lc 141:39-141:40
+141:39-141:40
     _f | _f
-Builtins.lc 141:42-141:43
+141:42-141:43
     _f | _f
-Builtins.lc 141:42-141:45
+141:42-141:45
     _e -> Constraint | _e -> Constraint
-Builtins.lc 141:42-141:59
+141:42-141:59
     Constraint | Constraint
-Builtins.lc 141:42-141:75
+141:42-141:75
     Type | Type
-Builtins.lc 141:44-141:45
+141:44-141:45
     forall a . a -> a -> Constraint | forall a . a -> a -> Constraint
-Builtins.lc 141:46-141:55
+141:46-141:55
     Nat -> Type -> Type | Nat -> Type -> Type
-Builtins.lc 141:46-141:57
+141:46-141:57
     Type -> Type | Type -> Type
-Builtins.lc 141:46-141:59
+141:46-141:59
     Type | Type
-Builtins.lc 141:56-141:57
+141:56-141:57
     _c | _c
-Builtins.lc 141:58-141:59
+141:58-141:59
     Type | Type
-Builtins.lc 141:64-141:65
+141:64-141:65
     Type | Type
-Builtins.lc 141:64-141:75
+141:64-141:75
     Type | Type
-Builtins.lc 141:69-141:70
+141:69-141:70
     Type | Type
-Builtins.lc 141:69-141:75
+141:69-141:75
     Type | Type
-Builtins.lc 141:74-141:75
+141:74-141:75
     Type | Type | Type | Type
-Builtins.lc 142:1-142:9
+142:1-142:9
     forall a b (c :: Nat) . (Num a, b ~ VecScalar c a) => b -> a -> b
-Builtins.lc 142:11-142:19
+142:11-142:19
     forall a b (c :: Nat) . (Num a, b ~ VecScalar c a) => b -> a -> b
-Builtins.lc 142:34-142:75
+142:34-142:75
     Type | Type | Type | Type | Type | Type
-Builtins.lc 142:35-142:38
+142:35-142:38
     Type -> Constraint | Type -> Constraint
-Builtins.lc 142:35-142:40
+142:35-142:40
     Constraint | Constraint
-Builtins.lc 142:39-142:40
+142:39-142:40
     _f | _f
-Builtins.lc 142:42-142:43
+142:42-142:43
     _f | _f
-Builtins.lc 142:42-142:45
+142:42-142:45
     _e -> Constraint | _e -> Constraint
-Builtins.lc 142:42-142:59
+142:42-142:59
     Constraint | Constraint
-Builtins.lc 142:42-142:75
+142:42-142:75
     Type | Type
-Builtins.lc 142:44-142:45
+142:44-142:45
     forall a . a -> a -> Constraint | forall a . a -> a -> Constraint
-Builtins.lc 142:46-142:55
+142:46-142:55
     Nat -> Type -> Type | Nat -> Type -> Type
-Builtins.lc 142:46-142:57
+142:46-142:57
     Type -> Type | Type -> Type
-Builtins.lc 142:46-142:59
+142:46-142:59
     Type | Type
-Builtins.lc 142:56-142:57
+142:56-142:57
     _c | _c
-Builtins.lc 142:58-142:59
+142:58-142:59
     Type | Type
-Builtins.lc 142:64-142:65
+142:64-142:65
     Type | Type
-Builtins.lc 142:64-142:75
+142:64-142:75
     Type | Type
-Builtins.lc 142:69-142:70
+142:69-142:70
     Type | Type
-Builtins.lc 142:69-142:75
+142:69-142:75
     Type | Type
-Builtins.lc 142:74-142:75
+142:74-142:75
     Type | Type | Type | Type
-Builtins.lc 143:1-143:10
+143:1-143:10
     forall a (b :: Nat) c . (a ~ VecScalar b Float, c ~ VecScalar b Bool) => a -> c
-Builtins.lc 143:12-143:21
+143:12-143:21
     forall a (b :: Nat) c . (a ~ VecScalar b Float, c ~ VecScalar b Bool) => a -> c
-Builtins.lc 143:34-143:89
+143:34-143:89
     Type | Type | Type | Type | Type | Type
-Builtins.lc 143:35-143:36
+143:35-143:36
     _g | _g
-Builtins.lc 143:35-143:38
+143:35-143:38
     _f -> Constraint | _f -> Constraint
-Builtins.lc 143:35-143:56
+143:35-143:56
     Constraint | Constraint
-Builtins.lc 143:37-143:38
+143:37-143:38
     forall a . a -> a -> Constraint | forall a . a -> a -> Constraint
-Builtins.lc 143:39-143:48
+143:39-143:48
     Nat -> Type -> Type | Nat -> Type -> Type
-Builtins.lc 143:39-143:50
+143:39-143:50
     Type -> Type | Type -> Type
-Builtins.lc 143:39-143:56
+143:39-143:56
     Type | Type
-Builtins.lc 143:49-143:50
+143:49-143:50
     _d | _d
-Builtins.lc 143:51-143:56
+143:51-143:56
     Type | Type
-Builtins.lc 143:58-143:59
+143:58-143:59
     _d | _d
-Builtins.lc 143:58-143:61
+143:58-143:61
     _c -> Constraint | _c -> Constraint
-Builtins.lc 143:58-143:78
+143:58-143:78
     Constraint | Constraint
-Builtins.lc 143:58-143:89
+143:58-143:89
     Type | Type
-Builtins.lc 143:60-143:61
+143:60-143:61
     forall a . a -> a -> Constraint | forall a . a -> a -> Constraint
-Builtins.lc 143:62-143:71
+143:62-143:71
     Nat -> Type -> Type | Nat -> Type -> Type
-Builtins.lc 143:62-143:73
+143:62-143:73
     Type -> Type | Type -> Type
-Builtins.lc 143:62-143:78
+143:62-143:78
     Type | Type
-Builtins.lc 143:72-143:73
+143:72-143:73
     Nat | Nat
-Builtins.lc 143:74-143:78
+143:74-143:78
     Type | Type
-Builtins.lc 143:83-143:84
+143:83-143:84
     Type | Type
-Builtins.lc 143:83-143:89
+143:83-143:89
     Type | Type
-Builtins.lc 143:88-143:89
+143:88-143:89
     Type | Type | Type | Type
-Builtins.lc 144:1-144:8
+144:1-144:8
     forall a b (c :: Nat) . (Signed a, b ~ VecScalar c a) => b -> b
-Builtins.lc 144:10-144:18
+144:10-144:18
     forall a b (c :: Nat) . (Signed a, b ~ VecScalar c a) => b -> b
-Builtins.lc 144:34-144:73
+144:34-144:73
     Type | Type | Type | Type | Type | Type
-Builtins.lc 144:35-144:41
+144:35-144:41
     Type -> Constraint | Type -> Constraint
-Builtins.lc 144:35-144:43
+144:35-144:43
     Constraint | Constraint
-Builtins.lc 144:42-144:43
+144:42-144:43
     _f | _f
-Builtins.lc 144:45-144:46
+144:45-144:46
     _f | _f
-Builtins.lc 144:45-144:48
+144:45-144:48
     _e -> Constraint | _e -> Constraint
-Builtins.lc 144:45-144:62
+144:45-144:62
     Constraint | Constraint
-Builtins.lc 144:45-144:73
+144:45-144:73
     Type | Type
-Builtins.lc 144:47-144:48
+144:47-144:48
     forall a . a -> a -> Constraint | forall a . a -> a -> Constraint
-Builtins.lc 144:49-144:58
+144:49-144:58
     Nat -> Type -> Type | Nat -> Type -> Type
-Builtins.lc 144:49-144:60
+144:49-144:60
     Type -> Type | Type -> Type
-Builtins.lc 144:49-144:62
+144:49-144:62
     Type | Type
-Builtins.lc 144:59-144:60
+144:59-144:60
     _c | _c
-Builtins.lc 144:61-144:62
+144:61-144:62
     Type | Type
-Builtins.lc 144:67-144:68
+144:67-144:68
     Type | Type
-Builtins.lc 144:67-144:73
+144:67-144:73
     Type | Type
-Builtins.lc 144:72-144:73
+144:72-144:73
     Type | Type | Type | Type
-Builtins.lc 145:1-145:9
+145:1-145:9
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> (a, a)
-Builtins.lc 145:34-145:72
+145:34-145:72
     Type | Type
-Builtins.lc 145:35-145:36
+145:35-145:36
     _e
-Builtins.lc 145:35-145:38
+145:35-145:38
     _d -> Constraint
-Builtins.lc 145:35-145:56
+145:35-145:56
     Constraint
-Builtins.lc 145:37-145:38
+145:37-145:38
     forall a . a -> a -> Constraint
-Builtins.lc 145:39-145:48
+145:39-145:48
     Nat -> Type -> Type
-Builtins.lc 145:39-145:50
+145:39-145:50
     Type -> Type
-Builtins.lc 145:39-145:56
+145:39-145:56
     Type
-Builtins.lc 145:49-145:50
+145:49-145:50
     _b
-Builtins.lc 145:51-145:56
+145:51-145:56
     Type
-Builtins.lc 145:61-145:62
+145:61-145:62
     Type
-Builtins.lc 145:61-145:72
+145:61-145:72
     Type
-Builtins.lc 145:66-145:72
+145:66-145:72
     Type | Type
-Builtins.lc 145:67-145:68
+145:67-145:68
     Type
-Builtins.lc 145:67-145:71
+145:67-145:71
     [Type]
-Builtins.lc 145:70-145:71
+145:70-145:71
     Type | [Type]
-Builtins.lc 146:1-146:10
+146:1-146:10
     forall a b (c :: Nat) . (Num a, b ~ VecScalar c a) => b -> b -> b -> b
-Builtins.lc 146:34-146:80
+146:34-146:80
     Type | Type | Type
-Builtins.lc 146:35-146:38
+146:35-146:38
     Type -> Constraint
-Builtins.lc 146:35-146:40
+146:35-146:40
     Constraint
-Builtins.lc 146:39-146:40
+146:39-146:40
     _f
-Builtins.lc 146:42-146:43
+146:42-146:43
     _f
-Builtins.lc 146:42-146:45
+146:42-146:45
     _e -> Constraint
-Builtins.lc 146:42-146:59
+146:42-146:59
     Constraint
-Builtins.lc 146:42-146:80
+146:42-146:80
     Type
-Builtins.lc 146:44-146:45
+146:44-146:45
     forall a . a -> a -> Constraint
-Builtins.lc 146:46-146:55
+146:46-146:55
     Nat -> Type -> Type
-Builtins.lc 146:46-146:57
+146:46-146:57
     Type -> Type
-Builtins.lc 146:46-146:59
+146:46-146:59
     Type
-Builtins.lc 146:56-146:57
+146:56-146:57
     _c
-Builtins.lc 146:58-146:59
+146:58-146:59
     Type
-Builtins.lc 146:64-146:65
+146:64-146:65
     Type
-Builtins.lc 146:64-146:80
+146:64-146:80
     Type
-Builtins.lc 146:69-146:70
+146:69-146:70
     Type
-Builtins.lc 146:69-146:80
+146:69-146:80
     Type
-Builtins.lc 146:74-146:75
+146:74-146:75
     Type
-Builtins.lc 146:74-146:80
+146:74-146:80
     Type
-Builtins.lc 146:79-146:80
+146:79-146:80
     Type | Type
-Builtins.lc 147:1-147:11
+147:1-147:11
     forall a b (c :: Nat) . (Num a, b ~ VecScalar c a) => b -> a -> a -> b
-Builtins.lc 147:34-147:80
+147:34-147:80
     Type | Type | Type
-Builtins.lc 147:35-147:38
+147:35-147:38
     Type -> Constraint
-Builtins.lc 147:35-147:40
+147:35-147:40
     Constraint
-Builtins.lc 147:39-147:40
+147:39-147:40
     _f
-Builtins.lc 147:42-147:43
+147:42-147:43
     _f
-Builtins.lc 147:42-147:45
+147:42-147:45
     _e -> Constraint
-Builtins.lc 147:42-147:59
+147:42-147:59
     Constraint
-Builtins.lc 147:42-147:80
+147:42-147:80
     Type
-Builtins.lc 147:44-147:45
+147:44-147:45
     forall a . a -> a -> Constraint
-Builtins.lc 147:46-147:55
+147:46-147:55
     Nat -> Type -> Type
-Builtins.lc 147:46-147:57
+147:46-147:57
     Type -> Type
-Builtins.lc 147:46-147:59
+147:46-147:59
     Type
-Builtins.lc 147:56-147:57
+147:56-147:57
     _c
-Builtins.lc 147:58-147:59
+147:58-147:59
     Type
-Builtins.lc 147:64-147:65
+147:64-147:65
     Type
-Builtins.lc 147:64-147:80
+147:64-147:80
     Type
-Builtins.lc 147:69-147:70
+147:69-147:70
     Type
-Builtins.lc 147:69-147:80
+147:69-147:80
     Type
-Builtins.lc 147:74-147:75
+147:74-147:75
     Type
-Builtins.lc 147:74-147:80
+147:74-147:80
     Type
-Builtins.lc 147:79-147:80
+147:79-147:80
     Type | Type
-Builtins.lc 148:1-148:8
+148:1-148:8
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a -> a -> a
-Builtins.lc 148:34-148:77
+148:34-148:77
     Type | Type
-Builtins.lc 148:35-148:36
+148:35-148:36
     _e
-Builtins.lc 148:35-148:38
+148:35-148:38
     _d -> Constraint
-Builtins.lc 148:35-148:56
+148:35-148:56
     Constraint
-Builtins.lc 148:37-148:38
+148:37-148:38
     forall a . a -> a -> Constraint
-Builtins.lc 148:39-148:48
+148:39-148:48
     Nat -> Type -> Type
-Builtins.lc 148:39-148:50
+148:39-148:50
     Type -> Type
-Builtins.lc 148:39-148:56
+148:39-148:56
     Type
-Builtins.lc 148:49-148:50
+148:49-148:50
     _b
-Builtins.lc 148:51-148:56
+148:51-148:56
     Type
-Builtins.lc 148:61-148:62
+148:61-148:62
     Type
-Builtins.lc 148:61-148:77
+148:61-148:77
     Type
-Builtins.lc 148:66-148:67
+148:66-148:67
     Type
-Builtins.lc 148:66-148:77
+148:66-148:77
     Type
-Builtins.lc 148:71-148:72
+148:71-148:72
     Type
-Builtins.lc 148:71-148:77
+148:71-148:77
     Type
-Builtins.lc 148:76-148:77
+148:76-148:77
     Type | Type
-Builtins.lc 149:1-149:9
+149:1-149:9
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a -> Float -> a
-Builtins.lc 149:34-149:81
+149:34-149:81
     Type | Type
-Builtins.lc 149:35-149:36
+149:35-149:36
     _e
-Builtins.lc 149:35-149:38
+149:35-149:38
     _d -> Constraint
-Builtins.lc 149:35-149:56
+149:35-149:56
     Constraint
-Builtins.lc 149:37-149:38
+149:37-149:38
     forall a . a -> a -> Constraint
-Builtins.lc 149:39-149:48
+149:39-149:48
     Nat -> Type -> Type
-Builtins.lc 149:39-149:50
+149:39-149:50
     Type -> Type
-Builtins.lc 149:39-149:56
+149:39-149:56
     Type
-Builtins.lc 149:49-149:50
+149:49-149:50
     _b
-Builtins.lc 149:51-149:56
+149:51-149:56
     Type
-Builtins.lc 149:61-149:62
+149:61-149:62
     Type
-Builtins.lc 149:61-149:81
+149:61-149:81
     Type
-Builtins.lc 149:66-149:67
+149:66-149:67
     Type
-Builtins.lc 149:66-149:81
+149:66-149:81
     Type
-Builtins.lc 149:71-149:76
+149:71-149:76
     Type
-Builtins.lc 149:71-149:81
+149:71-149:81
     Type
-Builtins.lc 149:80-149:81
+149:80-149:81
     Type | Type
-Builtins.lc 150:1-150:9
+150:1-150:9
     forall a (b :: Nat) c
       . (a ~ VecScalar b Float, c ~ VecScalar b Bool) => a -> a -> c -> a
-Builtins.lc 150:34-150:99
+150:34-150:99
     Type | Type | Type
-Builtins.lc 150:35-150:36
+150:35-150:36
     _g
-Builtins.lc 150:35-150:38
+150:35-150:38
     _f -> Constraint
-Builtins.lc 150:35-150:56
+150:35-150:56
     Constraint
-Builtins.lc 150:37-150:38
+150:37-150:38
     forall a . a -> a -> Constraint
-Builtins.lc 150:39-150:48
+150:39-150:48
     Nat -> Type -> Type
-Builtins.lc 150:39-150:50
+150:39-150:50
     Type -> Type
-Builtins.lc 150:39-150:56
+150:39-150:56
     Type
-Builtins.lc 150:49-150:50
+150:49-150:50
     _d
-Builtins.lc 150:51-150:56
+150:51-150:56
     Type
-Builtins.lc 150:58-150:59
+150:58-150:59
     _d
-Builtins.lc 150:58-150:61
+150:58-150:61
     _c -> Constraint
-Builtins.lc 150:58-150:78
+150:58-150:78
     Constraint
-Builtins.lc 150:58-150:99
+150:58-150:99
     Type
-Builtins.lc 150:60-150:61
+150:60-150:61
     forall a . a -> a -> Constraint
-Builtins.lc 150:62-150:71
+150:62-150:71
     Nat -> Type -> Type
-Builtins.lc 150:62-150:73
+150:62-150:73
     Type -> Type
-Builtins.lc 150:62-150:78
+150:62-150:78
     Type
-Builtins.lc 150:72-150:73
+150:72-150:73
     Nat
-Builtins.lc 150:74-150:78
+150:74-150:78
     Type
-Builtins.lc 150:83-150:84
+150:83-150:84
     Type
-Builtins.lc 150:83-150:99
+150:83-150:99
     Type
-Builtins.lc 150:88-150:89
+150:88-150:89
     Type
-Builtins.lc 150:88-150:99
+150:88-150:99
     Type
-Builtins.lc 150:93-150:94
+150:93-150:94
     Type
-Builtins.lc 150:93-150:99
+150:93-150:99
     Type
-Builtins.lc 150:98-150:99
+150:98-150:99
     Type | Type
-Builtins.lc 151:1-151:9
+151:1-151:9
     forall a (b :: Nat) . (a ~ VecS Float b) => a -> a -> a
-Builtins.lc 151:34-151:66
+151:34-151:66
     Type | Type
-Builtins.lc 151:35-151:36
+151:35-151:36
     _e
-Builtins.lc 151:35-151:38
+151:35-151:38
     _d -> Constraint
-Builtins.lc 151:35-151:50
+151:35-151:50
     Constraint
-Builtins.lc 151:37-151:38
+151:37-151:38
     forall a . a -> a -> Constraint
-Builtins.lc 151:39-151:42
+151:39-151:42
     Nat -> Type -> Type
-Builtins.lc 151:39-151:44
+151:39-151:44
     Type -> Type
-Builtins.lc 151:39-151:50
+151:39-151:50
     Type
-Builtins.lc 151:43-151:44
+151:43-151:44
     _b
-Builtins.lc 151:45-151:50
+151:45-151:50
     Type
-Builtins.lc 151:55-151:56
+151:55-151:56
     Type
-Builtins.lc 151:55-151:66
+151:55-151:66
     Type
-Builtins.lc 151:60-151:61
+151:60-151:61
     Type
-Builtins.lc 151:60-151:66
+151:60-151:66
     Type
-Builtins.lc 151:65-151:66
+151:65-151:66
     Type | Type
-Builtins.lc 152:1-152:10
+152:1-152:10
     forall a (b :: Nat) . (a ~ VecScalar b Float) => Float -> a -> a
-Builtins.lc 152:34-152:76
+152:34-152:76
     Type | Type
-Builtins.lc 152:35-152:36
+152:35-152:36
     _e
-Builtins.lc 152:35-152:38
+152:35-152:38
     _d -> Constraint
-Builtins.lc 152:35-152:56
+152:35-152:56
     Constraint
-Builtins.lc 152:37-152:38
+152:37-152:38
     forall a . a -> a -> Constraint
-Builtins.lc 152:39-152:48
+152:39-152:48
     Nat -> Type -> Type
-Builtins.lc 152:39-152:50
+152:39-152:50
     Type -> Type
-Builtins.lc 152:39-152:56
+152:39-152:56
     Type
-Builtins.lc 152:49-152:50
+152:49-152:50
     _b
-Builtins.lc 152:51-152:56
+152:51-152:56
     Type
-Builtins.lc 152:61-152:66
+152:61-152:66
     Type
-Builtins.lc 152:61-152:76
+152:61-152:76
     Type
-Builtins.lc 152:70-152:71
+152:70-152:71
     Type
-Builtins.lc 152:70-152:76
+152:70-152:76
     Type
-Builtins.lc 152:75-152:76
+152:75-152:76
     Type | Type
-Builtins.lc 153:1-153:15
+153:1-153:15
     forall a (b :: Nat) . (a ~ VecS Float b) => a -> a -> a -> a
-Builtins.lc 153:34-153:71
+153:34-153:71
     Type | Type
-Builtins.lc 153:35-153:36
+153:35-153:36
     _e
-Builtins.lc 153:35-153:38
+153:35-153:38
     _d -> Constraint
-Builtins.lc 153:35-153:50
+153:35-153:50
     Constraint
-Builtins.lc 153:37-153:38
+153:37-153:38
     forall a . a -> a -> Constraint
-Builtins.lc 153:39-153:42
+153:39-153:42
     Nat -> Type -> Type
-Builtins.lc 153:39-153:44
+153:39-153:44
     Type -> Type
-Builtins.lc 153:39-153:50
+153:39-153:50
     Type
-Builtins.lc 153:43-153:44
+153:43-153:44
     _b
-Builtins.lc 153:45-153:50
+153:45-153:50
     Type
-Builtins.lc 153:55-153:56
+153:55-153:56
     Type
-Builtins.lc 153:55-153:71
+153:55-153:71
     Type
-Builtins.lc 153:60-153:61
+153:60-153:61
     Type
-Builtins.lc 153:60-153:71
+153:60-153:71
     Type
-Builtins.lc 153:65-153:66
+153:65-153:66
     Type
-Builtins.lc 153:65-153:71
+153:65-153:71
     Type
-Builtins.lc 153:70-153:71
+153:70-153:71
     Type | Type
-Builtins.lc 154:1-154:16
+154:1-154:16
     forall a (b :: Nat) . (a ~ VecScalar b Float) => Float -> Float -> a -> a
-Builtins.lc 154:34-154:85
+154:34-154:85
     Type | Type
-Builtins.lc 154:35-154:36
+154:35-154:36
     _e
-Builtins.lc 154:35-154:38
+154:35-154:38
     _d -> Constraint
-Builtins.lc 154:35-154:56
+154:35-154:56
     Constraint
-Builtins.lc 154:37-154:38
+154:37-154:38
     forall a . a -> a -> Constraint
-Builtins.lc 154:39-154:48
+154:39-154:48
     Nat -> Type -> Type
-Builtins.lc 154:39-154:50
+154:39-154:50
     Type -> Type
-Builtins.lc 154:39-154:56
+154:39-154:56
     Type
-Builtins.lc 154:49-154:50
+154:49-154:50
     _b
-Builtins.lc 154:51-154:56
+154:51-154:56
     Type
-Builtins.lc 154:61-154:66
+154:61-154:66
     Type
-Builtins.lc 154:61-154:85
+154:61-154:85
     Type
-Builtins.lc 154:70-154:75
+154:70-154:75
     Type
-Builtins.lc 154:70-154:85
+154:70-154:85
     Type
-Builtins.lc 154:79-154:80
+154:79-154:80
     Type
-Builtins.lc 154:79-154:85
+154:79-154:85
     Type
-Builtins.lc 154:84-154:85
+154:84-154:85
     Type | Type
-Builtins.lc 157:1-157:19
+157:1-157:19
     forall (a :: Nat) . VecScalar a Float -> VecScalar a Int
-Builtins.lc 157:34-157:43
+157:34-157:43
     Nat -> Type -> Type
-Builtins.lc 157:34-157:45
+157:34-157:45
     Type -> Type
-Builtins.lc 157:34-157:51
+157:34-157:51
     Type
-Builtins.lc 157:34-157:70
+157:34-157:70
     Type
-Builtins.lc 157:44-157:45
+157:44-157:45
     _b
-Builtins.lc 157:46-157:51
+157:46-157:51
     Type
-Builtins.lc 157:55-157:64
+157:55-157:64
     Nat -> Type -> Type
-Builtins.lc 157:55-157:66
+157:55-157:66
     Type -> Type
-Builtins.lc 157:55-157:70
+157:55-157:70
     Type | Type
-Builtins.lc 157:65-157:66
+157:65-157:66
     Nat
-Builtins.lc 157:67-157:70
+157:67-157:70
     Type
-Builtins.lc 158:1-158:20
+158:1-158:20
     forall (a :: Nat) . VecScalar a Float -> VecScalar a Word
-Builtins.lc 158:34-158:43
+158:34-158:43
     Nat -> Type -> Type
-Builtins.lc 158:34-158:45
+158:34-158:45
     Type -> Type
-Builtins.lc 158:34-158:51
+158:34-158:51
     Type
-Builtins.lc 158:34-158:71
+158:34-158:71
     Type
-Builtins.lc 158:44-158:45
+158:44-158:45
     _b
-Builtins.lc 158:46-158:51
+158:46-158:51
     Type
-Builtins.lc 158:55-158:64
+158:55-158:64
     Nat -> Type -> Type
-Builtins.lc 158:55-158:66
+158:55-158:66
     Type -> Type
-Builtins.lc 158:55-158:71
+158:55-158:71
     Type | Type
-Builtins.lc 158:65-158:66
+158:65-158:66
     Nat
-Builtins.lc 158:67-158:71
+158:67-158:71
     Type
-Builtins.lc 159:1-159:19
+159:1-159:19
     forall (a :: Nat) . VecScalar a Int -> VecScalar a Float
-Builtins.lc 159:34-159:43
+159:34-159:43
     Nat -> Type -> Type
-Builtins.lc 159:34-159:45
+159:34-159:45
     Type -> Type
-Builtins.lc 159:34-159:49
+159:34-159:49
     Type
-Builtins.lc 159:34-159:72
+159:34-159:72
     Type
-Builtins.lc 159:44-159:45
+159:44-159:45
     _b
-Builtins.lc 159:46-159:49
+159:46-159:49
     Type
-Builtins.lc 159:55-159:64
+159:55-159:64
     Nat -> Type -> Type
-Builtins.lc 159:55-159:66
+159:55-159:66
     Type -> Type
-Builtins.lc 159:55-159:72
+159:55-159:72
     Type | Type
-Builtins.lc 159:65-159:66
+159:65-159:66
     Nat
-Builtins.lc 159:67-159:72
+159:67-159:72
     Type
-Builtins.lc 160:1-160:20
+160:1-160:20
     forall (a :: Nat) . VecScalar a Word -> VecScalar a Float
-Builtins.lc 160:34-160:43
+160:34-160:43
     Nat -> Type -> Type
-Builtins.lc 160:34-160:45
+160:34-160:45
     Type -> Type
-Builtins.lc 160:34-160:50
+160:34-160:50
     Type
-Builtins.lc 160:34-160:72
+160:34-160:72
     Type
-Builtins.lc 160:44-160:45
+160:44-160:45
     _b
-Builtins.lc 160:46-160:50
+160:46-160:50
     Type
-Builtins.lc 160:55-160:64
+160:55-160:64
     Nat -> Type -> Type
-Builtins.lc 160:55-160:66
+160:55-160:66
     Type -> Type
-Builtins.lc 160:55-160:72
+160:55-160:72
     Type | Type
-Builtins.lc 160:65-160:66
+160:65-160:66
     Nat
-Builtins.lc 160:67-160:72
+160:67-160:72
     Type
-Builtins.lc 162:1-162:11
+162:1-162:11
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> Float
-Builtins.lc 162:34-162:71
+162:34-162:71
     Type | Type
-Builtins.lc 162:35-162:36
+162:35-162:36
     _e
-Builtins.lc 162:35-162:38
+162:35-162:38
     _d -> Constraint
-Builtins.lc 162:35-162:56
+162:35-162:56
     Constraint
-Builtins.lc 162:37-162:38
+162:37-162:38
     forall a . a -> a -> Constraint
-Builtins.lc 162:39-162:48
+162:39-162:48
     Nat -> Type -> Type
-Builtins.lc 162:39-162:50
+162:39-162:50
     Type -> Type
-Builtins.lc 162:39-162:56
+162:39-162:56
     Type
-Builtins.lc 162:49-162:50
+162:49-162:50
     _b
-Builtins.lc 162:51-162:56
+162:51-162:56
     Type
-Builtins.lc 162:61-162:62
+162:61-162:62
     Type
-Builtins.lc 162:61-162:71
+162:61-162:71
     Type
-Builtins.lc 162:66-162:71
+162:66-162:71
     Type | Type
-Builtins.lc 163:1-163:13
+163:1-163:13
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a -> Float
-Builtins.lc 163:15-163:22
+163:15-163:22
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a -> Float
-Builtins.lc 163:34-163:76
+163:34-163:76
     Type | Type | Type | Type
-Builtins.lc 163:35-163:36
+163:35-163:36
     _e | _e
-Builtins.lc 163:35-163:38
+163:35-163:38
     _d -> Constraint | _d -> Constraint
-Builtins.lc 163:35-163:56
+163:35-163:56
     Constraint | Constraint
-Builtins.lc 163:37-163:38
+163:37-163:38
     forall a . a -> a -> Constraint | forall a . a -> a -> Constraint
-Builtins.lc 163:39-163:48
+163:39-163:48
     Nat -> Type -> Type | Nat -> Type -> Type
-Builtins.lc 163:39-163:50
+163:39-163:50
     Type -> Type | Type -> Type
-Builtins.lc 163:39-163:56
+163:39-163:56
     Type | Type
-Builtins.lc 163:49-163:50
+163:49-163:50
     _b | _b
-Builtins.lc 163:51-163:56
+163:51-163:56
     Type | Type
-Builtins.lc 163:61-163:62
+163:61-163:62
     Type | Type
-Builtins.lc 163:61-163:76
+163:61-163:76
     Type | Type
-Builtins.lc 163:66-163:67
+163:66-163:67
     Type | Type
-Builtins.lc 163:66-163:76
+163:66-163:76
     Type | Type
-Builtins.lc 163:71-163:76
+163:71-163:76
     Type | Type | Type | Type
-Builtins.lc 164:1-164:10
+164:1-164:10
     forall a . (a ~ VecS Float 3) => a -> a -> a
-Builtins.lc 164:34-164:72
+164:34-164:72
     Type
-Builtins.lc 164:35-164:36
+164:35-164:36
     _c
-Builtins.lc 164:35-164:38
+164:35-164:38
     _b -> Constraint
-Builtins.lc 164:35-164:56
+164:35-164:56
     Constraint
-Builtins.lc 164:37-164:38
+164:37-164:38
     forall a . a -> a -> Constraint
-Builtins.lc 164:39-164:48
+164:39-164:48
     Nat -> Type -> Type
-Builtins.lc 164:39-164:50
+164:39-164:50
     Type -> Type
-Builtins.lc 164:39-164:56
+164:39-164:56
     Type
-Builtins.lc 164:49-164:50
+164:49-164:50
     _b
-Builtins.lc 164:51-164:56
+164:51-164:56
     Type
-Builtins.lc 164:61-164:62
+164:61-164:62
     Type
-Builtins.lc 164:61-164:72
+164:61-164:72
     Type
-Builtins.lc 164:66-164:67
+164:66-164:67
     Type
-Builtins.lc 164:66-164:72
+164:66-164:72
     Type
-Builtins.lc 164:71-164:72
+164:71-164:72
     Type | Type
-Builtins.lc 165:1-165:14
+165:1-165:14
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 165:34-165:67
+165:34-165:67
     Type | Type
-Builtins.lc 165:35-165:36
+165:35-165:36
     _e
-Builtins.lc 165:35-165:38
+165:35-165:38
     _d -> Constraint
-Builtins.lc 165:35-165:56
+165:35-165:56
     Constraint
-Builtins.lc 165:37-165:38
+165:37-165:38
     forall a . a -> a -> Constraint
-Builtins.lc 165:39-165:48
+165:39-165:48
     Nat -> Type -> Type
-Builtins.lc 165:39-165:50
+165:39-165:50
     Type -> Type
-Builtins.lc 165:39-165:56
+165:39-165:56
     Type
-Builtins.lc 165:49-165:50
+165:49-165:50
     _b
-Builtins.lc 165:51-165:56
+165:51-165:56
     Type
-Builtins.lc 165:61-165:62
+165:61-165:62
     Type
-Builtins.lc 165:61-165:67
+165:61-165:67
     Type
-Builtins.lc 165:66-165:67
+165:66-165:67
     Type | Type
-Builtins.lc 166:1-166:16
+166:1-166:16
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a -> a -> a
-Builtins.lc 166:18-166:29
+166:18-166:29
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a -> a -> a
-Builtins.lc 166:34-166:77
+166:34-166:77
     Type | Type | Type | Type
-Builtins.lc 166:35-166:36
+166:35-166:36
     _e | _e
-Builtins.lc 166:35-166:38
+166:35-166:38
     _d -> Constraint | _d -> Constraint
-Builtins.lc 166:35-166:56
+166:35-166:56
     Constraint | Constraint
-Builtins.lc 166:37-166:38
+166:37-166:38
     forall a . a -> a -> Constraint | forall a . a -> a -> Constraint
-Builtins.lc 166:39-166:48
+166:39-166:48
     Nat -> Type -> Type | Nat -> Type -> Type
-Builtins.lc 166:39-166:50
+166:39-166:50
     Type -> Type | Type -> Type
-Builtins.lc 166:39-166:56
+166:39-166:56
     Type | Type
-Builtins.lc 166:49-166:50
+166:49-166:50
     _b | _b
-Builtins.lc 166:51-166:56
+166:51-166:56
     Type | Type
-Builtins.lc 166:61-166:62
+166:61-166:62
     Type | Type
-Builtins.lc 166:61-166:77
+166:61-166:77
     Type | Type
-Builtins.lc 166:66-166:67
+166:66-166:67
     Type | Type
-Builtins.lc 166:66-166:77
+166:66-166:77
     Type | Type
-Builtins.lc 166:71-166:72
+166:71-166:72
     Type | Type
-Builtins.lc 166:71-166:77
+166:71-166:77
     Type | Type
-Builtins.lc 166:76-166:77
+166:76-166:77
     Type | Type | Type | Type
-Builtins.lc 167:1-167:12
+167:1-167:12
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a -> a
-Builtins.lc 167:34-167:72
+167:34-167:72
     Type | Type
-Builtins.lc 167:35-167:36
+167:35-167:36
     _e
-Builtins.lc 167:35-167:38
+167:35-167:38
     _d -> Constraint
-Builtins.lc 167:35-167:56
+167:35-167:56
     Constraint
-Builtins.lc 167:37-167:38
+167:37-167:38
     forall a . a -> a -> Constraint
-Builtins.lc 167:39-167:48
+167:39-167:48
     Nat -> Type -> Type
-Builtins.lc 167:39-167:50
+167:39-167:50
     Type -> Type
-Builtins.lc 167:39-167:56
+167:39-167:56
     Type
-Builtins.lc 167:49-167:50
+167:49-167:50
     _b
-Builtins.lc 167:51-167:56
+167:51-167:56
     Type
-Builtins.lc 167:61-167:62
+167:61-167:62
     Type
-Builtins.lc 167:61-167:72
+167:61-167:72
     Type
-Builtins.lc 167:66-167:67
+167:66-167:67
     Type
-Builtins.lc 167:66-167:72
+167:66-167:72
     Type
-Builtins.lc 167:71-167:72
+167:71-167:72
     Type | Type
-Builtins.lc 169:1-169:14
+169:1-169:14
     forall (a :: Nat) (b :: Nat) c . Mat a b c -> Mat b a c
-Builtins.lc 169:34-169:37
+169:34-169:37
     Nat -> Nat -> Type -> Type
-Builtins.lc 169:34-169:39
+169:34-169:39
     Nat -> Type -> Type
-Builtins.lc 169:34-169:41
+169:34-169:41
     Type -> Type
-Builtins.lc 169:34-169:43
+169:34-169:43
     Type
-Builtins.lc 169:34-169:56
+169:34-169:56
     Type | Type | Type
-Builtins.lc 169:38-169:39
+169:38-169:39
     _f
-Builtins.lc 169:40-169:41
+169:40-169:41
     _d
-Builtins.lc 169:42-169:43
+169:42-169:43
     _b
-Builtins.lc 169:47-169:50
+169:47-169:50
     Nat -> Nat -> Type -> Type
-Builtins.lc 169:47-169:52
+169:47-169:52
     Nat -> Type -> Type
-Builtins.lc 169:47-169:54
+169:47-169:54
     Type -> Type
-Builtins.lc 169:47-169:56
+169:47-169:56
     Type | Type
-Builtins.lc 169:51-169:52
+169:51-169:52
     Nat
-Builtins.lc 169:53-169:54
+169:53-169:54
     Nat
-Builtins.lc 169:55-169:56
+169:55-169:56
     Type
-Builtins.lc 170:1-170:16
+170:1-170:16
     forall (a :: Nat) b . Mat a a b -> Float
-Builtins.lc 170:34-170:37
+170:34-170:37
     Nat -> Nat -> Type -> Type
-Builtins.lc 170:34-170:39
+170:34-170:39
     Nat -> Type -> Type
-Builtins.lc 170:34-170:41
+170:34-170:41
     Type -> Type
-Builtins.lc 170:34-170:43
+170:34-170:43
     Type
-Builtins.lc 170:34-170:52
+170:34-170:52
     Type | Type
-Builtins.lc 170:38-170:39
+170:38-170:39
     _d
-Builtins.lc 170:40-170:41
+170:40-170:41
     Nat
-Builtins.lc 170:42-170:43
+170:42-170:43
     _b
-Builtins.lc 170:47-170:52
+170:47-170:52
     Type | Type
-Builtins.lc 171:1-171:12
+171:1-171:12
     forall (a :: Nat) b . Mat a a b -> Mat a a b
-Builtins.lc 171:34-171:37
+171:34-171:37
     Nat -> Nat -> Type -> Type
-Builtins.lc 171:34-171:39
+171:34-171:39
     Nat -> Type -> Type
-Builtins.lc 171:34-171:41
+171:34-171:41
     Type -> Type
-Builtins.lc 171:34-171:43
+171:34-171:43
     Type
-Builtins.lc 171:34-171:56
+171:34-171:56
     Type | Type
-Builtins.lc 171:38-171:39
+171:38-171:39
     _d
-Builtins.lc 171:40-171:41
+171:40-171:41
     Nat
-Builtins.lc 171:42-171:43
+171:42-171:43
     _b
-Builtins.lc 171:47-171:50
+171:47-171:50
     Nat -> Nat -> Type -> Type
-Builtins.lc 171:47-171:52
+171:47-171:52
     Nat -> Type -> Type
-Builtins.lc 171:47-171:54
+171:47-171:54
     Type -> Type
-Builtins.lc 171:47-171:56
+171:47-171:56
     Type | Type
-Builtins.lc 171:51-171:52
+171:51-171:52
     Nat
-Builtins.lc 171:53-171:54
+171:53-171:54
     Nat
-Builtins.lc 171:55-171:56
+171:55-171:56
     Type
-Builtins.lc 172:1-172:17
+172:1-172:17
     forall (a :: Nat) b (c :: Nat) . Vec a b -> Vec c b -> Mat c a b
-Builtins.lc 172:34-172:37
+172:34-172:37
     Nat -> Type -> Type
-Builtins.lc 172:34-172:39
+172:34-172:39
     Type -> Type
-Builtins.lc 172:34-172:41
+172:34-172:41
     Type
-Builtins.lc 172:34-172:69
+172:34-172:69
     Type | Type | Type
-Builtins.lc 172:38-172:39
+172:38-172:39
     _f
-Builtins.lc 172:40-172:41
+172:40-172:41
     _d
-Builtins.lc 172:47-172:50
+172:47-172:50
     Nat -> Type -> Type
-Builtins.lc 172:47-172:52
+172:47-172:52
     Type -> Type
-Builtins.lc 172:47-172:54
+172:47-172:54
     Type
-Builtins.lc 172:47-172:69
+172:47-172:69
     Type
-Builtins.lc 172:51-172:52
+172:51-172:52
     _c
-Builtins.lc 172:53-172:54
+172:53-172:54
     Type
-Builtins.lc 172:60-172:63
+172:60-172:63
     Nat -> Nat -> Type -> Type
-Builtins.lc 172:60-172:65
+172:60-172:65
     Nat -> Type -> Type
-Builtins.lc 172:60-172:67
+172:60-172:67
     Type -> Type
-Builtins.lc 172:60-172:69
+172:60-172:69
     Type | Type
-Builtins.lc 172:64-172:65
+172:64-172:65
     Nat
-Builtins.lc 172:66-172:67
+172:66-172:67
     Nat
-Builtins.lc 172:68-172:69
+172:68-172:69
     Type
-Builtins.lc 173:1-173:14
+173:1-173:14
     forall (a :: Nat) (b :: Nat) c . Mat a b c -> Vec b c -> Vec a c
-Builtins.lc 173:34-173:37
+173:34-173:37
     Nat -> Nat -> Type -> Type
-Builtins.lc 173:34-173:39
+173:34-173:39
     Nat -> Type -> Type
-Builtins.lc 173:34-173:41
+173:34-173:41
     Type -> Type
-Builtins.lc 173:34-173:43
+173:34-173:43
     Type
-Builtins.lc 173:34-173:67
+173:34-173:67
     Type | Type | Type
-Builtins.lc 173:38-173:39
+173:38-173:39
     _f
-Builtins.lc 173:40-173:41
+173:40-173:41
     _d
-Builtins.lc 173:42-173:43
+173:42-173:43
     _b
-Builtins.lc 173:47-173:50
+173:47-173:50
     Nat -> Type -> Type
-Builtins.lc 173:47-173:52
+173:47-173:52
     Type -> Type
-Builtins.lc 173:47-173:54
+173:47-173:54
     Type
-Builtins.lc 173:47-173:67
+173:47-173:67
     Type
-Builtins.lc 173:51-173:52
+173:51-173:52
     Nat
-Builtins.lc 173:53-173:54
+173:53-173:54
     Type
-Builtins.lc 173:60-173:63
+173:60-173:63
     Nat -> Type -> Type
-Builtins.lc 173:60-173:65
+173:60-173:65
     Type -> Type
-Builtins.lc 173:60-173:67
+173:60-173:67
     Type | Type
-Builtins.lc 173:64-173:65
+173:64-173:65
     Nat
-Builtins.lc 173:66-173:67
+173:66-173:67
     Type
-Builtins.lc 174:1-174:14
+174:1-174:14
     forall (a :: Nat) b (c :: Nat) . Vec a b -> Mat a c b -> Vec c b
-Builtins.lc 174:34-174:37
+174:34-174:37
     Nat -> Type -> Type
-Builtins.lc 174:34-174:39
+174:34-174:39
     Type -> Type
-Builtins.lc 174:34-174:41
+174:34-174:41
     Type
-Builtins.lc 174:34-174:67
+174:34-174:67
     Type | Type | Type
-Builtins.lc 174:38-174:39
+174:38-174:39
     _f
-Builtins.lc 174:40-174:41
+174:40-174:41
     _d
-Builtins.lc 174:47-174:50
+174:47-174:50
     Nat -> Nat -> Type -> Type
-Builtins.lc 174:47-174:52
+174:47-174:52
     Nat -> Type -> Type
-Builtins.lc 174:47-174:54
+174:47-174:54
     Type -> Type
-Builtins.lc 174:47-174:56
+174:47-174:56
     Type
-Builtins.lc 174:47-174:67
+174:47-174:67
     Type
-Builtins.lc 174:51-174:52
+174:51-174:52
     Nat
-Builtins.lc 174:53-174:54
+174:53-174:54
     _c
-Builtins.lc 174:55-174:56
+174:55-174:56
     Type
-Builtins.lc 174:60-174:63
+174:60-174:63
     Nat -> Type -> Type
-Builtins.lc 174:60-174:65
+174:60-174:65
     Type -> Type
-Builtins.lc 174:60-174:67
+174:60-174:67
     Type | Type
-Builtins.lc 174:64-174:65
+174:64-174:65
     Nat
-Builtins.lc 174:66-174:67
+174:66-174:67
     Type
-Builtins.lc 175:1-175:14
+175:1-175:14
     forall (a :: Nat) (b :: Nat) c (d :: Nat) . Mat a b c -> Mat b d c -> Mat a d c
-Builtins.lc 175:34-175:37
+175:34-175:37
     Nat -> Nat -> Type -> Type
-Builtins.lc 175:34-175:39
+175:34-175:39
     Nat -> Type -> Type
-Builtins.lc 175:34-175:41
+175:34-175:41
     Type -> Type
-Builtins.lc 175:34-175:43
+175:34-175:43
     Type
-Builtins.lc 175:34-175:69
+175:34-175:69
     Type | Type | Type | Type
-Builtins.lc 175:38-175:39
+175:38-175:39
     _h
-Builtins.lc 175:40-175:41
+175:40-175:41
     _f
-Builtins.lc 175:42-175:43
+175:42-175:43
     _d
-Builtins.lc 175:47-175:50
+175:47-175:50
     Nat -> Nat -> Type -> Type
-Builtins.lc 175:47-175:52
+175:47-175:52
     Nat -> Type -> Type
-Builtins.lc 175:47-175:54
+175:47-175:54
     Type -> Type
-Builtins.lc 175:47-175:56
+175:47-175:56
     Type
-Builtins.lc 175:47-175:69
+175:47-175:69
     Type
-Builtins.lc 175:51-175:52
+175:51-175:52
     Nat
-Builtins.lc 175:53-175:54
+175:53-175:54
     _c
-Builtins.lc 175:55-175:56
+175:55-175:56
     Type
-Builtins.lc 175:60-175:63
+175:60-175:63
     Nat -> Nat -> Type -> Type
-Builtins.lc 175:60-175:65
+175:60-175:65
     Nat -> Type -> Type
-Builtins.lc 175:60-175:67
+175:60-175:67
     Type -> Type
-Builtins.lc 175:60-175:69
+175:60-175:69
     Type | Type
-Builtins.lc 175:64-175:65
+175:64-175:65
     Nat
-Builtins.lc 175:66-175:67
+175:66-175:67
     Nat
-Builtins.lc 175:68-175:69
+175:68-175:69
     Type
-Builtins.lc 177:1-177:13
+177:1-177:13
     forall a (b :: Nat) c d
       . (Num c, a ~ VecScalar b c, d ~ VecScalar b Bool) => a -> a -> d
-Builtins.lc 177:15-177:32
+177:15-177:32
     forall a (b :: Nat) c d
       . (Num c, a ~ VecScalar b c, d ~ VecScalar b Bool) => a -> a -> d
-Builtins.lc 177:34-177:49
+177:34-177:49
     forall a (b :: Nat) c d
       . (Num c, a ~ VecScalar b c, d ~ VecScalar b Bool) => a -> a -> d
-Builtins.lc 177:51-177:71
+177:51-177:71
     forall a (b :: Nat) c d
       . (Num c, a ~ VecScalar b c, d ~ VecScalar b Bool) => a -> a -> d
-Builtins.lc 177:73-177:83
+177:73-177:83
     forall a (b :: Nat) c d
       . (Num c, a ~ VecScalar b c, d ~ VecScalar b Bool) => a -> a -> d
-Builtins.lc 177:85-177:98
+177:85-177:98
     forall a (b :: Nat) c d
       . (Num c, a ~ VecScalar b c, d ~ VecScalar b Bool) => a -> a -> d
-Builtins.lc 178:51-178:114
+178:51-178:114
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 178:52-178:55
+178:52-178:55
     Type -> Constraint | Type -> Constraint | Type -> Constraint | Type
       -> Constraint | Type -> Constraint | Type -> Constraint
-Builtins.lc 178:52-178:57
+178:52-178:57
     Constraint | Constraint | Constraint | Constraint | Constraint | Constraint
-Builtins.lc 178:56-178:57
+178:56-178:57
     _d | _d | _d | _d | _d | _d
-Builtins.lc 178:59-178:60
+178:59-178:60
     _i | _i | _i | _i | _i | _i
-Builtins.lc 178:59-178:62
+178:59-178:62
     _h -> Constraint | _h -> Constraint | _h -> Constraint | _h -> Constraint | _h
       -> Constraint | _h -> Constraint
-Builtins.lc 178:59-178:76
+178:59-178:76
     Constraint | Constraint | Constraint | Constraint | Constraint | Constraint
-Builtins.lc 178:59-178:114
+178:59-178:114
     Type | Type | Type | Type | Type | Type
-Builtins.lc 178:61-178:62
+178:61-178:62
     forall a . a -> a -> Constraint | forall a . a -> a -> Constraint | forall a
       . a -> a -> Constraint | forall a . a -> a -> Constraint | forall a
       . a -> a -> Constraint | forall a . a -> a -> Constraint
-Builtins.lc 178:63-178:72
+178:63-178:72
     Nat -> Type -> Type | Nat -> Type -> Type | Nat -> Type -> Type | Nat
       -> Type -> Type | Nat -> Type -> Type | Nat -> Type -> Type
-Builtins.lc 178:63-178:74
+178:63-178:74
     Type -> Type | Type -> Type | Type -> Type | Type -> Type | Type -> Type | Type
       -> Type
-Builtins.lc 178:63-178:76
+178:63-178:76
     Type | Type | Type | Type | Type | Type
-Builtins.lc 178:73-178:74
+178:73-178:74
     _f | _f | _f | _f | _f | _f
-Builtins.lc 178:75-178:76
+178:75-178:76
     Type | Type | Type | Type | Type | Type
-Builtins.lc 178:78-178:79
+178:78-178:79
     _e | _e | _e | _e | _e | _e
-Builtins.lc 178:78-178:81
+178:78-178:81
     _d -> Constraint | _d -> Constraint | _d -> Constraint | _d -> Constraint | _d
       -> Constraint | _d -> Constraint
-Builtins.lc 178:78-178:98
+178:78-178:98
     Constraint | Constraint | Constraint | Constraint | Constraint | Constraint
-Builtins.lc 178:78-178:114
+178:78-178:114
     Type | Type | Type | Type | Type | Type
-Builtins.lc 178:80-178:81
+178:80-178:81
     forall a . a -> a -> Constraint | forall a . a -> a -> Constraint | forall a
       . a -> a -> Constraint | forall a . a -> a -> Constraint | forall a
       . a -> a -> Constraint | forall a . a -> a -> Constraint
-Builtins.lc 178:82-178:91
+178:82-178:91
     Nat -> Type -> Type | Nat -> Type -> Type | Nat -> Type -> Type | Nat
       -> Type -> Type | Nat -> Type -> Type | Nat -> Type -> Type
-Builtins.lc 178:82-178:93
+178:82-178:93
     Type -> Type | Type -> Type | Type -> Type | Type -> Type | Type -> Type | Type
       -> Type
-Builtins.lc 178:82-178:98
+178:82-178:98
     Type | Type | Type | Type | Type | Type
-Builtins.lc 178:92-178:93
+178:92-178:93
     Nat | Nat | Nat | Nat | Nat | Nat
-Builtins.lc 178:94-178:98
+178:94-178:98
     Type | Type | Type | Type | Type | Type
-Builtins.lc 178:103-178:104
+178:103-178:104
     Type | Type | Type | Type | Type | Type
-Builtins.lc 178:103-178:114
+178:103-178:114
     Type | Type | Type | Type | Type | Type
-Builtins.lc 178:108-178:109
+178:108-178:109
     Type | Type | Type | Type | Type | Type
-Builtins.lc 178:108-178:114
+178:108-178:114
     Type | Type | Type | Type | Type | Type
-Builtins.lc 178:113-178:114
+178:113-178:114
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 179:1-179:10
+179:1-179:10
     forall a b . (b ~ MatVecScalarElem a) => a -> a -> Bool
-Builtins.lc 179:12-179:24
+179:12-179:24
     forall a b . (b ~ MatVecScalarElem a) => a -> a -> Bool
-Builtins.lc 179:47-179:89
+179:47-179:89
     Type | Type | Type | Type
-Builtins.lc 179:48-179:49
+179:48-179:49
     _c | _c
-Builtins.lc 179:48-179:51
+179:48-179:51
     _b -> Constraint | _b -> Constraint
-Builtins.lc 179:48-179:70
+179:48-179:70
     Constraint | Constraint
-Builtins.lc 179:50-179:51
+179:50-179:51
     forall a . a -> a -> Constraint | forall a . a -> a -> Constraint
-Builtins.lc 179:52-179:68
+179:52-179:68
     Type -> Type | Type -> Type
-Builtins.lc 179:52-179:70
+179:52-179:70
     Type | Type
-Builtins.lc 179:69-179:70
+179:69-179:70
     _c | _c
-Builtins.lc 179:75-179:76
+179:75-179:76
     Type | Type
-Builtins.lc 179:75-179:89
+179:75-179:89
     Type | Type
-Builtins.lc 179:80-179:81
+179:80-179:81
     Type | Type
-Builtins.lc 179:80-179:89
+179:80-179:89
     Type | Type
-Builtins.lc 179:85-179:89
+179:85-179:89
     Type | Type | Type | Type
-Builtins.lc 181:1-181:9
+181:1-181:9
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 181:11-181:19
+181:11-181:19
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 181:21-181:31
+181:21-181:31
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Builtins.lc 182:34-182:67
+182:34-182:67
     Type | Type | Type | Type | Type | Type
-Builtins.lc 182:35-182:36
+182:35-182:36
     _e | _e | _e
-Builtins.lc 182:35-182:38
+182:35-182:38
     _d -> Constraint | _d -> Constraint | _d -> Constraint
-Builtins.lc 182:35-182:56
+182:35-182:56
     Constraint | Constraint | Constraint
-Builtins.lc 182:37-182:38
+182:37-182:38
     forall a . a -> a -> Constraint | forall a . a -> a -> Constraint | forall a
       . a -> a -> Constraint
-Builtins.lc 182:39-182:48
+182:39-182:48
     Nat -> Type -> Type | Nat -> Type -> Type | Nat -> Type -> Type
-Builtins.lc 182:39-182:50
+182:39-182:50
     Type -> Type | Type -> Type | Type -> Type
-Builtins.lc 182:39-182:56
+182:39-182:56
     Type | Type | Type
-Builtins.lc 182:49-182:50
+182:49-182:50
     _b | _b | _b
-Builtins.lc 182:51-182:56
+182:51-182:56
     Type | Type | Type
-Builtins.lc 182:61-182:62
+182:61-182:62
     Type | Type | Type
-Builtins.lc 182:61-182:67
+182:61-182:67
     Type | Type | Type
-Builtins.lc 182:66-182:67
+182:66-182:67
     Type | Type | Type | Type | Type | Type
-Builtins.lc 184:1-184:11
+184:1-184:11
     forall (a :: Nat) . VecScalar a Float -> Float
-Builtins.lc 184:34-184:43
+184:34-184:43
     Nat -> Type -> Type
-Builtins.lc 184:34-184:45
+184:34-184:45
     Type -> Type
-Builtins.lc 184:34-184:51
+184:34-184:51
     Type
-Builtins.lc 184:34-184:60
+184:34-184:60
     Type
-Builtins.lc 184:44-184:45
+184:44-184:45
     _b
-Builtins.lc 184:46-184:51
+184:46-184:51
     Type
-Builtins.lc 184:55-184:60
+184:55-184:60
     Type | Type
-Builtins.lc 185:1-185:11
+185:1-185:11
     forall (a :: Nat) . VecScalar a Float -> Vec 2 Float
-Builtins.lc 185:34-185:43
+185:34-185:43
     Nat -> Type -> Type
-Builtins.lc 185:34-185:45
+185:34-185:45
     Type -> Type
-Builtins.lc 185:34-185:51
+185:34-185:51
     Type
-Builtins.lc 185:34-185:66
+185:34-185:66
     Type
-Builtins.lc 185:44-185:45
+185:44-185:45
     _b
-Builtins.lc 185:46-185:51
+185:46-185:51
     Type
-Builtins.lc 185:55-185:58
+185:55-185:58
     Nat -> Type -> Type
-Builtins.lc 185:55-185:60
+185:55-185:60
     Type -> Type
-Builtins.lc 185:55-185:66
+185:55-185:66
     Type | Type
-Builtins.lc 185:59-185:60
+185:59-185:60
     _b
-Builtins.lc 185:61-185:66
+185:61-185:66
     Type
-Builtins.lc 186:1-186:11
+186:1-186:11
     forall (a :: Nat) . VecScalar a Float -> Vec 3 Float
-Builtins.lc 186:34-186:43
+186:34-186:43
     Nat -> Type -> Type
-Builtins.lc 186:34-186:45
+186:34-186:45
     Type -> Type
-Builtins.lc 186:34-186:51
+186:34-186:51
     Type
-Builtins.lc 186:34-186:66
+186:34-186:66
     Type
-Builtins.lc 186:44-186:45
+186:44-186:45
     _b
-Builtins.lc 186:46-186:51
+186:46-186:51
     Type
-Builtins.lc 186:55-186:58
+186:55-186:58
     Nat -> Type -> Type
-Builtins.lc 186:55-186:60
+186:55-186:60
     Type -> Type
-Builtins.lc 186:55-186:66
+186:55-186:66
     Type | Type
-Builtins.lc 186:59-186:60
+186:59-186:60
     _b
-Builtins.lc 186:61-186:66
+186:61-186:66
     Type
-Builtins.lc 187:1-187:11
+187:1-187:11
     forall (a :: Nat) . VecScalar a Float -> Vec 4 Float
-Builtins.lc 187:34-187:43
+187:34-187:43
     Nat -> Type -> Type
-Builtins.lc 187:34-187:45
+187:34-187:45
     Type -> Type
-Builtins.lc 187:34-187:51
+187:34-187:51
     Type
-Builtins.lc 187:34-187:66
+187:34-187:66
     Type
-Builtins.lc 187:44-187:45
+187:44-187:45
     _b
-Builtins.lc 187:46-187:51
+187:46-187:51
     Type
-Builtins.lc 187:55-187:58
+187:55-187:58
     Nat -> Type -> Type
-Builtins.lc 187:55-187:60
+187:55-187:60
     Type -> Type
-Builtins.lc 187:55-187:66
+187:55-187:66
     Type | Type
-Builtins.lc 187:59-187:60
+187:59-187:60
     _b
-Builtins.lc 187:61-187:66
+187:61-187:66
     Type
-Builtins.lc 201:1-201:5
+201:1-201:5
     forall a . [a] -> a
-Builtins.lc 201:15-201:16
+201:15-201:16
     _d
-Builtins.lc 203:6-203:8
+203:6-203:8
     forall a . [a] -> [a] -> [a]
-Builtins.lc 203:14-203:16
+203:14-203:16
     _d
-Builtins.lc 203:14-204:26
+203:14-204:26
     [_a] -> [_a]
-Builtins.lc 204:14-204:15
+204:14-204:15
     _d
-Builtins.lc 204:14-204:17
+204:14-204:17
     [_c] -> [_c]
-Builtins.lc 204:14-204:26
+204:14-204:26
     [_c]
-Builtins.lc 204:16-204:17
+204:16-204:17
     forall a . a -> [a] -> [a]
-Builtins.lc 204:18-204:20
+204:18-204:20
     [_f]
-Builtins.lc 204:21-204:23
+204:21-204:23
     _h
-Builtins.lc 204:24-204:26
+204:24-204:26
     [_g]
-Builtins.lc 206:1-206:6
+206:1-206:6
     forall a b . (b -> a -> a) -> a -> [b] -> a
-Builtins.lc 206:16-206:17
+206:16-206:17
     _f
-Builtins.lc 206:16-207:39
+206:16-207:39
     [_b] -> _f
-Builtins.lc 207:21-207:22
+207:21-207:22
     _i
-Builtins.lc 207:23-207:24
+207:23-207:24
     _f
-Builtins.lc 207:26-207:31
+207:26-207:31
     _n
-Builtins.lc 207:32-207:33
+207:32-207:33
     _j -> _g
-Builtins.lc 207:34-207:35
+207:34-207:35
     _o
-Builtins.lc 207:36-207:38
+207:36-207:38
     [_k]
-Builtins.lc 209:1-209:7
+209:1-209:7
     forall a . [[a]] -> [a]
-Builtins.lc 209:10-209:15
+209:10-209:15
     forall a b . (b -> a -> a) -> a -> [b] -> a
-Builtins.lc 209:10-209:20
+209:10-209:20
     [_a] -> [[_a]] -> [_a]
-Builtins.lc 209:10-209:23
+209:10-209:23
     [[_a]] -> [_a]
-Builtins.lc 209:16-209:20
+209:16-209:20
     forall a . [a] -> [a] -> [a]
-Builtins.lc 209:21-209:23
+209:21-209:23
     forall a . [a]
-Builtins.lc 211:1-211:4
+211:1-211:4
     forall a b . (a -> b) -> [a] -> [b]
-Builtins.lc 211:16-211:18
+211:16-211:18
     forall a . [a]
-Builtins.lc 211:16-212:30
+211:16-212:30
     [_b] -> [_a]
-Builtins.lc 212:16-212:17
+212:16-212:17
     _i
-Builtins.lc 212:16-212:21
+212:16-212:21
     [_a] -> [_a]
-Builtins.lc 212:16-212:30
+212:16-212:30
     [_c]
-Builtins.lc 212:18-212:19
+212:18-212:19
     _h
-Builtins.lc 212:20-212:21
+212:20-212:21
     forall a . a -> [a] -> [a]
-Builtins.lc 212:22-212:25
+212:22-212:25
     _i
-Builtins.lc 212:26-212:27
+212:26-212:27
     _g -> _f
-Builtins.lc 212:28-212:30
+212:28-212:30
     [_h]
-Builtins.lc 214:14-214:38
+214:14-214:38
     Type | Type
-Builtins.lc 214:15-214:16
+214:15-214:16
     _d
-Builtins.lc 214:20-214:23
+214:20-214:23
     Type | Type
-Builtins.lc 214:21-214:22
+214:21-214:22
     _c
-Builtins.lc 214:28-214:31
+214:28-214:31
     Type
-Builtins.lc 214:28-214:38
+214:28-214:38
     Type
-Builtins.lc 214:29-214:30
+214:29-214:30
     Type
-Builtins.lc 214:35-214:38
+214:35-214:38
     Type | Type
-Builtins.lc 214:36-214:37
+214:36-214:37
     Type
-Builtins.lc 215:1-215:10
+215:1-215:10
     forall a b . (a -> [b]) -> [a] -> [b]
-Builtins.lc 215:17-215:23
+215:17-215:23
     forall a . [[a]] -> [a]
-Builtins.lc 215:17-215:33
+215:17-215:33
     [_c]
-Builtins.lc 215:25-215:28
+215:25-215:28
     forall a b . (a -> b) -> [a] -> [b]
-Builtins.lc 215:25-215:30
+215:25-215:30
     [_e] -> [[_d]]
-Builtins.lc 215:25-215:32
+215:25-215:32
     [[_c]]
-Builtins.lc 215:29-215:30
+215:29-215:30
     _g -> [_f]
-Builtins.lc 215:31-215:32
+215:31-215:32
     [_d]
-Builtins.lc 217:1-217:4
+217:1-217:4
     forall a . [a] -> Int
-Builtins.lc 217:10-217:11
+217:10-217:11
     _b
-Builtins.lc 217:10-218:35
+217:10-218:35
     [_b] -> Int
-Builtins.lc 218:14-218:15
+218:14-218:15
     _b
-Builtins.lc 218:14-218:28
+218:14-218:28
     Int -> Int
-Builtins.lc 218:14-218:35
+218:14-218:35
     Int
-Builtins.lc 218:16-218:28
+218:16-218:28
     Int -> Int -> Int
-Builtins.lc 218:29-218:32
+218:29-218:32
     _h
-Builtins.lc 218:33-218:35
+218:33-218:35
     [_g]
-Builtins.lc 222:6-222:11
+222:6-222:11
     Type -> Type | Type -> Type | Type -> Type | Type -> Type | Type -> Type | Type
-Builtins.lc 222:6-222:13
+222:6-222:13
     Type | Type | Type | Type
-Builtins.lc 222:6-224:11
+222:6-224:11
     Type | Type | Type
-Builtins.lc 222:6-224:13
+222:6-224:13
     Type
-Builtins.lc 222:12-222:13
+222:12-222:13
     Type | Type
-Builtins.lc 223:7-223:14
+223:7-223:14
     forall a . Maybe a | Maybe _b
-Builtins.lc 224:7-224:11
+224:7-224:11
     forall a . a -> Maybe a | Maybe _d | Type | Type
-Builtins.lc 224:12-224:13
+224:12-224:13
     Type
-Builtins.lc 227:6-227:12
+227:6-227:12
     Nat -> Type -> Type | Nat -> Type -> Type | Nat
       -> Type -> Type | Type | Type | Type
-Builtins.lc 227:19-227:22
+227:19-227:22
     Type | Type
-Builtins.lc 231:6-231:19
+231:6-231:19
     Type | Type | Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 231:6-236:20
+231:6-236:20
     Type | Type | Type | Type | Type
-Builtins.lc 232:7-232:15
+232:7-232:15
     PrimitiveType
-Builtins.lc 233:7-233:11
+233:7-233:11
     PrimitiveType
-Builtins.lc 234:7-234:12
+234:7-234:12
     PrimitiveType
-Builtins.lc 235:7-235:24
+235:7-235:24
     PrimitiveType
-Builtins.lc 236:7-236:20
+236:7-236:20
     PrimitiveType
-Builtins.lc 238:6-238:15
+238:6-238:15
     Type -> PrimitiveType -> Type | Type -> PrimitiveType -> Type | Type | Type
       -> PrimitiveType -> Type | Type | Type
-Builtins.lc 238:6-241:56
+238:6-241:56
     Type | Type | Type | Type
-Builtins.lc 238:21-238:34
+238:21-238:34
     Type
-Builtins.lc 238:21-238:42
+238:21-238:42
     Type
-Builtins.lc 238:38-238:42
+238:38-238:42
     Type | Type
-Builtins.lc 239:5-239:14
+239:5-239:14
     forall a . a -> Primitive a 'Point | Primitive _c 'Point
-Builtins.lc 239:5-239:53
+239:5-239:53
     Type | Type
-Builtins.lc 239:21-239:22
+239:21-239:22
     Type
-Builtins.lc 239:21-239:53
+239:21-239:53
     Type
-Builtins.lc 239:36-239:45
+239:36-239:45
     Type -> PrimitiveType -> Type
-Builtins.lc 239:36-239:47
+239:36-239:47
     PrimitiveType -> Type
-Builtins.lc 239:36-239:53
+239:36-239:53
     Type | Type
-Builtins.lc 239:46-239:47
+239:46-239:47
     Type
-Builtins.lc 239:48-239:53
+239:48-239:53
     PrimitiveType | PrimitiveType
-Builtins.lc 240:5-240:13
+240:5-240:13
     forall a . a -> a -> Primitive a 'Line | Primitive _e 'Line
-Builtins.lc 240:5-240:52
+240:5-240:52
     Type | Type | Type
-Builtins.lc 240:21-240:22
+240:21-240:22
     Type
-Builtins.lc 240:21-240:52
+240:21-240:52
     Type
-Builtins.lc 240:26-240:27
+240:26-240:27
     Type
-Builtins.lc 240:26-240:52
+240:26-240:52
     Type
-Builtins.lc 240:36-240:45
+240:36-240:45
     Type -> PrimitiveType -> Type
-Builtins.lc 240:36-240:47
+240:36-240:47
     PrimitiveType -> Type
-Builtins.lc 240:36-240:52
+240:36-240:52
     Type | Type
-Builtins.lc 240:46-240:47
+240:46-240:47
     Type
-Builtins.lc 240:48-240:52
+240:48-240:52
     PrimitiveType | PrimitiveType
-Builtins.lc 241:5-241:17
+241:5-241:17
     forall a . a -> a -> a -> Primitive a 'Triangle | Primitive _g 'Triangle
-Builtins.lc 241:5-241:56
+241:5-241:56
     Type | Type | Type | Type
-Builtins.lc 241:21-241:22
+241:21-241:22
     Type
-Builtins.lc 241:21-241:56
+241:21-241:56
     Type
-Builtins.lc 241:26-241:27
+241:26-241:27
     Type
-Builtins.lc 241:26-241:56
+241:26-241:56
     Type
-Builtins.lc 241:31-241:32
+241:31-241:32
     Type
-Builtins.lc 241:31-241:56
+241:31-241:56
     Type
-Builtins.lc 241:36-241:45
+241:36-241:45
     Type -> PrimitiveType -> Type
-Builtins.lc 241:36-241:47
+241:36-241:47
     PrimitiveType -> Type
-Builtins.lc 241:36-241:56
+241:36-241:56
     Type | Type
-Builtins.lc 241:46-241:47
+241:46-241:47
     Type
-Builtins.lc 241:48-241:56
+241:48-241:56
     PrimitiveType | PrimitiveType
-Builtins.lc 243:1-243:13
+243:1-243:13
     forall a b (c :: PrimitiveType) . (a -> b) -> Primitive a c -> Primitive b c
-Builtins.lc 243:17-243:59
+243:17-243:59
     Type | Type | Type
-Builtins.lc 243:18-243:19
+243:18-243:19
     _f
-Builtins.lc 243:23-243:24
+243:23-243:24
     _e | Type
-Builtins.lc 243:29-243:38
+243:29-243:38
     Type -> PrimitiveType -> Type
-Builtins.lc 243:29-243:40
+243:29-243:40
     PrimitiveType -> Type
-Builtins.lc 243:29-243:42
+243:29-243:42
     Type
-Builtins.lc 243:29-243:59
+243:29-243:59
     Type
-Builtins.lc 243:39-243:40
+243:39-243:40
     Type
-Builtins.lc 243:41-243:42
+243:41-243:42
     _c
-Builtins.lc 243:46-243:55
+243:46-243:55
     Type -> PrimitiveType -> Type
-Builtins.lc 243:46-243:57
+243:46-243:57
     PrimitiveType -> Type
-Builtins.lc 243:46-243:59
+243:46-243:59
     Type | Type
-Builtins.lc 243:56-243:57
+243:56-243:57
     Type
-Builtins.lc 243:58-243:59
+243:58-243:59
     PrimitiveType
-Builtins.lc 250:6-250:21
+250:6-250:21
     PrimitiveType -> Type -> Type
-Builtins.lc 250:28-250:43
+250:28-250:43
     Type
-Builtins.lc 250:29-250:38
+250:29-250:38
     Type -> PrimitiveType -> Type
-Builtins.lc 250:29-250:40
+250:29-250:40
     PrimitiveType -> Type
-Builtins.lc 250:29-250:42
+250:29-250:42
     Type
-Builtins.lc 250:39-250:40
+250:39-250:40
     _b
-Builtins.lc 250:41-250:42
+250:41-250:42
     _c
-Builtins.lc 252:18-252:72
+252:18-252:72
     Type | Type | Type
-Builtins.lc 252:19-252:20
+252:19-252:20
     _f
-Builtins.lc 252:24-252:25
+252:24-252:25
     _e | Type
-Builtins.lc 252:30-252:45
+252:30-252:45
     PrimitiveType -> Type -> Type
-Builtins.lc 252:30-252:47
+252:30-252:47
     Type -> Type
-Builtins.lc 252:30-252:49
+252:30-252:49
     Type
-Builtins.lc 252:30-252:72
+252:30-252:72
     Type
-Builtins.lc 252:46-252:47
+252:46-252:47
     _c
-Builtins.lc 252:48-252:49
+252:48-252:49
     Type
-Builtins.lc 252:53-252:68
+252:53-252:68
     PrimitiveType -> Type -> Type
-Builtins.lc 252:53-252:70
+252:53-252:70
     Type -> Type
-Builtins.lc 252:53-252:72
+252:53-252:72
     Type | Type
-Builtins.lc 252:69-252:70
+252:69-252:70
     PrimitiveType
-Builtins.lc 252:71-252:72
+252:71-252:72
     Type
-Builtins.lc 253:1-253:14
+253:1-253:14
     forall a b (c :: PrimitiveType) . (a -> b) -> [Primitive a c] -> [Primitive b c]
-Builtins.lc 253:19-253:22
+253:19-253:22
     forall a b . (a -> b) -> [a] -> [b]
-Builtins.lc 253:19-253:39
+253:19-253:39
     [Primitive _e _a] -> [Primitive _d _a]
-Builtins.lc 253:24-253:36
+253:24-253:36
     forall a b (c :: PrimitiveType) . (a -> b) -> Primitive a c -> Primitive b c
-Builtins.lc 253:24-253:38
+253:24-253:38
     Primitive _g _a -> Primitive _f _a
-Builtins.lc 253:37-253:38
+253:37-253:38
     _i -> _h
-Builtins.lc 255:30-255:38
+255:30-255:38
     Type -> Type
-Builtins.lc 255:45-255:46
+255:45-255:46
     Type
-Builtins.lc 260:1-260:12
+260:1-260:12
     forall (a :: PrimitiveType) (b :: [Type]) (c :: [Type])
       . (b ~ (map ListElem c :: [Type])) => HList c -> PrimitiveStream a (HList b)
-Builtins.lc 260:32-260:119
+260:32-260:119
     Type | Type | Type
-Builtins.lc 260:56-260:57
+260:56-260:57
     _e
-Builtins.lc 260:56-260:59
+260:56-260:59
     _d -> Constraint
-Builtins.lc 260:56-260:75
+260:56-260:75
     Constraint
-Builtins.lc 260:58-260:59
+260:58-260:59
     forall a . a -> a -> Constraint
-Builtins.lc 260:60-260:63
+260:60-260:63
     forall a b . (a -> b) -> [a] -> [b]
-Builtins.lc 260:60-260:72
+260:60-260:72
     [Type] -> [Type]
-Builtins.lc 260:60-260:75
+260:60-260:75
     [Type]
-Builtins.lc 260:64-260:72
+260:64-260:72
     Type -> Type
-Builtins.lc 260:73-260:75
+260:73-260:75
     _b
-Builtins.lc 260:80-260:85
+260:80-260:85
     [Type] -> Type
-Builtins.lc 260:80-260:88
+260:80-260:88
     Type
-Builtins.lc 260:80-260:119
+260:80-260:119
     Type
-Builtins.lc 260:86-260:88
+260:86-260:88
     [Type]
-Builtins.lc 260:92-260:107
+260:92-260:107
     PrimitiveType -> Type -> Type
-Builtins.lc 260:92-260:109
+260:92-260:109
     Type -> Type
-Builtins.lc 260:92-260:119
+260:92-260:119
     Type | Type
-Builtins.lc 260:108-260:109
+260:108-260:109
     _f
-Builtins.lc 260:111-260:116
+260:111-260:116
     [Type] -> Type
-Builtins.lc 260:111-260:118
+260:111-260:118
     Type
-Builtins.lc 260:117-260:118
+260:117-260:118
     [Type]
-Builtins.lc 262:1-262:6
+262:1-262:6
     forall (a :: PrimitiveType) (b :: [Type])
       . String -> HList b -> PrimitiveStream a (HList b)
-Builtins.lc 262:56-262:62
+262:56-262:62
     Type
-Builtins.lc 262:56-262:104
+262:56-262:104
     Type | Type
-Builtins.lc 262:66-262:71
+262:66-262:71
     [Type] -> Type
-Builtins.lc 262:66-262:73
+262:66-262:73
     Type
-Builtins.lc 262:66-262:104
+262:66-262:104
     Type
-Builtins.lc 262:72-262:73
+262:72-262:73
     _c
-Builtins.lc 262:77-262:92
+262:77-262:92
     PrimitiveType -> Type -> Type
-Builtins.lc 262:77-262:94
+262:77-262:94
     Type -> Type
-Builtins.lc 262:77-262:104
+262:77-262:104
     Type | Type
-Builtins.lc 262:93-262:94
+262:93-262:94
     _e
-Builtins.lc 262:96-262:101
+262:96-262:101
     [Type] -> Type
-Builtins.lc 262:96-262:103
+262:96-262:103
     Type
-Builtins.lc 262:102-262:103
+262:102-262:103
     [Type]
-Builtins.lc 264:1-264:10
+264:1-264:10
     forall a . String -> a
-Builtins.lc 264:14-264:20
+264:14-264:20
     Type
-Builtins.lc 264:14-264:25
+264:14-264:25
     Type
-Builtins.lc 264:24-264:25
+264:24-264:25
     _c | Type
-Builtins.lc 266:1-266:12
+266:1-266:12
     forall (a :: PrimitiveType) (b :: [Type])
       . String
         -> forall (c :: [String])
           -> (len c ~ (len b :: Int)) => PrimitiveStream a (HList b)
-Builtins.lc 266:31-266:37
+266:31-266:37
     Type
-Builtins.lc 266:31-266:123
+266:31-266:123
     Type
-Builtins.lc 266:32-266:36
+266:32-266:36
     Type
-Builtins.lc 266:41-266:47
+266:41-266:47
     Type
-Builtins.lc 266:41-266:123
+266:41-266:123
     Type
-Builtins.lc 266:51-266:123
+266:51-266:123
     Type
-Builtins.lc 266:65-266:73
+266:65-266:73
     Type
-Builtins.lc 266:66-266:72
+266:66-266:72
     Type
-Builtins.lc 266:78-266:81
+266:78-266:81
     forall a . [a] -> Int
-Builtins.lc 266:78-266:84
+266:78-266:84
     Int
-Builtins.lc 266:78-266:86
+266:78-266:86
     Int -> Constraint
-Builtins.lc 266:78-266:92
+266:78-266:92
     Constraint
-Builtins.lc 266:78-266:123
+266:78-266:123
     Type
-Builtins.lc 266:82-266:84
+266:82-266:84
     [String]
-Builtins.lc 266:85-266:86
+266:85-266:86
     forall a . a -> a -> Constraint
-Builtins.lc 266:87-266:90
+266:87-266:90
     forall a . [a] -> Int
-Builtins.lc 266:87-266:92
+266:87-266:92
     Int
-Builtins.lc 266:91-266:92
+266:91-266:92
     [Type]
-Builtins.lc 266:96-266:111
+266:96-266:111
     PrimitiveType -> Type -> Type
-Builtins.lc 266:96-266:113
+266:96-266:113
     Type -> Type
-Builtins.lc 266:96-266:123
+266:96-266:123
     Type | Type
-Builtins.lc 266:112-266:113
+266:112-266:113
     _f
-Builtins.lc 266:115-266:120
+266:115-266:120
     [Type] -> Type
-Builtins.lc 266:115-266:122
+266:115-266:122
     Type
-Builtins.lc 266:121-266:122
+266:121-266:122
     [Type]
-Builtins.lc 270:6-270:14
+270:6-270:14
     Nat -> Type -> Type
-Builtins.lc 270:21-270:27
+270:21-270:27
     Nat -> Type -> Type
-Builtins.lc 270:21-270:29
+270:21-270:29
     Type -> Type
-Builtins.lc 270:21-270:56
+270:21-270:56
     Type
-Builtins.lc 270:28-270:29
+270:28-270:29
     _d
-Builtins.lc 270:31-270:36
+270:31-270:36
     Type -> Type
-Builtins.lc 270:31-270:55
+270:31-270:55
     Type
-Builtins.lc 270:38-270:52
+270:38-270:52
     Type -> Type
-Builtins.lc 270:38-270:54
+270:38-270:54
     Type
-Builtins.lc 270:53-270:54
+270:53-270:54
     _b
-Builtins.lc 272:6-272:20
+272:6-272:20
     Type -> Type | Type -> Type | Type -> Type | Type -> Type | Type
-Builtins.lc 272:6-272:22
+272:6-272:22
     Type | Type
-Builtins.lc 272:6-272:39
+272:6-272:39
     Type | Type
-Builtins.lc 272:6-274:29
+272:6-274:29
     Type | Type
-Builtins.lc 272:21-272:22
+272:21-272:22
     Type
-Builtins.lc 272:25-272:39
+272:25-272:39
     forall a . Vec 3 Float -> a -> SimpleFragment a | SimpleFragment
       _d | Type | Type | Type
-Builtins.lc 273:7-273:22
+273:7-273:22
     forall a . SimpleFragment a -> VecS Float 3
-Builtins.lc 273:28-273:31
+273:28-273:31
     Nat -> Type -> Type
-Builtins.lc 273:28-273:33
+273:28-273:33
     Type -> Type
-Builtins.lc 273:28-273:39
+273:28-273:39
     Type
-Builtins.lc 273:32-273:33
+273:32-273:33
     _b
-Builtins.lc 273:34-273:39
+273:34-273:39
     Type
-Builtins.lc 274:7-274:21
+274:7-274:21
     forall a . SimpleFragment a -> a
-Builtins.lc 274:28-274:29
+274:28-274:29
     Type
-Builtins.lc 277:6-277:20
+277:6-277:20
     Nat -> Type -> Type
-Builtins.lc 277:27-277:41
+277:27-277:41
     Type
-Builtins.lc 277:28-277:36
+277:28-277:36
     Nat -> Type -> Type
-Builtins.lc 277:28-277:38
+277:28-277:38
     Type -> Type
-Builtins.lc 277:28-277:40
+277:28-277:40
     Type
-Builtins.lc 277:37-277:38
+277:37-277:38
     _d
-Builtins.lc 277:39-277:40
+277:39-277:40
     _b
-Builtins.lc 279:1-279:15
+279:1-279:15
     forall a (b :: Nat) . (a -> Float) -> Fragment b a -> Fragment b a
-Builtins.lc 279:19-279:63
+279:19-279:63
     Type | Type
-Builtins.lc 279:20-279:21
+279:20-279:21
     _d
-Builtins.lc 279:25-279:30
+279:25-279:30
     Type | Type
-Builtins.lc 279:35-279:43
+279:35-279:43
     Nat -> Type -> Type
-Builtins.lc 279:35-279:45
+279:35-279:45
     Type -> Type
-Builtins.lc 279:35-279:47
+279:35-279:47
     Type
-Builtins.lc 279:35-279:63
+279:35-279:63
     Type
-Builtins.lc 279:44-279:45
+279:44-279:45
     _c
-Builtins.lc 279:46-279:47
+279:46-279:47
     Type
-Builtins.lc 279:51-279:59
+279:51-279:59
     Nat -> Type -> Type
-Builtins.lc 279:51-279:61
+279:51-279:61
     Type -> Type
-Builtins.lc 279:51-279:63
+279:51-279:63
     Type | Type
-Builtins.lc 279:60-279:61
+279:60-279:61
     Nat
-Builtins.lc 279:62-279:63
+279:62-279:63
     Type
-Builtins.lc 281:20-281:76
+281:20-281:76
     Type | Type
-Builtins.lc 281:21-281:22
+281:21-281:22
     _d
-Builtins.lc 281:26-281:31
+281:26-281:31
     Type | Type
-Builtins.lc 281:36-281:50
+281:36-281:50
     Nat -> Type -> Type
-Builtins.lc 281:36-281:52
+281:36-281:52
     Type -> Type
-Builtins.lc 281:36-281:54
+281:36-281:54
     Type
-Builtins.lc 281:36-281:76
+281:36-281:76
     Type
-Builtins.lc 281:51-281:52
+281:51-281:52
     _c
-Builtins.lc 281:53-281:54
+281:53-281:54
     Type
-Builtins.lc 281:58-281:72
+281:58-281:72
     Nat -> Type -> Type
-Builtins.lc 281:58-281:74
+281:58-281:74
     Type -> Type
-Builtins.lc 281:58-281:76
+281:58-281:76
     Type | Type
-Builtins.lc 281:73-281:74
+281:73-281:74
     Nat
-Builtins.lc 281:75-281:76
+281:75-281:76
     Type
-Builtins.lc 282:1-282:16
+282:1-282:16
     forall a (b :: Nat)
       . (a -> Float)
         -> [Vector b (Maybe (SimpleFragment a))]
           -> [Vector b (Maybe (SimpleFragment a))]
-Builtins.lc 282:21-282:24
+282:21-282:24
     forall a b . (a -> b) -> [a] -> [b]
-Builtins.lc 282:21-282:43
+282:21-282:43
     [Vector _a (Maybe (SimpleFragment _d))]
       -> [Vector _a (Maybe (SimpleFragment _d))]
-Builtins.lc 282:26-282:40
+282:26-282:40
     forall a (b :: Nat) . (a -> Float) -> Fragment b a -> Fragment b a
-Builtins.lc 282:26-282:42
+282:26-282:42
     Fragment _a _f -> Fragment _a _f
-Builtins.lc 282:41-282:42
+282:41-282:42
     _g -> Float
-Builtins.lc 284:1-284:15
+284:1-284:15
     forall a (b :: Nat) . (a -> Bool) -> Fragment b a -> Fragment b a
-Builtins.lc 284:19-284:62
+284:19-284:62
     Type | Type
-Builtins.lc 284:20-284:21
+284:20-284:21
     _d
-Builtins.lc 284:25-284:29
+284:25-284:29
     Type | Type
-Builtins.lc 284:34-284:42
+284:34-284:42
     Nat -> Type -> Type
-Builtins.lc 284:34-284:44
+284:34-284:44
     Type -> Type
-Builtins.lc 284:34-284:46
+284:34-284:46
     Type
-Builtins.lc 284:34-284:62
+284:34-284:62
     Type
-Builtins.lc 284:43-284:44
+284:43-284:44
     _c
-Builtins.lc 284:45-284:46
+284:45-284:46
     Type
-Builtins.lc 284:50-284:58
+284:50-284:58
     Nat -> Type -> Type
-Builtins.lc 284:50-284:60
+284:50-284:60
     Type -> Type
-Builtins.lc 284:50-284:62
+284:50-284:62
     Type | Type
-Builtins.lc 284:59-284:60
+284:59-284:60
     Nat
-Builtins.lc 284:61-284:62
+284:61-284:62
     Type
-Builtins.lc 286:20-286:75
+286:20-286:75
     Type | Type
-Builtins.lc 286:21-286:22
+286:21-286:22
     _d
-Builtins.lc 286:26-286:30
+286:26-286:30
     Type | Type
-Builtins.lc 286:35-286:49
+286:35-286:49
     Nat -> Type -> Type
-Builtins.lc 286:35-286:51
+286:35-286:51
     Type -> Type
-Builtins.lc 286:35-286:53
+286:35-286:53
     Type
-Builtins.lc 286:35-286:75
+286:35-286:75
     Type
-Builtins.lc 286:50-286:51
+286:50-286:51
     _c
-Builtins.lc 286:52-286:53
+286:52-286:53
     Type
-Builtins.lc 286:57-286:71
+286:57-286:71
     Nat -> Type -> Type
-Builtins.lc 286:57-286:73
+286:57-286:73
     Type -> Type
-Builtins.lc 286:57-286:75
+286:57-286:75
     Type | Type
-Builtins.lc 286:72-286:73
+286:72-286:73
     Nat
-Builtins.lc 286:74-286:75
+286:74-286:75
     Type
-Builtins.lc 287:1-287:16
+287:1-287:16
     forall a (b :: Nat)
       . (a -> Bool)
         -> [Vector b (Maybe (SimpleFragment a))]
           -> [Vector b (Maybe (SimpleFragment a))]
-Builtins.lc 287:21-287:24
+287:21-287:24
     forall a b . (a -> b) -> [a] -> [b]
-Builtins.lc 287:21-287:43
+287:21-287:43
     [Vector _a (Maybe (SimpleFragment _d))]
       -> [Vector _a (Maybe (SimpleFragment _d))]
-Builtins.lc 287:26-287:40
+287:26-287:40
     forall a (b :: Nat) . (a -> Bool) -> Fragment b a -> Fragment b a
-Builtins.lc 287:26-287:42
+287:26-287:42
     Fragment _a _f -> Fragment _a _f
-Builtins.lc 287:41-287:42
+287:41-287:42
     _g -> Bool
-Builtins.lc 289:1-289:12
+289:1-289:12
     forall a b (c :: Nat) . (a -> b) -> Fragment c a -> Fragment c b
-Builtins.lc 289:16-289:56
+289:16-289:56
     Type | Type | Type
-Builtins.lc 289:17-289:18
+289:17-289:18
     _f
-Builtins.lc 289:22-289:23
+289:22-289:23
     _e | Type
-Builtins.lc 289:28-289:36
+289:28-289:36
     Nat -> Type -> Type
-Builtins.lc 289:28-289:38
+289:28-289:38
     Type -> Type
-Builtins.lc 289:28-289:40
+289:28-289:40
     Type
-Builtins.lc 289:28-289:56
+289:28-289:56
     Type
-Builtins.lc 289:37-289:38
+289:37-289:38
     _c
-Builtins.lc 289:39-289:40
+289:39-289:40
     Type
-Builtins.lc 289:44-289:52
+289:44-289:52
     Nat -> Type -> Type
-Builtins.lc 289:44-289:54
+289:44-289:54
     Type -> Type
-Builtins.lc 289:44-289:56
+289:44-289:56
     Type | Type
-Builtins.lc 289:53-289:54
+289:53-289:54
     Nat
-Builtins.lc 289:55-289:56
+289:55-289:56
     Type
-Builtins.lc 291:17-291:69
+291:17-291:69
     Type | Type | Type
-Builtins.lc 291:18-291:19
+291:18-291:19
     _f
-Builtins.lc 291:23-291:24
+291:23-291:24
     _e | Type
-Builtins.lc 291:29-291:43
+291:29-291:43
     Nat -> Type -> Type
-Builtins.lc 291:29-291:45
+291:29-291:45
     Type -> Type
-Builtins.lc 291:29-291:47
+291:29-291:47
     Type
-Builtins.lc 291:29-291:69
+291:29-291:69
     Type
-Builtins.lc 291:44-291:45
+291:44-291:45
     _c
-Builtins.lc 291:46-291:47
+291:46-291:47
     Type
-Builtins.lc 291:51-291:65
+291:51-291:65
     Nat -> Type -> Type
-Builtins.lc 291:51-291:67
+291:51-291:67
     Type -> Type
-Builtins.lc 291:51-291:69
+291:51-291:69
     Type | Type
-Builtins.lc 291:66-291:67
+291:66-291:67
     Nat
-Builtins.lc 291:68-291:69
+291:68-291:69
     Type
-Builtins.lc 292:1-292:13
+292:1-292:13
     forall a b (c :: Nat)
       . (a -> b)
         -> [Vector c (Maybe (SimpleFragment a))]
           -> [Vector c (Maybe (SimpleFragment b))]
-Builtins.lc 292:18-292:21
+292:18-292:21
     forall a b . (a -> b) -> [a] -> [b]
-Builtins.lc 292:18-292:37
+292:18-292:37
     [Vector _a (Maybe (SimpleFragment _e))]
       -> [Vector _a (Maybe (SimpleFragment _d))]
-Builtins.lc 292:23-292:34
+292:23-292:34
     forall a b (c :: Nat) . (a -> b) -> Fragment c a -> Fragment c b
-Builtins.lc 292:23-292:36
+292:23-292:36
     Fragment _a _g -> Fragment _a _f
-Builtins.lc 292:35-292:36
+292:35-292:36
     _i -> _h
-Builtins.lc 296:6-296:15
+296:6-296:15
     Type | Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 296:6-299:14
+296:6-299:14
     Type | Type | Type
-Builtins.lc 297:7-297:12
+297:7-297:12
     Type -> ImageKind | ImageKind | Type | Type
-Builtins.lc 297:13-297:17
+297:13-297:17
     Type
-Builtins.lc 298:7-298:12
+298:7-298:12
     ImageKind
-Builtins.lc 299:7-299:14
+299:7-299:14
     ImageKind
-Builtins.lc 301:14-301:23
+301:14-301:23
     Type
-Builtins.lc 301:27-301:31
+301:27-301:31
     Type | Type
-Builtins.lc 302:1-302:10
+302:1-302:10
     ImageKind -> Type
-Builtins.lc 302:23-302:24
+302:23-302:24
     Type
-Builtins.lc 302:23-303:25
+302:23-303:25
     Type -> ImageKind -> Type
-Builtins.lc 302:23-304:25
+302:23-304:25
     ImageKind -> Type | Type
-Builtins.lc 303:19-303:25
+303:19-303:25
     Type
-Builtins.lc 304:21-304:25
+304:21-304:25
     Type
-Builtins.lc 306:6-306:11
+306:6-306:11
     Nat -> ImageKind -> Type | Nat -> ImageKind -> Type | Nat
       -> ImageKind -> Type | Type | Type
-Builtins.lc 306:6-306:38
+306:6-306:38
     Type
-Builtins.lc 306:18-306:21
+306:18-306:21
     Type | Type
-Builtins.lc 306:29-306:38
+306:29-306:38
     Type | Type | Type
-Builtins.lc 308:1-308:11
+308:1-308:11
     forall (a :: Nat) (b :: Nat) c d
       . (Num c, d ~ VecScalar b c) => d -> Image a ('Color d)
-Builtins.lc 308:45-309:55
+308:45-309:55
     Type | Type | Type | Type
-Builtins.lc 308:46-308:49
+308:46-308:49
     Type -> Constraint
-Builtins.lc 308:46-308:51
+308:46-308:51
     Constraint
-Builtins.lc 308:50-308:51
+308:50-308:51
     _d
-Builtins.lc 308:53-308:58
+308:53-308:58
     _d
-Builtins.lc 308:53-308:60
+308:53-308:60
     _c -> Constraint
-Builtins.lc 308:53-308:74
+308:53-308:74
     Constraint
-Builtins.lc 308:53-309:55
+308:53-309:55
     Type
-Builtins.lc 308:59-308:60
+308:59-308:60
     forall a . a -> a -> Constraint
-Builtins.lc 308:61-308:70
+308:61-308:70
     Nat -> Type -> Type
-Builtins.lc 308:61-308:72
+308:61-308:72
     Type -> Type
-Builtins.lc 308:61-308:74
+308:61-308:74
     Type
-Builtins.lc 308:71-308:72
+308:71-308:72
     _f
-Builtins.lc 308:73-308:74
+308:73-308:74
     Type
-Builtins.lc 309:24-309:29
+309:24-309:29
     Type
-Builtins.lc 309:24-309:55
+309:24-309:55
     Type
-Builtins.lc 309:34-309:39
+309:34-309:39
     Nat -> ImageKind -> Type
-Builtins.lc 309:34-309:41
+309:34-309:41
     ImageKind -> Type
-Builtins.lc 309:34-309:55
+309:34-309:55
     Type | Type
-Builtins.lc 309:40-309:41
+309:40-309:41
     _h
-Builtins.lc 309:43-309:48
+309:43-309:48
     Type -> ImageKind
-Builtins.lc 309:43-309:54
+309:43-309:54
     ImageKind
-Builtins.lc 309:49-309:54
+309:49-309:54
     Type
-Builtins.lc 310:1-310:11
+310:1-310:11
     forall (a :: Nat) . Float -> Image a 'Depth
-Builtins.lc 310:35-310:40
+310:35-310:40
     Type
-Builtins.lc 310:35-310:58
+310:35-310:58
     Type
-Builtins.lc 310:45-310:50
+310:45-310:50
     Nat -> ImageKind -> Type
-Builtins.lc 310:45-310:52
+310:45-310:52
     ImageKind -> Type
-Builtins.lc 310:45-310:58
+310:45-310:58
     Type | Type
-Builtins.lc 310:51-310:52
+310:51-310:52
     _c
-Builtins.lc 310:53-310:58
+310:53-310:58
     ImageKind
-Builtins.lc 311:1-311:13
+311:1-311:13
     forall (a :: Nat) . Int -> Image a 'Stencil
-Builtins.lc 311:35-311:38
+311:35-311:38
     Type
-Builtins.lc 311:35-311:60
+311:35-311:60
     Type
-Builtins.lc 311:45-311:50
+311:45-311:50
     Nat -> ImageKind -> Type
-Builtins.lc 311:45-311:52
+311:45-311:52
     ImageKind -> Type
-Builtins.lc 311:45-311:60
+311:45-311:60
     Type | Type
-Builtins.lc 311:51-311:52
+311:51-311:52
     _c
-Builtins.lc 311:53-311:60
+311:53-311:60
     ImageKind
-Builtins.lc 313:1-313:16
+313:1-313:16
     Float -> Image 1 'Depth
-Builtins.lc 313:19-313:29
+313:19-313:29
     forall (a :: Nat) . Float -> Image a 'Depth
-Builtins.lc 313:19-313:32
+313:19-313:32
     Float -> Image 1 'Depth
-Builtins.lc 313:31-313:32
+313:31-313:32
     _b
-Builtins.lc 314:1-314:16
+314:1-314:16
     forall (a :: Nat) b c . (Num b, c ~ VecScalar a b) => c -> Image 1 ('Color c)
-Builtins.lc 314:19-314:29
+314:19-314:29
     forall (a :: Nat) (b :: Nat) c d
       . (Num c, d ~ VecScalar b c) => d -> Image a ('Color d)
-Builtins.lc 314:19-314:32
+314:19-314:32
     forall (a :: Nat) b c . (Num b, c ~ VecScalar a b) => c -> Image 1 ('Color c)
-Builtins.lc 314:31-314:32
+314:31-314:32
     _b
-Builtins.lc 321:6-321:11
+321:6-321:11
     Type | Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 321:6-321:31
+321:6-321:31
     Type | Type | Type | Type
-Builtins.lc 321:14-321:16
+321:14-321:16
     Swizz
-Builtins.lc 321:19-321:21
+321:19-321:21
     Swizz
-Builtins.lc 321:24-321:26
+321:24-321:26
     Swizz
-Builtins.lc 321:29-321:31
+321:29-321:31
     Swizz
-Builtins.lc 339:16-339:48
+339:16-339:48
     Type
-Builtins.lc 339:27-339:30
+339:27-339:30
     Nat -> Type -> Type
-Builtins.lc 339:27-339:32
+339:27-339:32
     Type -> Type
-Builtins.lc 339:27-339:34
+339:27-339:34
     Type
-Builtins.lc 339:27-339:48
+339:27-339:48
     Type
-Builtins.lc 339:31-339:32
+339:31-339:32
     _b
-Builtins.lc 339:33-339:34
+339:33-339:34
     _c
-Builtins.lc 339:38-339:43
+339:38-339:43
     Type
-Builtins.lc 339:38-339:48
+339:38-339:48
     Type
-Builtins.lc 339:47-339:48
+339:47-339:48
     Type | Type
-Builtins.lc 340:1-340:12
+340:1-340:12
     forall a (b :: Nat) . Vec b a -> Swizz -> a
-Builtins.lc 340:27-340:28
+340:27-340:28
     _e
-Builtins.lc 340:27-341:28
+340:27-341:28
     _d -> _d -> Swizz -> _d | _c
-Builtins.lc 340:27-344:30
+340:27-344:30
     (forall (a :: _a) (b :: _a) (c :: _a) -> _a -> _a)
       -> forall (d :: Nat) . VecS _a d -> _a
-Builtins.lc 340:27-348:32
+340:27-348:32
     forall (a :: Nat) . VecS _a a -> _a | _d
-Builtins.lc 341:27-341:28
+341:27-341:28
     _d
-Builtins.lc 342:29-342:30
+342:29-342:30
     _e
-Builtins.lc 342:29-343:30
+342:29-343:30
     _d -> _d -> Swizz -> _d
-Builtins.lc 342:29-344:30
+342:29-344:30
     _d -> Swizz -> _d | _d
-Builtins.lc 343:29-343:30
+343:29-343:30
     _d
-Builtins.lc 344:29-344:30
+344:29-344:30
     _d
-Builtins.lc 345:31-345:32
+345:31-345:32
     _f
-Builtins.lc 345:31-346:32
+345:31-346:32
     _e -> _e -> Swizz -> _e
-Builtins.lc 345:31-347:32
+345:31-347:32
     _e -> Swizz -> _e
-Builtins.lc 345:31-348:32
+345:31-348:32
     Swizz -> _e | _e
-Builtins.lc 346:31-346:32
+346:31-346:32
     _e
-Builtins.lc 347:31-347:32
+347:31-347:32
     _e
-Builtins.lc 348:31-348:32
+348:31-348:32
     _e
-Builtins.lc 351:28-351:31
+351:28-351:31
     Nat -> Type -> Type
-Builtins.lc 351:28-351:33
+351:28-351:33
     Type -> Type
-Builtins.lc 351:28-351:35
+351:28-351:35
     Type
-Builtins.lc 351:28-351:43
+351:28-351:43
     Type | Type
-Builtins.lc 351:32-351:33
+351:32-351:33
     _b
-Builtins.lc 351:34-351:35
+351:34-351:35
     _c
-Builtins.lc 351:39-351:43
+351:39-351:43
     Type | Type
-Builtins.lc 352:1-352:11
+352:1-352:11
     forall a (b :: Nat) . Vec b a -> Bool
-Builtins.lc 352:23-352:27
+352:23-352:27
     Bool
-Builtins.lc 352:23-353:29
+352:23-353:29
     (forall (a :: _a) (b :: _a) (c :: _a) -> _a -> Bool)
       -> forall (d :: Nat) . VecS _a d -> Bool
-Builtins.lc 352:23-354:31
+352:23-354:31
     forall (a :: Nat) . VecS _a a -> Bool | Bool
-Builtins.lc 353:25-353:29
+353:25-353:29
     Bool
-Builtins.lc 354:27-354:31
+354:27-354:31
     Bool
-Builtins.lc 356:16-356:71
+356:16-356:71
     Type
-Builtins.lc 356:27-356:71
+356:27-356:71
     Type
-Builtins.lc 356:38-356:41
+356:38-356:41
     Nat -> Type -> Type
-Builtins.lc 356:38-356:43
+356:38-356:43
     Type -> Type
-Builtins.lc 356:38-356:45
+356:38-356:45
     Type
-Builtins.lc 356:38-356:71
+356:38-356:71
     Type
-Builtins.lc 356:42-356:43
+356:42-356:43
     _d
-Builtins.lc 356:44-356:45
+356:44-356:45
     _e
-Builtins.lc 356:49-356:52
+356:49-356:52
     Nat -> Type -> Type
-Builtins.lc 356:49-356:54
+356:49-356:54
     Type -> Type
-Builtins.lc 356:49-356:60
+356:49-356:60
     Type
-Builtins.lc 356:49-356:71
+356:49-356:71
     Type
-Builtins.lc 356:53-356:54
+356:53-356:54
     _c
-Builtins.lc 356:55-356:60
+356:55-356:60
     Type
-Builtins.lc 356:64-356:67
+356:64-356:67
     Nat -> Type -> Type
-Builtins.lc 356:64-356:69
+356:64-356:69
     Type -> Type
-Builtins.lc 356:64-356:71
+356:64-356:71
     Type | Type
-Builtins.lc 356:68-356:69
+356:68-356:69
     Nat
-Builtins.lc 356:70-356:71
+356:70-356:71
     Type
-Builtins.lc 357:1-357:12
+357:1-357:12
     forall a (b :: Nat) (c :: Nat) . Vec b a -> Vec c Swizz -> VecS a c
-Builtins.lc 357:19-357:29
+357:19-357:29
     forall a (b :: Nat) . Vec b a -> Bool
-Builtins.lc 357:19-357:31
+357:19-357:31
     Bool
-Builtins.lc 357:19-357:58
+357:19-357:58
     VecS _e _c
-Builtins.lc 357:30-357:31
+357:30-357:31
     Vec _f _g
-Builtins.lc 357:34-357:40
+357:34-357:40
     forall a b (c :: Nat) . (a -> b) -> VecS a c -> VecS b c
-Builtins.lc 357:34-357:56
+357:34-357:56
     VecS Swizz _a -> VecS _g _a
-Builtins.lc 357:34-357:58
+357:34-357:58
     VecS _e _c
-Builtins.lc 357:42-357:53
+357:42-357:53
     forall a (b :: Nat) . Vec b a -> Swizz -> a
-Builtins.lc 357:42-357:55
+357:42-357:55
     Swizz -> _i
-Builtins.lc 357:54-357:55
+357:54-357:55
     Vec _j _k
-Builtins.lc 357:57-357:58
+357:57-357:58
     Vec _d Swizz
-Builtins.lc 361:6-361:20
+361:6-361:20
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 361:6-376:23
+361:6-376:23
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 362:7-362:13
+362:7-362:13
     BlendingFactor
-Builtins.lc 363:7-363:12
+363:7-363:12
     BlendingFactor
-Builtins.lc 364:7-364:15
+364:7-364:15
     BlendingFactor
-Builtins.lc 365:7-365:23
+365:7-365:23
     BlendingFactor
-Builtins.lc 366:7-366:15
+366:7-366:15
     BlendingFactor
-Builtins.lc 367:7-367:23
+367:7-367:23
     BlendingFactor
-Builtins.lc 368:7-368:15
+368:7-368:15
     BlendingFactor
-Builtins.lc 369:7-369:23
+369:7-369:23
     BlendingFactor
-Builtins.lc 370:7-370:15
+370:7-370:15
     BlendingFactor
-Builtins.lc 371:7-371:23
+371:7-371:23
     BlendingFactor
-Builtins.lc 372:7-372:20
+372:7-372:20
     BlendingFactor
-Builtins.lc 373:7-373:28
+373:7-373:28
     BlendingFactor
-Builtins.lc 374:7-374:20
+374:7-374:20
     BlendingFactor
-Builtins.lc 375:7-375:28
+375:7-375:28
     BlendingFactor
-Builtins.lc 376:7-376:23
+376:7-376:23
     BlendingFactor
-Builtins.lc 378:6-378:19
+378:6-378:19
     Type | Type | Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 378:6-383:10
+378:6-383:10
     Type | Type | Type | Type | Type
-Builtins.lc 379:7-379:14
+379:7-379:14
     BlendEquation
-Builtins.lc 380:7-380:19
+380:7-380:19
     BlendEquation
-Builtins.lc 381:7-381:26
+381:7-381:26
     BlendEquation
-Builtins.lc 382:7-382:10
+382:7-382:10
     BlendEquation
-Builtins.lc 383:7-383:10
+383:7-383:10
     BlendEquation
-Builtins.lc 385:6-385:20
+385:6-385:20
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 385:6-401:10
+385:6-401:10
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 386:7-386:12
+386:7-386:12
     LogicOperation
-Builtins.lc 387:7-387:10
+387:7-387:10
     LogicOperation
-Builtins.lc 388:7-388:17
+388:7-388:17
     LogicOperation
-Builtins.lc 389:7-389:11
+389:7-389:11
     LogicOperation
-Builtins.lc 390:7-390:18
+390:7-390:18
     LogicOperation
-Builtins.lc 391:7-391:11
+391:7-391:11
     LogicOperation
-Builtins.lc 392:7-392:10
+392:7-392:10
     LogicOperation
-Builtins.lc 393:7-393:9
+393:7-393:9
     LogicOperation
-Builtins.lc 394:7-394:10
+394:7-394:10
     LogicOperation
-Builtins.lc 395:7-395:12
+395:7-395:12
     LogicOperation
-Builtins.lc 396:7-396:13
+396:7-396:13
     LogicOperation
-Builtins.lc 397:7-397:16
+397:7-397:16
     LogicOperation
-Builtins.lc 398:7-398:19
+398:7-398:19
     LogicOperation
-Builtins.lc 399:7-399:17
+399:7-399:17
     LogicOperation
-Builtins.lc 400:7-400:11
+400:7-400:11
     LogicOperation
-Builtins.lc 401:7-401:10
+401:7-401:10
     LogicOperation
-Builtins.lc 403:6-403:22
+403:6-403:22
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 403:6-411:15
+403:6-411:15
     Type | Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 404:7-404:13
+404:7-404:13
     StencilOperation
-Builtins.lc 405:7-405:13
+405:7-405:13
     StencilOperation
-Builtins.lc 406:7-406:16
+406:7-406:16
     StencilOperation
-Builtins.lc 407:7-407:13
+407:7-407:13
     StencilOperation
-Builtins.lc 408:7-408:17
+408:7-408:17
     StencilOperation
-Builtins.lc 409:7-409:13
+409:7-409:13
     StencilOperation
-Builtins.lc 410:7-410:17
+410:7-410:17
     StencilOperation
-Builtins.lc 411:7-411:15
+411:7-411:15
     StencilOperation
-Builtins.lc 413:6-413:24
+413:6-413:24
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 413:6-421:13
+413:6-421:13
     Type | Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 414:7-414:12
+414:7-414:12
     ComparisonFunction
-Builtins.lc 415:7-415:11
+415:7-415:11
     ComparisonFunction
-Builtins.lc 416:7-416:12
+416:7-416:12
     ComparisonFunction
-Builtins.lc 417:7-417:13
+417:7-417:13
     ComparisonFunction
-Builtins.lc 418:7-418:14
+418:7-418:14
     ComparisonFunction
-Builtins.lc 419:7-419:15
+419:7-419:15
     ComparisonFunction
-Builtins.lc 420:7-420:13
+420:7-420:13
     ComparisonFunction
-Builtins.lc 421:7-421:13
+421:7-421:13
     ComparisonFunction
-Builtins.lc 423:6-423:21
+423:6-423:21
     Type | Type | Type | Type | Type | Type
-Builtins.lc 423:6-425:18
+423:6-425:18
     Type | Type
-Builtins.lc 424:7-424:17
+424:7-424:17
     ProvokingVertex
-Builtins.lc 425:7-425:18
+425:7-425:18
     ProvokingVertex
-Builtins.lc 427:6-427:14
+427:6-427:14
     Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 427:6-430:15
+427:6-430:15
     Type | Type | Type
-Builtins.lc 428:7-428:16
+428:7-428:16
     CullMode
-Builtins.lc 429:7-429:15
+429:7-429:15
     CullMode
-Builtins.lc 430:7-430:15
+430:7-430:15
     CullMode
-Builtins.lc 432:6-432:15
+432:6-432:15
     Type -> Type | Type -> Type | Type -> Type | Type -> Type | Type -> Type | Type
-Builtins.lc 432:6-432:17
+432:6-432:17
     Type | Type | Type | Type
-Builtins.lc 432:6-433:22
+432:6-433:22
     Type
-Builtins.lc 432:6-434:23
+432:6-434:23
     Type | Type | Type
-Builtins.lc 432:6-434:36
+432:6-434:36
     Type
-Builtins.lc 432:16-432:17
+432:16-432:17
     Type | Type
-Builtins.lc 433:7-433:16
+433:7-433:16
     forall a . Float -> PointSize a | PointSize _c | Type | Type
-Builtins.lc 433:17-433:22
+433:17-433:22
     Type
-Builtins.lc 434:7-434:23
+434:7-434:23
     forall a . (a -> Float) -> PointSize a | PointSize _d | Type | Type
-Builtins.lc 434:25-434:26
+434:25-434:26
     Type
-Builtins.lc 434:30-434:35
+434:30-434:35
     Type | Type
-Builtins.lc 436:6-436:17
+436:6-436:17
     Type -> Type | Type -> Type | Type -> Type | Type -> Type | Type -> Type | Type
       -> Type | Type
-Builtins.lc 436:6-436:19
+436:6-436:19
     Type | Type | Type | Type | Type | Type
-Builtins.lc 436:6-438:33
+436:6-438:33
     Type
-Builtins.lc 436:6-439:18
+436:6-439:18
     Type | Type | Type | Type
-Builtins.lc 436:6-439:24
+436:6-439:24
     Type
-Builtins.lc 436:18-436:19
+436:18-436:19
     Type | Type | Type
-Builtins.lc 437:7-437:18
+437:7-437:18
     forall a . PolygonMode a | PolygonMode _b
-Builtins.lc 438:7-438:19
+438:7-438:19
     forall a . PointSize a -> PolygonMode a | PolygonMode _d | Type | Type
-Builtins.lc 438:21-438:30
+438:21-438:30
     Type -> Type
-Builtins.lc 438:21-438:32
+438:21-438:32
     Type
-Builtins.lc 438:31-438:32
+438:31-438:32
     Type
-Builtins.lc 439:7-439:18
+439:7-439:18
     forall a . Float -> PolygonMode a | PolygonMode _e | Type | Type
-Builtins.lc 439:19-439:24
+439:19-439:24
     Type
-Builtins.lc 441:6-441:19
+441:6-441:19
     Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 441:6-443:13
+441:6-443:13
     Type | Type
-Builtins.lc 441:6-443:25
+441:6-443:25
     Type
-Builtins.lc 442:7-442:15
+442:7-442:15
     PolygonOffset
-Builtins.lc 443:7-443:13
+443:7-443:13
     Float -> Float -> PolygonOffset | PolygonOffset | Type | Type | Type
-Builtins.lc 443:14-443:19
+443:14-443:19
     Type
-Builtins.lc 443:20-443:25
+443:20-443:25
     Type
-Builtins.lc 445:6-445:28
+445:6-445:28
     Type | Type | Type | Type | Type | Type
-Builtins.lc 445:6-447:16
+445:6-447:16
     Type | Type
-Builtins.lc 446:7-446:16
+446:7-446:16
     PointSpriteCoordOrigin
-Builtins.lc 447:7-447:16
+447:7-447:16
     PointSpriteCoordOrigin
-Builtins.lc 450:1-450:12
+450:1-450:12
     () -> Vec 2 Float -> Vec 4 Float
-Builtins.lc 450:16-450:18
+450:16-450:18
     Type
-Builtins.lc 450:22-450:25
+450:22-450:25
     Nat -> Type -> Type
-Builtins.lc 450:22-450:27
+450:22-450:27
     Type -> Type
-Builtins.lc 450:22-450:33
+450:22-450:33
     Type
-Builtins.lc 450:22-450:48
+450:22-450:48
     Type
-Builtins.lc 450:26-450:27
+450:26-450:27
     _b
-Builtins.lc 450:28-450:33
+450:28-450:33
     Type
-Builtins.lc 450:37-450:40
+450:37-450:40
     Nat -> Type -> Type
-Builtins.lc 450:37-450:42
+450:37-450:42
     Type -> Type
-Builtins.lc 450:37-450:48
+450:37-450:48
     Type | Type
-Builtins.lc 450:41-450:42
+450:41-450:42
     _b
-Builtins.lc 450:43-450:48
+450:43-450:48
     Type
-Builtins.lc 453:1-453:8
+453:1-453:8
     forall a . String -> a
-Builtins.lc 453:14-453:20
+453:14-453:20
     Type
-Builtins.lc 453:14-453:25
+453:14-453:25
     Type
-Builtins.lc 453:24-453:25
+453:24-453:25
     _c | Type
-Builtins.lc 455:6-455:19
+455:6-455:19
     Type -> PrimitiveType -> Type | Type -> PrimitiveType -> Type | Type | Type
       -> PrimitiveType -> Type | Type | Type
-Builtins.lc 455:6-458:111
+455:6-458:111
     Type | Type | Type | Type
-Builtins.lc 455:25-455:38
+455:25-455:38
     Type
-Builtins.lc 455:25-455:46
+455:25-455:46
     Type
-Builtins.lc 455:42-455:46
+455:42-455:46
     Type | Type
-Builtins.lc 456:3-456:14
+456:3-456:14
     forall a
       . CullMode
         -> PolygonMode a
           -> PolygonOffset -> ProvokingVertex -> RasterContext a 'Triangle | RasterContext
       _f
       'Triangle
-Builtins.lc 456:3-456:115
+456:3-456:115
     Type | Type | Type | Type | Type
-Builtins.lc 456:26-456:34
+456:26-456:34
     Type
-Builtins.lc 456:26-456:115
+456:26-456:115
     Type
-Builtins.lc 456:38-456:49
+456:38-456:49
     Type -> Type
-Builtins.lc 456:38-456:51
+456:38-456:51
     Type
-Builtins.lc 456:38-456:115
+456:38-456:115
     Type
-Builtins.lc 456:50-456:51
+456:50-456:51
     Type
-Builtins.lc 456:55-456:68
+456:55-456:68
     Type
-Builtins.lc 456:55-456:115
+456:55-456:115
     Type
-Builtins.lc 456:72-456:87
+456:72-456:87
     Type
-Builtins.lc 456:72-456:115
+456:72-456:115
     Type
-Builtins.lc 456:91-456:104
+456:91-456:104
     Type -> PrimitiveType -> Type
-Builtins.lc 456:91-456:106
+456:91-456:106
     PrimitiveType -> Type
-Builtins.lc 456:91-456:115
+456:91-456:115
     Type | Type
-Builtins.lc 456:105-456:106
+456:105-456:106
     Type
-Builtins.lc 456:107-456:115
+456:107-456:115
     PrimitiveType | PrimitiveType
-Builtins.lc 457:3-457:11
+457:3-457:11
     forall a
       . PointSize a
         -> Float -> PointSpriteCoordOrigin -> RasterContext a 'Point | RasterContext
       _f
       'Point
-Builtins.lc 457:3-457:112
+457:3-457:112
     Type | Type | Type | Type
-Builtins.lc 457:26-457:35
+457:26-457:35
     Type -> Type
-Builtins.lc 457:26-457:37
+457:26-457:37
     Type
-Builtins.lc 457:26-457:112
+457:26-457:112
     Type
-Builtins.lc 457:36-457:37
+457:36-457:37
     Type
-Builtins.lc 457:41-457:46
+457:41-457:46
     Type
-Builtins.lc 457:41-457:112
+457:41-457:112
     Type
-Builtins.lc 457:50-457:72
+457:50-457:72
     Type
-Builtins.lc 457:50-457:112
+457:50-457:112
     Type
-Builtins.lc 457:91-457:104
+457:91-457:104
     Type -> PrimitiveType -> Type
-Builtins.lc 457:91-457:106
+457:91-457:106
     PrimitiveType -> Type
-Builtins.lc 457:91-457:112
+457:91-457:112
     Type | Type
-Builtins.lc 457:105-457:106
+457:105-457:106
     Type
-Builtins.lc 457:107-457:112
+457:107-457:112
     PrimitiveType | PrimitiveType
-Builtins.lc 458:3-458:10
+458:3-458:10
     forall a . Float -> ProvokingVertex -> RasterContext a 'Line | RasterContext
       _f
       'Line
-Builtins.lc 458:3-458:111
+458:3-458:111
     Type | Type | Type
-Builtins.lc 458:26-458:31
+458:26-458:31
     Type
-Builtins.lc 458:26-458:111
+458:26-458:111
     Type
-Builtins.lc 458:35-458:50
+458:35-458:50
     Type
-Builtins.lc 458:35-458:111
+458:35-458:111
     Type
-Builtins.lc 458:91-458:104
+458:91-458:104
     Type -> PrimitiveType -> Type
-Builtins.lc 458:91-458:106
+458:91-458:106
     PrimitiveType -> Type
-Builtins.lc 458:91-458:111
+458:91-458:111
     Type | Type
-Builtins.lc 458:105-458:106
+458:105-458:106
     Type
-Builtins.lc 458:107-458:111
+458:107-458:111
     PrimitiveType | PrimitiveType
-Builtins.lc 460:6-460:14
+460:6-460:14
     Type -> Type | Type -> Type | Type | Type -> Type | Type | Type
-Builtins.lc 460:6-465:74
+460:6-465:74
     Type | Type | Type
-Builtins.lc 460:18-460:22
+460:18-460:22
     Type
-Builtins.lc 460:26-460:30
+460:26-460:30
     Type | Type
-Builtins.lc 461:3-461:13
+461:3-461:13
     forall a . Blending a | Blending _a
-Builtins.lc 461:3-461:70
+461:3-461:70
     Type | Type
-Builtins.lc 461:60-461:68
+461:60-461:68
     Type -> Type
-Builtins.lc 461:60-461:70
+461:60-461:70
     Type | Type
-Builtins.lc 461:69-461:70
+461:69-461:70
     _b | Type
-Builtins.lc 462:3-462:15
+462:3-462:15
     forall a . Integral a => LogicOperation -> Blending a | Blending _c
-Builtins.lc 462:3-462:70
+462:3-462:70
     Type | Type | Type | Type
-Builtins.lc 462:26-462:70
+462:26-462:70
     Type
-Builtins.lc 462:27-462:35
+462:27-462:35
     Type -> Constraint
-Builtins.lc 462:27-462:37
+462:27-462:37
     Constraint
-Builtins.lc 462:36-462:37
+462:36-462:37
     _b
-Builtins.lc 462:42-462:56
+462:42-462:56
     Type
-Builtins.lc 462:42-462:70
+462:42-462:70
     Type
-Builtins.lc 462:60-462:68
+462:60-462:68
     Type -> Type
-Builtins.lc 462:60-462:70
+462:60-462:70
     Type | Type
-Builtins.lc 462:69-462:70
+462:69-462:70
     Type | Type
-Builtins.lc 463:3-463:8
+463:3-463:8
     (BlendEquation, BlendEquation)
       -> ((BlendingFactor, BlendingFactor), (BlendingFactor, BlendingFactor))
         -> Vec 4 Float -> Blending Float | Blending Float
-Builtins.lc 463:3-465:74
+463:3-465:74
     Type | Type | Type | Type
-Builtins.lc 463:26-463:56
+463:26-463:56
     Type
-Builtins.lc 463:27-463:40
+463:27-463:40
     Type
-Builtins.lc 463:27-463:55
+463:27-463:55
     [Type]
-Builtins.lc 463:42-463:55
+463:42-463:55
     Type | [Type]
-Builtins.lc 464:29-464:97
+464:29-464:97
     Type
-Builtins.lc 464:29-465:74
+464:29-465:74
     Type
-Builtins.lc 464:30-464:62
+464:30-464:62
     Type
-Builtins.lc 464:30-464:96
+464:30-464:96
     [Type]
-Builtins.lc 464:31-464:45
+464:31-464:45
     Type
-Builtins.lc 464:31-464:61
+464:31-464:61
     [Type]
-Builtins.lc 464:47-464:61
+464:47-464:61
     Type | [Type]
-Builtins.lc 464:64-464:96
+464:64-464:96
     Type | [Type]
-Builtins.lc 464:65-464:79
+464:65-464:79
     Type
-Builtins.lc 464:65-464:95
+464:65-464:95
     [Type]
-Builtins.lc 464:81-464:95
+464:81-464:95
     Type | [Type]
-Builtins.lc 465:29-465:32
+465:29-465:32
     Nat -> Type -> Type
-Builtins.lc 465:29-465:34
+465:29-465:34
     Type -> Type
-Builtins.lc 465:29-465:40
+465:29-465:40
     Type
-Builtins.lc 465:29-465:74
+465:29-465:74
     Type
-Builtins.lc 465:33-465:34
+465:33-465:34
     _b
-Builtins.lc 465:35-465:40
+465:35-465:40
     Type
-Builtins.lc 465:60-465:68
+465:60-465:68
     Type -> Type
-Builtins.lc 465:60-465:74
+465:60-465:74
     Type | Type
-Builtins.lc 465:69-465:74
+465:69-465:74
     Type | Type
-Builtins.lc 467:6-467:18
+467:6-467:18
     Type | Type | Type | Type
-Builtins.lc 468:6-468:16
+468:6-468:16
     Type | Type | Type | Type
-Builtins.lc 470:6-470:23
+470:6-470:23
     ImageKind -> Type | ImageKind -> Type | Type | ImageKind -> Type | Type | Type
-Builtins.lc 470:6-473:96
+470:6-473:96
     Type | Type | Type
-Builtins.lc 470:27-470:36
+470:27-470:36
     Type
-Builtins.lc 470:40-470:44
+470:40-470:44
     Type | Type
-Builtins.lc 471:3-471:10
+471:3-471:10
     forall a (b :: Nat)
       . Num a
         => Blending a
           -> VecScalar b Bool
             -> FragmentOperation ('Color (VecScalar b a)) | FragmentOperation
       ('Color (VecScalar _d _e))
-Builtins.lc 471:3-471:112
+471:3-471:112
     Type | Type | Type | Type | Type | Type
-Builtins.lc 471:26-471:29
+471:26-471:29
     Type -> Constraint
-Builtins.lc 471:26-471:31
+471:26-471:31
     Constraint
-Builtins.lc 471:26-471:112
+471:26-471:112
     Type | Type
-Builtins.lc 471:30-471:31
+471:30-471:31
     _d
-Builtins.lc 471:35-471:43
+471:35-471:43
     Type -> Type
-Builtins.lc 471:35-471:45
+471:35-471:45
     Type
-Builtins.lc 471:35-471:112
+471:35-471:112
     Type
-Builtins.lc 471:44-471:45
+471:44-471:45
     Type
-Builtins.lc 471:49-471:58
+471:49-471:58
     Nat -> Type -> Type
-Builtins.lc 471:49-471:60
+471:49-471:60
     Type -> Type
-Builtins.lc 471:49-471:65
+471:49-471:65
     Type
-Builtins.lc 471:49-471:112
+471:49-471:112
     Type
-Builtins.lc 471:59-471:60
+471:59-471:60
     _d
-Builtins.lc 471:61-471:65
+471:61-471:65
     Type
-Builtins.lc 471:71-471:88
+471:71-471:88
     ImageKind -> Type
-Builtins.lc 471:71-471:112
+471:71-471:112
     Type | Type
-Builtins.lc 471:90-471:95
+471:90-471:95
     Type -> ImageKind | Type -> ImageKind
-Builtins.lc 471:90-471:111
+471:90-471:111
     ImageKind | ImageKind
-Builtins.lc 471:97-471:106
+471:97-471:106
     Nat -> Type -> Type | Nat -> Type -> Type
-Builtins.lc 471:97-471:108
+471:97-471:108
     Type -> Type | Type -> Type
-Builtins.lc 471:97-471:110
+471:97-471:110
     Type | Type
-Builtins.lc 471:107-471:108
+471:107-471:108
     Nat | Nat
-Builtins.lc 471:109-471:110
+471:109-471:110
     Type | Type
-Builtins.lc 472:3-472:10
+472:3-472:10
     ComparisonFunction -> Bool -> FragmentOperation 'Depth | FragmentOperation
       'Depth
-Builtins.lc 472:3-472:94
+472:3-472:94
     Type | Type | Type
-Builtins.lc 472:26-472:44
+472:26-472:44
     Type
-Builtins.lc 472:48-472:52
+472:48-472:52
     Type
-Builtins.lc 472:48-472:94
+472:48-472:94
     Type
-Builtins.lc 472:71-472:88
+472:71-472:88
     ImageKind -> Type
-Builtins.lc 472:71-472:94
+472:71-472:94
     Type | Type
-Builtins.lc 472:89-472:94
+472:89-472:94
     ImageKind | ImageKind
-Builtins.lc 473:3-473:12
+473:3-473:12
     StencilTests
       -> StencilOps -> StencilOps -> FragmentOperation 'Stencil | FragmentOperation
       'Stencil
-Builtins.lc 473:3-473:96
+473:3-473:96
     Type | Type | Type | Type
-Builtins.lc 473:26-473:38
+473:26-473:38
     Type
-Builtins.lc 473:42-473:52
+473:42-473:52
     Type
-Builtins.lc 473:42-473:96
+473:42-473:96
     Type
-Builtins.lc 473:56-473:66
+473:56-473:66
     Type
-Builtins.lc 473:56-473:96
+473:56-473:96
     Type
-Builtins.lc 473:71-473:88
+473:71-473:88
     ImageKind -> Type
-Builtins.lc 473:71-473:96
+473:71-473:96
     Type | Type
-Builtins.lc 473:89-473:96
+473:89-473:96
     ImageKind | ImageKind
-Builtins.lc 475:6-475:18
+475:6-475:18
     Type -> Type | Type -> Type | Type -> Type | Type
-Builtins.lc 475:6-478:7
+475:6-478:7
     Type | Type | Type | Type
-Builtins.lc 476:3-476:9
+476:3-476:9
     forall a . Floating a => Interpolated a | Interpolated _c | Type | Type
-Builtins.lc 476:11-476:24
+476:11-476:24
     forall a . Floating a => Interpolated a | Interpolated _d | Type | Type
-Builtins.lc 477:26-477:56
+477:26-477:56
     Type | Type
-Builtins.lc 477:27-477:35
+477:27-477:35
     Type -> Constraint | Type -> Constraint
-Builtins.lc 477:27-477:37
+477:27-477:37
     Constraint | Constraint
-Builtins.lc 477:36-477:37
+477:36-477:37
     Type | Type
-Builtins.lc 477:42-477:54
+477:42-477:54
     Type -> Type | Type -> Type
-Builtins.lc 477:42-477:56
+477:42-477:56
     Type | Type | Type | Type
-Builtins.lc 477:55-477:56
+477:55-477:56
     Type | Type
-Builtins.lc 478:3-478:7
+478:3-478:7
     forall a . Interpolated a | Interpolated _d
-Builtins.lc 478:42-478:54
+478:42-478:54
     Type -> Type
-Builtins.lc 478:42-478:56
+478:42-478:56
     Type | Type
-Builtins.lc 478:55-478:56
+478:55-478:56
     Type
-Builtins.lc 480:1-480:19
+480:1-480:19
     forall (a :: [Type]) (b :: [Type]) (c :: [Type]) (d :: PrimitiveType)
       . (map Interpolated a ~ (b :: [Type]), c ~ (Vec 4 Float : a :: [Type]))
         => HList b
           -> RasterContext (HList c) d
             -> Primitive (HList c) d -> FragmentStream 1 (HList a)
-Builtins.lc 481:8-486:34
+481:8-486:34
     Type | Type | Type | Type
-Builtins.lc 481:10-481:13
+481:10-481:13
     forall a b . (a -> b) -> [a] -> [b]
-Builtins.lc 481:10-481:26
+481:10-481:26
     [Type] -> [Type]
-Builtins.lc 481:10-481:28
+481:10-481:28
     [Type]
-Builtins.lc 481:10-481:30
+481:10-481:30
     [Type] -> Constraint
-Builtins.lc 481:10-481:44
+481:10-481:44
     Constraint
-Builtins.lc 481:14-481:26
+481:14-481:26
     Type -> Type
-Builtins.lc 481:27-481:28
+481:27-481:28
     _h
-Builtins.lc 481:29-481:30
+481:29-481:30
     forall a . a -> a -> Constraint
-Builtins.lc 481:31-481:44
+481:31-481:44
     _f
-Builtins.lc 482:10-482:11
+482:10-482:11
     _f
-Builtins.lc 482:10-482:13
+482:10-482:13
     _e -> Constraint
-Builtins.lc 482:10-482:28
+482:10-482:28
     Constraint
-Builtins.lc 482:10-486:34
+482:10-486:34
     Type
-Builtins.lc 482:12-482:13
+482:12-482:13
     forall a . a -> a -> Constraint
-Builtins.lc 482:14-482:17
+482:14-482:17
     Nat -> Type -> Type
-Builtins.lc 482:14-482:19
+482:14-482:19
     Type -> Type
-Builtins.lc 482:14-482:25
+482:14-482:25
     Type
-Builtins.lc 482:14-482:26
+482:14-482:26
     [Type] -> [Type]
-Builtins.lc 482:14-482:28
+482:14-482:28
     [Type]
-Builtins.lc 482:18-482:19
+482:18-482:19
     _b
-Builtins.lc 482:20-482:25
+482:20-482:25
     Type
-Builtins.lc 482:25-482:26
+482:25-482:26
     forall a . a -> [a] -> [a]
-Builtins.lc 482:27-482:28
+482:27-482:28
     [Type]
-Builtins.lc 483:8-483:13
+483:8-483:13
     [Type] -> Type
-Builtins.lc 483:8-483:27
+483:8-483:27
     Type
-Builtins.lc 483:8-486:34
+483:8-486:34
     Type
-Builtins.lc 483:14-483:27
+483:14-483:27
     [Type]
-Builtins.lc 484:8-484:21
+484:8-484:21
     Type -> PrimitiveType -> Type
-Builtins.lc 484:8-484:31
+484:8-484:31
     PrimitiveType -> Type
-Builtins.lc 484:8-484:33
+484:8-484:33
     Type
-Builtins.lc 484:8-486:34
+484:8-486:34
     Type
-Builtins.lc 484:23-484:28
+484:23-484:28
     [Type] -> Type
-Builtins.lc 484:23-484:30
+484:23-484:30
     Type
-Builtins.lc 484:29-484:30
+484:29-484:30
     [Type]
-Builtins.lc 484:32-484:33
+484:32-484:33
     _e
-Builtins.lc 485:8-485:17
+485:8-485:17
     Type -> PrimitiveType -> Type
-Builtins.lc 485:8-485:27
+485:8-485:27
     PrimitiveType -> Type
-Builtins.lc 485:8-485:29
+485:8-485:29
     Type
-Builtins.lc 485:8-486:34
+485:8-486:34
     Type
-Builtins.lc 485:19-485:24
+485:19-485:24
     [Type] -> Type
-Builtins.lc 485:19-485:26
+485:19-485:26
     Type
-Builtins.lc 485:25-485:26
+485:25-485:26
     [Type]
-Builtins.lc 485:28-485:29
+485:28-485:29
     PrimitiveType
-Builtins.lc 486:8-486:22
+486:8-486:22
     Nat -> Type -> Type
-Builtins.lc 486:8-486:24
+486:8-486:24
     Type -> Type
-Builtins.lc 486:8-486:34
+486:8-486:34
     Type | Type
-Builtins.lc 486:23-486:24
+486:23-486:24
     _b
-Builtins.lc 486:26-486:31
+486:26-486:31
     [Type] -> Type
-Builtins.lc 486:26-486:33
+486:26-486:33
     Type
-Builtins.lc 486:32-486:33
+486:32-486:33
     [Type]
-Builtins.lc 488:1-488:20
+488:1-488:20
     forall (a :: [Type]) (b :: PrimitiveType)
       . RasterContext (HList (Vec 4 Float : a)) b
         -> HList (map Interpolated a)
           -> [Primitive (HList (Vec 4 Float : a)) b]
             -> [Vector 1 (Maybe (SimpleFragment (HList a)))]
-Builtins.lc 488:32-488:38
+488:32-488:38
     forall a . [[a]] -> [a]
-Builtins.lc 488:32-488:74
+488:32-488:74
     [Vector 1 (Maybe (SimpleFragment (HList _b)))]
-Builtins.lc 488:40-488:43
+488:40-488:43
     forall a b . (a -> b) -> [a] -> [b]
-Builtins.lc 488:40-488:71
+488:40-488:71
     [Primitive (HList (Vec 4 Float : _b)) _a] -> [[Fragment 1 (HList _b)]]
-Builtins.lc 488:40-488:73
+488:40-488:73
     [[Fragment 1 (HList _b)]]
-Builtins.lc 488:45-488:63
+488:45-488:63
     forall (a :: [Type]) (b :: [Type]) (c :: [Type]) (d :: PrimitiveType)
       . (map Interpolated a ~ (b :: [Type]), c ~ (Vec 4 Float : a :: [Type]))
         => HList b
           -> RasterContext (HList c) d
             -> Primitive (HList c) d -> FragmentStream 1 (HList a)
-Builtins.lc 488:45-488:66
+488:45-488:66
     RasterContext (HList (Vec 4 Float : _b)) _a
       -> Primitive (HList (Vec 4 Float : _b)) _a -> FragmentStream 1 (HList _b)
-Builtins.lc 488:45-488:70
+488:45-488:70
     Primitive (HList (Vec 4 Float : _b)) _a -> FragmentStream 1 (HList _b)
-Builtins.lc 488:64-488:66
+488:64-488:66
     _i
-Builtins.lc 488:67-488:70
+488:67-488:70
     _h
-Builtins.lc 488:72-488:73
+488:72-488:73
     _d
-Builtins.lc 490:26-490:29
+490:26-490:29
     Type | Type
-Builtins.lc 490:36-490:43
+490:36-490:43
     Type -> Nat
-Builtins.lc 490:58-490:59
+490:58-490:59
     Nat
-Builtins.lc 492:12-492:15
+492:12-492:15
     Type
-Builtins.lc 492:12-492:29
+492:12-492:29
     Type
-Builtins.lc 492:13-492:14
+492:13-492:14
     _b
-Builtins.lc 492:19-492:29
+492:19-492:29
     Type | Type
-Builtins.lc 493:1-493:8
+493:1-493:8
     forall a . [a] -> Constraint
-Builtins.lc 493:14-493:20
+493:14-493:20
     Constraint
-Builtins.lc 493:14-495:50
+493:14-495:50
     [_a] -> Constraint | Constraint
-Builtins.lc 494:15-494:21
+494:15-494:21
     Constraint
-Builtins.lc 494:15-495:50
+494:15-495:50
     [_c] -> Constraint | Constraint
-Builtins.lc 495:22-495:25
+495:22-495:25
     Constraint -> Constraint -> Constraint
-Builtins.lc 495:22-495:33
+495:22-495:33
     Constraint -> Constraint
-Builtins.lc 495:22-495:50
+495:22-495:50
     Constraint
-Builtins.lc 495:27-495:28
+495:27-495:28
     _g
-Builtins.lc 495:27-495:30
+495:27-495:30
     _f -> Constraint
-Builtins.lc 495:27-495:32
+495:27-495:32
     Constraint
-Builtins.lc 495:29-495:30
+495:29-495:30
     forall a . a -> a -> Constraint
-Builtins.lc 495:31-495:32
+495:31-495:32
     _c
-Builtins.lc 495:35-495:42
+495:35-495:42
     forall a . [a] -> Constraint
-Builtins.lc 495:35-495:49
+495:35-495:49
     Constraint
-Builtins.lc 495:44-495:45
+495:44-495:45
     _g
-Builtins.lc 495:44-495:46
+495:44-495:46
     [_f] -> [_f]
-Builtins.lc 495:44-495:48
+495:44-495:48
     [_e]
-Builtins.lc 495:45-495:46
+495:45-495:46
     forall a . a -> [a] -> [a]
-Builtins.lc 495:46-495:48
+495:46-495:48
     [_e]
-Builtins.lc 497:1-497:16
+497:1-497:16
     [Type] -> Constraint
-Builtins.lc 497:21-497:28
+497:21-497:28
     forall a . [a] -> Constraint
-Builtins.lc 497:21-497:45
+497:21-497:45
     Constraint
-Builtins.lc 497:30-497:33
+497:30-497:33
     forall a b . (a -> b) -> [a] -> [b]
-Builtins.lc 497:30-497:42
+497:30-497:42
     [Type] -> [Nat]
-Builtins.lc 497:30-497:44
+497:30-497:44
     [Nat]
-Builtins.lc 497:34-497:42
+497:34-497:42
     Type -> Nat
-Builtins.lc 497:43-497:44
+497:43-497:44
     _b
-Builtins.lc 509:6-509:17
+509:6-509:17
     Nat -> [ImageKind] -> Type | Nat -> [ImageKind] -> Type | Nat
       -> [ImageKind] -> Type | Type | Type
-Builtins.lc 509:6-509:46
+509:6-509:46
     Type
-Builtins.lc 509:24-509:27
+509:24-509:27
     Type | Type
-Builtins.lc 509:35-509:46
+509:35-509:46
     Type | Type | Type
-Builtins.lc 509:36-509:45
+509:36-509:45
     Type | Type
-Builtins.lc 511:15-511:26
+511:15-511:26
     Type
-Builtins.lc 511:16-511:25
+511:16-511:25
     Type
-Builtins.lc 511:30-511:36
+511:30-511:36
     Type | Type
-Builtins.lc 511:31-511:35
+511:31-511:35
     Type
-Builtins.lc 512:1-512:11
+512:1-512:11
     [ImageKind] -> [Type]
-Builtins.lc 512:25-512:28
+512:25-512:28
     forall a b . (a -> b) -> [a] -> [b]
-Builtins.lc 512:25-512:38
+512:25-512:38
     [ImageKind] -> [Type]
-Builtins.lc 512:25-512:40
+512:25-512:40
     [Type]
-Builtins.lc 512:25-513:31
+512:25-513:31
     [Type] -> ImageKind -> [Type] | [Type] | [Type]
-Builtins.lc 512:29-512:38
+512:29-512:38
     ImageKind -> Type
-Builtins.lc 512:39-512:40
+512:39-512:40
     [_c]
-Builtins.lc 513:16-513:19
+513:16-513:19
     forall a b . (a -> b) -> [a] -> [b] | forall a b
       . (a -> b) -> [a] -> [b] | forall a b . (a -> b) -> [a] -> [b]
-Builtins.lc 513:16-513:29
+513:16-513:29
     [ImageKind] -> [Type] | [ImageKind] -> [Type] | [ImageKind] -> [Type]
-Builtins.lc 513:16-513:31
+513:16-513:31
     [Type] | [Type] | [Type]
-Builtins.lc 513:20-513:29
+513:20-513:29
     ImageKind -> Type | ImageKind -> Type | ImageKind -> Type
-Builtins.lc 513:30-513:31
+513:30-513:31
     [ImageKind] | [ImageKind] | [ImageKind]
-Builtins.lc 515:40-515:49
+515:40-515:49
     Type | Type
-Builtins.lc 515:56-515:77
+515:56-515:77
     Type -> ImageKind
-Builtins.lc 515:102-515:103
+515:102-515:103
     ImageKind
-Builtins.lc 517:1-517:11
+517:1-517:11
     forall (a :: [ImageKind]) (b :: Nat) (c :: [Type])
       . (a ~ (map FragmentOperationKind c :: [ImageKind]))
         => HList c
           -> FragmentStream b (HList (imageType' a)) -> FrameBuffer b a -> FrameBuffer b a
-Builtins.lc 517:15-517:174
+517:15-517:174
     Type
-Builtins.lc 517:28-517:31
+517:28-517:31
     Type
-Builtins.lc 517:39-517:45
+517:39-517:45
     Type
-Builtins.lc 517:39-517:174
+517:39-517:174
     Type
-Builtins.lc 517:40-517:44
+517:40-517:44
     Type
-Builtins.lc 517:49-517:174
+517:49-517:174
     Type
-Builtins.lc 517:50-517:51
+517:50-517:51
     _e
-Builtins.lc 517:50-517:53
+517:50-517:53
     _d -> Constraint
-Builtins.lc 517:50-517:81
+517:50-517:81
     Constraint
-Builtins.lc 517:52-517:53
+517:52-517:53
     forall a . a -> a -> Constraint
-Builtins.lc 517:54-517:57
+517:54-517:57
     forall a b . (a -> b) -> [a] -> [b]
-Builtins.lc 517:54-517:79
+517:54-517:79
     [Type] -> [ImageKind]
-Builtins.lc 517:54-517:81
+517:54-517:81
     [ImageKind]
-Builtins.lc 517:58-517:79
+517:58-517:79
     Type -> ImageKind
-Builtins.lc 517:80-517:81
+517:80-517:81
     [Type]
-Builtins.lc 517:86-517:91
+517:86-517:91
     [Type] -> Type
-Builtins.lc 517:86-517:93
+517:86-517:93
     Type
-Builtins.lc 517:86-517:174
+517:86-517:174
     Type
-Builtins.lc 517:92-517:93
+517:92-517:93
     [Type]
-Builtins.lc 517:97-517:111
+517:97-517:111
     Nat -> Type -> Type
-Builtins.lc 517:97-517:113
+517:97-517:113
     Type -> Type
-Builtins.lc 517:97-517:136
+517:97-517:136
     Type
-Builtins.lc 517:97-517:174
+517:97-517:174
     Type
-Builtins.lc 517:112-517:113
+517:112-517:113
     Nat
-Builtins.lc 517:115-517:120
+517:115-517:120
     [Type] -> Type
-Builtins.lc 517:115-517:135
+517:115-517:135
     Type
-Builtins.lc 517:122-517:132
+517:122-517:132
     [ImageKind] -> [Type]
-Builtins.lc 517:122-517:134
+517:122-517:134
     [Type]
-Builtins.lc 517:133-517:134
+517:133-517:134
     [ImageKind]
-Builtins.lc 517:140-517:151
+517:140-517:151
     Nat -> [ImageKind] -> Type
-Builtins.lc 517:140-517:153
+517:140-517:153
     [ImageKind] -> Type
-Builtins.lc 517:140-517:155
+517:140-517:155
     Type
-Builtins.lc 517:140-517:174
+517:140-517:174
     Type
-Builtins.lc 517:152-517:153
+517:152-517:153
     Nat
-Builtins.lc 517:154-517:155
+517:154-517:155
     [ImageKind]
-Builtins.lc 517:159-517:170
+517:159-517:170
     Nat -> [ImageKind] -> Type
-Builtins.lc 517:159-517:172
+517:159-517:172
     [ImageKind] -> Type
-Builtins.lc 517:159-517:174
+517:159-517:174
     Type | Type
-Builtins.lc 517:171-517:172
+517:171-517:172
     Nat
-Builtins.lc 517:173-517:174
+517:173-517:174
     [ImageKind]
-Builtins.lc 519:1-519:15
+519:1-519:15
     forall a b . a -> b -> (a, b)
-Builtins.lc 519:24-519:32
+519:24-519:32
     (_d, _b)
-Builtins.lc 519:25-519:28
+519:25-519:28
     _f
-Builtins.lc 519:30-519:31
+519:30-519:31
     _e | ((_b))
-Builtins.lc 520:1-520:8
+520:1-520:8
     forall (a :: Nat) (b :: [Type])
       . FrameBuffer a (map FragmentOperationKind b)
         -> (HList b, [Fragment a (HList (imageType' (map FragmentOperationKind b)))])
           -> FrameBuffer a (map FragmentOperationKind b)
-Builtins.lc 520:25-520:35
+520:25-520:35
     forall (a :: [ImageKind]) (b :: Nat) (c :: [Type])
       . (a ~ (map FragmentOperationKind c :: [ImageKind]))
         => HList c
           -> FragmentStream b (HList (imageType' a)) -> FrameBuffer b a -> FrameBuffer b a
-Builtins.lc 520:25-520:39
+520:25-520:39
     FragmentStream _b (HList (imageType' (map FragmentOperationKind _a)))
       -> FrameBuffer _b (map FragmentOperationKind _a)
         -> FrameBuffer _b (map FragmentOperationKind _a)
-Builtins.lc 520:25-520:43
+520:25-520:43
     FrameBuffer _b (map FragmentOperationKind _a)
       -> FrameBuffer _b (map FragmentOperationKind _a)
-Builtins.lc 520:25-520:46
+520:25-520:46
     FrameBuffer _b (map FragmentOperationKind _a) | FrameBuffer
       _b
       (map FragmentOperationKind _a) | FrameBuffer _b (map FragmentOperationKind _a)
-Builtins.lc 520:36-520:39
+520:36-520:39
     _m
-Builtins.lc 520:40-520:43
+520:40-520:43
     _h
-Builtins.lc 520:44-520:46
+520:44-520:46
     _n
-Builtins.lc 524:31-524:40
+524:31-524:40
     Type | Type
-Builtins.lc 524:47-524:59
+524:47-524:59
     Type -> ImageKind
-Builtins.lc 524:74-524:75
+524:74-524:75
     ImageKind
-Builtins.lc 530:1-530:12
+530:1-530:12
     forall (a :: [Type])
       . sameLayerCounts a
         => HList a -> FrameBuffer (ImageLC (head a)) (map GetImageKind a)
-Builtins.lc 530:30-530:36
+530:30-530:36
     Type
-Builtins.lc 530:31-530:35
+530:31-530:35
     Type
-Builtins.lc 530:40-530:125
+530:40-530:125
     Type
-Builtins.lc 530:41-530:56
+530:41-530:56
     [Type] -> Constraint
-Builtins.lc 530:41-530:58
+530:41-530:58
     Constraint
-Builtins.lc 530:57-530:58
+530:57-530:58
     [Type]
-Builtins.lc 530:63-530:68
+530:63-530:68
     [Type] -> Type
-Builtins.lc 530:63-530:70
+530:63-530:70
     Type
-Builtins.lc 530:63-530:125
+530:63-530:125
     Type
-Builtins.lc 530:69-530:70
+530:69-530:70
     [Type]
-Builtins.lc 530:74-530:85
+530:74-530:85
     Nat -> [ImageKind] -> Type
-Builtins.lc 530:74-530:104
+530:74-530:104
     [ImageKind] -> Type
-Builtins.lc 530:74-530:125
+530:74-530:125
     Type | Type
-Builtins.lc 530:87-530:94
+530:87-530:94
     Type -> Nat
-Builtins.lc 530:87-530:103
+530:87-530:103
     Nat
-Builtins.lc 530:96-530:100
+530:96-530:100
     forall a . [a] -> a
-Builtins.lc 530:96-530:102
+530:96-530:102
     Type
-Builtins.lc 530:101-530:102
+530:101-530:102
     [Type]
-Builtins.lc 530:106-530:109
+530:106-530:109
     forall a b . (a -> b) -> [a] -> [b]
-Builtins.lc 530:106-530:122
+530:106-530:122
     [Type] -> [ImageKind]
-Builtins.lc 530:106-530:124
+530:106-530:124
     [ImageKind]
-Builtins.lc 530:110-530:122
+530:110-530:122
     Type -> ImageKind
-Builtins.lc 530:123-530:124
+530:123-530:124
     [Type]
-Builtins.lc 532:1-532:11
+532:1-532:11
     forall (a :: [Type])
       . sameLayerCounts a
         => HList a -> FrameBuffer (ImageLC (head a)) (map GetImageKind a)
-Builtins.lc 532:14-532:25
+532:14-532:25
     forall (a :: [Type])
       . sameLayerCounts a
         => HList a -> FrameBuffer (ImageLC (head a)) (map GetImageKind a)
-Builtins.lc 534:1-534:11
+534:1-534:11
     forall (a :: Nat) (b :: [Type]) c
       . HList b
         -> (c -> HList (imageType' (map FragmentOperationKind b)))
           -> [Vector a (Maybe (SimpleFragment c))]
             -> FrameBuffer a (map FragmentOperationKind b)
               -> FrameBuffer a (map FragmentOperationKind b)
-Builtins.lc 534:34-534:44
+534:34-534:44
     forall (a :: [ImageKind]) (b :: Nat) (c :: [Type])
       . (a ~ (map FragmentOperationKind c :: [ImageKind]))
         => HList c
           -> FragmentStream b (HList (imageType' a)) -> FrameBuffer b a -> FrameBuffer b a
-Builtins.lc 534:34-534:48
+534:34-534:48
     FragmentStream _b (HList (imageType' (map FragmentOperationKind _a)))
       -> FrameBuffer _b (map FragmentOperationKind _a)
         -> FrameBuffer _b (map FragmentOperationKind _a)
-Builtins.lc 534:34-534:76
+534:34-534:76
     FrameBuffer _c (map FragmentOperationKind _b)
       -> FrameBuffer _c (map FragmentOperationKind _b)
-Builtins.lc 534:34-534:79
+534:34-534:79
     FrameBuffer _c (map FragmentOperationKind _b)
-Builtins.lc 534:45-534:48
+534:45-534:48
     _j
-Builtins.lc 534:50-534:62
+534:50-534:62
     forall a b (c :: Nat)
       . (a -> b)
         -> [Vector c (Maybe (SimpleFragment a))]
           -> [Vector c (Maybe (SimpleFragment b))]
-Builtins.lc 534:50-534:70
+534:50-534:70
     [Vector _a (Maybe (SimpleFragment _c))]
       -> [Vector _a (Maybe (SimpleFragment _b))]
-Builtins.lc 534:50-534:75
+534:50-534:75
     [Vector
       _c
       (Maybe (SimpleFragment (HList (imageType' (map FragmentOperationKind _b)))))]
-Builtins.lc 534:63-534:70
+534:63-534:70
     _k
-Builtins.lc 534:71-534:75
+534:71-534:75
     _g
-Builtins.lc 534:77-534:79
+534:77-534:79
     _e
-Builtins.lc 537:1-537:9
+537:1-537:9
     forall (a :: ImageKind) . FrameBuffer 1 ' [a] -> Image 1 a
-Builtins.lc 537:24-537:35
+537:24-537:35
     Nat -> [ImageKind] -> Type
-Builtins.lc 537:24-537:37
+537:24-537:37
     [ImageKind] -> Type
-Builtins.lc 537:24-537:42
+537:24-537:42
     Type
-Builtins.lc 537:24-537:55
+537:24-537:55
     Type
-Builtins.lc 537:36-537:37
+537:36-537:37
     _b
-Builtins.lc 537:38-537:42
+537:38-537:42
     [ImageKind]
-Builtins.lc 537:40-537:41
+537:40-537:41
     _c
-Builtins.lc 537:46-537:51
+537:46-537:51
     Nat -> ImageKind -> Type
-Builtins.lc 537:46-537:53
+537:46-537:53
     ImageKind -> Type
-Builtins.lc 537:46-537:55
+537:46-537:55
     Type | Type
-Builtins.lc 537:52-537:53
+537:52-537:53
     _b
-Builtins.lc 537:54-537:55
+537:54-537:55
     ImageKind
-Builtins.lc 538:1-538:14
+538:1-538:14
     FrameBuffer 1 ' ['Depth, 'Color (Vec 4 Float)] -> Image 1 ('Color (Vec 4 Float))
-Builtins.lc 538:24-538:35
+538:24-538:35
     Nat -> [ImageKind] -> Type
-Builtins.lc 538:24-538:37
+538:24-538:37
     [ImageKind] -> Type
-Builtins.lc 538:24-538:70
+538:24-538:70
     Type
-Builtins.lc 538:36-538:37
+538:36-538:37
     _b
-Builtins.lc 538:38-538:70
+538:38-538:70
     [ImageKind]
-Builtins.lc 538:41-538:47
+538:41-538:47
     ImageKind
-Builtins.lc 538:49-538:55
+538:49-538:55
     Type -> ImageKind
-Builtins.lc 538:49-538:69
+538:49-538:69
     ImageKind | [ImageKind]
-Builtins.lc 538:57-538:60
+538:57-538:60
     Nat -> Type -> Type
-Builtins.lc 538:57-538:62
+538:57-538:62
     Type -> Type
-Builtins.lc 538:57-538:68
+538:57-538:68
     Type
-Builtins.lc 538:61-538:62
+538:61-538:62
     _b
-Builtins.lc 538:63-538:68
+538:63-538:68
     Type
-Builtins.lc 538:74-538:79
+538:74-538:79
     Nat -> ImageKind -> Type
-Builtins.lc 538:74-538:81
+538:74-538:81
     ImageKind -> Type
-Builtins.lc 538:74-538:103
+538:74-538:103
     Type | Type
-Builtins.lc 538:80-538:81
+538:80-538:81
     _b
-Builtins.lc 538:83-538:88
+538:83-538:88
     Type -> ImageKind
-Builtins.lc 538:83-538:102
+538:83-538:102
     ImageKind
-Builtins.lc 538:90-538:93
+538:90-538:93
     Nat -> Type -> Type
-Builtins.lc 538:90-538:95
+538:90-538:95
     Type -> Type
-Builtins.lc 538:90-538:101
+538:90-538:101
     Type
-Builtins.lc 538:94-538:95
+538:94-538:95
     _b
-Builtins.lc 538:96-538:101
+538:96-538:101
     Type
-Builtins.lc 540:6-540:12
+540:6-540:12
     Type | Type | Type | Type
-Builtins.lc 540:6-541:12
+540:6-541:12
     Type
-Builtins.lc 541:3-541:12
+541:3-541:12
     forall (a :: Nat) (b :: [ImageKind])
       . FrameBuffer a b -> Output | Output | Type | Type | Type | Type
-Builtins.lc 541:26-541:37
+541:26-541:37
     Nat -> [ImageKind] -> Type
-Builtins.lc 541:26-541:39
+541:26-541:39
     [ImageKind] -> Type
-Builtins.lc 541:26-541:41
+541:26-541:41
     Type
-Builtins.lc 541:26-541:51
+541:26-541:51
     Type | Type
-Builtins.lc 541:38-541:39
+541:38-541:39
     _d
-Builtins.lc 541:40-541:41
+541:40-541:41
     _b
-Builtins.lc 541:45-541:51
+541:45-541:51
     Type | Type
-Builtins.lc 543:1-543:12
+543:1-543:12
     forall (a :: Nat) (b :: [ImageKind]) . FrameBuffer a b -> Output
-Builtins.lc 543:15-543:24
+543:15-543:24
     forall (a :: Nat) (b :: [ImageKind]) . FrameBuffer a b -> Output
-Builtins.lc 549:6-549:13
+549:6-549:13
     Type | Type | Type | Type
-Builtins.lc 549:6-553:12
+549:6-553:12
     Type | Type
-Builtins.lc 550:3-550:16
+550:3-550:16
     String -> Texture | Texture | Type | Type
-Builtins.lc 550:20-550:26
+550:20-550:26
     Type
-Builtins.lc 551:20-551:27
+551:20-551:27
     Type | Type
-Builtins.lc 553:3-553:12
+553:3-553:12
     Vec 2 Int
       -> Image 1 ('Color (Vec 4 Float)) -> Texture | Texture | Type | Type | Type
-Builtins.lc 553:20-553:23
+553:20-553:23
     Nat -> Type -> Type
-Builtins.lc 553:20-553:25
+553:20-553:25
     Type -> Type
-Builtins.lc 553:20-553:29
+553:20-553:29
     Type
-Builtins.lc 553:24-553:25
+553:24-553:25
     _b
-Builtins.lc 553:26-553:29
+553:26-553:29
     Type
-Builtins.lc 554:20-554:25
+554:20-554:25
     Nat -> ImageKind -> Type
-Builtins.lc 554:20-554:27
+554:20-554:27
     ImageKind -> Type
-Builtins.lc 554:20-554:49
+554:20-554:49
     Type
-Builtins.lc 554:20-555:27
+554:20-555:27
     Type
-Builtins.lc 554:26-554:27
+554:26-554:27
     _b
-Builtins.lc 554:29-554:34
+554:29-554:34
     Type -> ImageKind
-Builtins.lc 554:29-554:48
+554:29-554:48
     ImageKind
-Builtins.lc 554:36-554:39
+554:36-554:39
     Nat -> Type -> Type
-Builtins.lc 554:36-554:41
+554:36-554:41
     Type -> Type
-Builtins.lc 554:36-554:47
+554:36-554:47
     Type
-Builtins.lc 554:40-554:41
+554:40-554:41
     _b
-Builtins.lc 554:42-554:47
+554:42-554:47
     Type
-Builtins.lc 555:20-555:27
+555:20-555:27
     Type | Type
-Builtins.lc 557:6-557:12
+557:6-557:12
     Type | Type | Type | Type | Type | Type
-Builtins.lc 557:6-559:17
+557:6-559:17
     Type | Type
-Builtins.lc 558:5-558:16
+558:5-558:16
     Filter
-Builtins.lc 559:5-559:17
+559:5-559:17
     Filter
-Builtins.lc 561:6-561:14
+561:6-561:14
     Type | Type | Type | Type | Type | Type | Type
-Builtins.lc 561:6-564:16
+561:6-564:16
     Type | Type | Type
-Builtins.lc 562:5-562:11
+562:5-562:11
     EdgeMode
-Builtins.lc 563:5-563:19
+563:5-563:19
     EdgeMode
-Builtins.lc 564:5-564:16
+564:5-564:16
     EdgeMode
-Builtins.lc 566:6-566:13
+566:6-566:13
     Type | Type | Type | Type | Type | Type
-Builtins.lc 566:6-566:23
+566:6-566:23
     Type
-Builtins.lc 566:6-566:47
+566:6-566:47
     Type | Type
-Builtins.lc 566:16-566:23
+566:16-566:23
     Filter -> EdgeMode -> Texture -> Sampler | Sampler | Type | Type | Type | Type
-Builtins.lc 566:24-566:30
+566:24-566:30
     Type
-Builtins.lc 566:31-566:39
+566:31-566:39
     Type
-Builtins.lc 566:40-566:47
+566:40-566:47
     Type
-Builtins.lc 569:1-569:10
+569:1-569:10
     Sampler -> Vec 2 Float -> Vec 4 Float
-Builtins.lc 569:14-569:21
+569:14-569:21
     Type
-Builtins.lc 569:25-569:28
+569:25-569:28
     Nat -> Type -> Type
-Builtins.lc 569:25-569:30
+569:25-569:30
     Type -> Type
-Builtins.lc 569:25-569:36
+569:25-569:36
     Type
-Builtins.lc 569:25-569:51
+569:25-569:51
     Type
-Builtins.lc 569:29-569:30
+569:29-569:30
     _b
-Builtins.lc 569:31-569:36
+569:31-569:36
     Type
-Builtins.lc 569:40-569:43
+569:40-569:43
     Nat -> Type -> Type
-Builtins.lc 569:40-569:45
+569:40-569:45
     Type -> Type
-Builtins.lc 569:40-569:51
+569:40-569:51
     Type | Type
-Builtins.lc 569:44-569:45
+569:44-569:45
     _b
-Builtins.lc 569:46-569:51
+569:46-569:51
     Type
-Builtins.lc 573:1-573:20
+573:1-573:20
     forall a . a -> a
-Builtins.lc 573:25-573:26
+573:25-573:26
     _b
 ------------ warnings
-Uncovered pattern(s) at Builtins.lc:201:1:
+Uncovered pattern(s) at ./testdata/Builtins.lc:201:1:
 head (x: _) = x
 ^^^^
 Missing case(s):
     head []
-Uncovered pattern(s) at Builtins.lc:340:1:
+Uncovered pattern(s) at ./testdata/Builtins.lc:340:1:
 swizzscalar (V2 x y) Sx = x
 swizzscalar (V2 x y) Sy = y
 swizzscalar (V3 x y z) Sx = x
@@ -8738,7 +8738,7 @@ Missing case(s):
     swizzscalar (V2 _ _) Sz
     swizzscalar (V2 _ _) Sw
     swizzscalar (V3 _ _ _) Sw
-Uncovered pattern(s) at Builtins.lc:357:1:
+Uncovered pattern(s) at ./testdata/Builtins.lc:357:1:
 swizzvector v w | definedVec v = mapVec (swizzscalar v) w
 ^^^^^^^^^^^
 Missing case(s):
diff --git a/testdata/Internals.out b/testdata/Internals.out
index c72295b0..02440c19 100644
--- a/testdata/Internals.out
+++ b/testdata/Internals.out
@@ -728,668 +728,668 @@ undefined = \a -> <<builtin>>
 unsafeCoerce :: forall a b . a -> b
 unsafeCoerce = \a b c -> <<delta function with arity 3>>
 ------------ tooltips
-Internals.lc 6:1-6:8
+6:1-6:8
     forall a . a -> a
-Internals.lc 6:13-6:14
+6:13-6:14
     _b
-Internals.lc 9:1-9:7
+9:1-9:7
     forall a . a -> a
-Internals.lc 9:12-9:13
+9:12-9:13
     _b
-Internals.lc 11:1-11:10
+11:1-11:10
     forall a . a
-Internals.lc 11:27-11:31
+11:27-11:31
     Type
-Internals.lc 11:35-11:36
+11:35-11:36
     Type | Type
-Internals.lc 13:1-13:8
+13:1-13:8
     forall a . (a -> a) -> a
-Internals.lc 13:25-13:29
+13:25-13:29
     Type
-Internals.lc 13:33-13:46
+13:33-13:46
     Type
-Internals.lc 13:34-13:35
+13:34-13:35
     Type
-Internals.lc 13:39-13:40
+13:39-13:40
     Type | Type
-Internals.lc 13:45-13:46
+13:45-13:46
     Type | Type
-Internals.lc 15:6-15:10
+15:6-15:10
     Type | Type | Type | Type | Type
-Internals.lc 15:6-15:15
+15:6-15:15
     Type
-Internals.lc 15:13-15:15
+15:13-15:15
     Unit
-Internals.lc 16:6-16:12
+16:6-16:12
     Type | Type | Type | Type
-Internals.lc 17:6-17:11
+17:6-17:11
     String -> Type | String -> Type | String -> Type | Type | Type
-Internals.lc 17:18-17:24
+17:18-17:24
     Type | Type
-Internals.lc 19:1-19:13
+19:1-19:13
     forall a b . a -> b
-Internals.lc 19:30-19:31
+19:30-19:31
     _d
-Internals.lc 19:30-19:36
+19:30-19:36
     Type | Type
-Internals.lc 19:35-19:36
+19:35-19:36
     _c | Type
-Internals.lc 21:6-21:16
+21:6-21:16
     Type | Type | Type | Type
-Internals.lc 21:6-23:11
+21:6-23:11
     Type | Type
-Internals.lc 22:5-22:10
+22:5-22:10
     Constraint
-Internals.lc 22:14-22:24
+22:14-22:24
     Type
-Internals.lc 23:5-23:11
+23:5-23:11
     String -> Constraint | Constraint | Type | Type
-Internals.lc 23:15-23:21
+23:15-23:21
     Type
-Internals.lc 23:25-23:35
+23:25-23:35
     Type | Type
-Internals.lc 25:13-25:15
+25:13-25:15
     Constraint -> Type
-Internals.lc 25:22-25:32
+25:22-25:32
     Type
-Internals.lc 31:13-31:17
+31:13-31:17
     forall a -> a -> a -> Constraint
-Internals.lc 31:24-31:28
+31:24-31:28
     Type
-Internals.lc 31:36-31:37
+31:36-31:37
     Type
-Internals.lc 31:36-31:61
+31:36-31:61
     Type
-Internals.lc 31:45-31:46
+31:45-31:46
     Type
-Internals.lc 31:45-31:61
+31:45-31:61
     Type
-Internals.lc 31:51-31:61
+31:51-31:61
     Type | Type
-Internals.lc 40:1-40:8
+40:1-40:8
     forall a -> a -> a -> a
-Internals.lc 40:24-40:25
+40:24-40:25
     _b
-Internals.lc 40:24-40:35
+40:24-40:35
     Type
-Internals.lc 40:29-40:30
+40:29-40:30
     Type
-Internals.lc 40:29-40:35
+40:29-40:35
     Type
-Internals.lc 40:34-40:35
+40:34-40:35
     Type | Type
-Internals.lc 43:13-43:15
+43:13-43:15
     Constraint -> Constraint -> Constraint
-Internals.lc 43:22-43:32
+43:22-43:32
     Type
-Internals.lc 43:40-43:50
+43:40-43:50
     Type
-Internals.lc 43:40-43:65
+43:40-43:65
     Type
-Internals.lc 43:55-43:65
+43:55-43:65
     Type | Type
-Internals.lc 50:1-50:11
+50:1-50:11
     forall (a :: Type -> Type) -> a Type -> forall b -> a b -> a b
-Internals.lc 50:28-50:32
+50:28-50:32
     Type
-Internals.lc 50:36-50:40
+50:36-50:40
     Type | Type
-Internals.lc 50:45-50:46
+50:45-50:46
     Type -> Type
-Internals.lc 50:45-50:51
+50:45-50:51
     Type
-Internals.lc 50:45-50:87
+50:45-50:87
     Type
-Internals.lc 50:47-50:51
+50:47-50:51
     Type
-Internals.lc 50:55-50:87
+50:55-50:87
     Type
-Internals.lc 50:68-50:72
+50:68-50:72
     Type
-Internals.lc 50:77-50:78
+50:77-50:78
     Type -> Type
-Internals.lc 50:77-50:80
+50:77-50:80
     Type
-Internals.lc 50:77-50:87
+50:77-50:87
     Type
-Internals.lc 50:79-50:80
+50:79-50:80
     Type
-Internals.lc 50:84-50:85
+50:84-50:85
     Type -> Type
-Internals.lc 50:84-50:87
+50:84-50:87
     Type | Type
-Internals.lc 50:86-50:87
+50:86-50:87
     Type
-Internals.lc 52:6-52:11
+52:6-52:11
     forall a . a -> a -> Constraint
-Internals.lc 52:14-52:18
+52:14-52:18
     forall a -> a -> a -> Constraint
-Internals.lc 52:14-52:20
+52:14-52:20
     _a -> _a -> Constraint
-Internals.lc 55:1-55:4
+55:1-55:4
     Unit -> Unit -> Unit
-Internals.lc 55:8-55:12
+55:8-55:12
     Type
-Internals.lc 55:16-55:20
+55:16-55:20
     Type
-Internals.lc 55:16-55:28
+55:16-55:28
     Type
-Internals.lc 55:24-55:28
+55:24-55:28
     Type | Type
-Internals.lc 58:6-58:9
+58:6-58:9
     Type | Type | Type | Type
-Internals.lc 59:6-59:10
+59:6-59:10
     Type | Type | Type | Type
-Internals.lc 60:6-60:11
+60:6-60:11
     Type | Type | Type | Type
-Internals.lc 61:6-61:10
+61:6-61:10
     Type | Type | Type | Type
-Internals.lc 63:6-63:10
+63:6-63:10
     Type | Type | Type | Type | Type | Type
-Internals.lc 63:6-63:25
+63:6-63:25
     Type | Type
-Internals.lc 63:13-63:18
+63:13-63:18
     Bool
-Internals.lc 63:21-63:25
+63:21-63:25
     Bool
-Internals.lc 65:6-65:14
+65:6-65:14
     Type | Type | Type | Type | Type | Type | Type
-Internals.lc 65:6-65:29
+65:6-65:29
     Type | Type | Type
-Internals.lc 65:17-65:19
+65:17-65:19
     Ordering
-Internals.lc 65:22-65:24
+65:22-65:24
     Ordering
-Internals.lc 65:27-65:29
+65:27-65:29
     Ordering
-Internals.lc 67:6-67:9
+67:6-67:9
     Type | Type | Type | Type | Type | Type | Type
-Internals.lc 67:6-67:23
+67:6-67:23
     Type | Type
-Internals.lc 67:12-67:16
+67:12-67:16
     Nat
-Internals.lc 67:19-67:23
+67:19-67:23
     Nat -> Nat | Nat | Type | Type
-Internals.lc 67:24-67:27
+67:24-67:27
     Type
-Internals.lc 70:1-70:14
+70:1-70:14
     Int -> Word
-Internals.lc 70:24-70:27
+70:24-70:27
     Type
-Internals.lc 70:33-70:37
+70:33-70:37
     Type | Type
-Internals.lc 71:1-71:15
+71:1-71:15
     Int -> Float
-Internals.lc 71:24-71:27
+71:24-71:27
     Type
-Internals.lc 71:33-71:38
+71:33-71:38
     Type | Type
-Internals.lc 72:1-72:13
+72:1-72:13
     Int -> Nat
-Internals.lc 72:24-72:27
+72:24-72:27
     Type
-Internals.lc 72:33-72:36
+72:33-72:36
     Type | Type
-Internals.lc 73:1-73:15
+73:1-73:15
     Int -> Int -> Ordering
-Internals.lc 73:24-73:27
+73:24-73:27
     Type
-Internals.lc 73:33-73:36
+73:33-73:36
     Type
-Internals.lc 73:33-73:50
+73:33-73:50
     Type
-Internals.lc 73:42-73:50
+73:42-73:50
     Type | Type
-Internals.lc 74:1-74:16
+74:1-74:16
     Word -> Word -> Ordering
-Internals.lc 74:24-74:28
+74:24-74:28
     Type
-Internals.lc 74:33-74:37
+74:33-74:37
     Type
-Internals.lc 74:33-74:50
+74:33-74:50
     Type
-Internals.lc 74:42-74:50
+74:42-74:50
     Type | Type
-Internals.lc 75:1-75:17
+75:1-75:17
     Float -> Float -> Ordering
-Internals.lc 75:24-75:29
+75:24-75:29
     Type
-Internals.lc 75:33-75:38
+75:33-75:38
     Type
-Internals.lc 75:33-75:50
+75:33-75:50
     Type
-Internals.lc 75:42-75:50
+75:42-75:50
     Type | Type
-Internals.lc 76:1-76:16
+76:1-76:16
     Char -> Char -> Ordering
-Internals.lc 76:24-76:28
+76:24-76:28
     Type
-Internals.lc 76:33-76:37
+76:33-76:37
     Type
-Internals.lc 76:33-76:50
+76:33-76:50
     Type
-Internals.lc 76:42-76:50
+76:42-76:50
     Type | Type
-Internals.lc 77:1-77:18
+77:1-77:18
     String -> String -> Ordering
-Internals.lc 77:24-77:30
+77:24-77:30
     Type
-Internals.lc 77:34-77:40
+77:34-77:40
     Type
-Internals.lc 77:34-77:52
+77:34-77:52
     Type
-Internals.lc 77:44-77:52
+77:44-77:52
     Type | Type
-Internals.lc 78:1-78:14
+78:1-78:14
     Int -> Int
-Internals.lc 78:24-78:27
+78:24-78:27
     Type
-Internals.lc 78:33-78:36
+78:33-78:36
     Type | Type
-Internals.lc 79:1-79:15
+79:1-79:15
     Word -> Word
-Internals.lc 79:24-79:28
+79:24-79:28
     Type
-Internals.lc 79:33-79:37
+79:33-79:37
     Type | Type
-Internals.lc 80:1-80:16
+80:1-80:16
     Float -> Float
-Internals.lc 80:24-80:29
+80:24-80:29
     Type
-Internals.lc 80:33-80:38
+80:33-80:38
     Type | Type
-Internals.lc 81:1-81:11
+81:1-81:11
     Int -> Int -> Int
-Internals.lc 81:24-81:27
+81:24-81:27
     Type
-Internals.lc 81:33-81:36
+81:33-81:36
     Type
-Internals.lc 81:33-81:45
+81:33-81:45
     Type
-Internals.lc 81:42-81:45
+81:42-81:45
     Type | Type
-Internals.lc 82:1-82:11
+82:1-82:11
     Int -> Int -> Int
-Internals.lc 82:24-82:27
+82:24-82:27
     Type
-Internals.lc 82:33-82:36
+82:33-82:36
     Type
-Internals.lc 82:33-82:45
+82:33-82:45
     Type
-Internals.lc 82:42-82:45
+82:42-82:45
     Type | Type
-Internals.lc 83:1-83:11
+83:1-83:11
     Int -> Int -> Int
-Internals.lc 83:24-83:27
+83:24-83:27
     Type
-Internals.lc 83:33-83:36
+83:33-83:36
     Type
-Internals.lc 83:33-83:45
+83:33-83:45
     Type
-Internals.lc 83:42-83:45
+83:42-83:45
     Type | Type
-Internals.lc 84:1-84:14
+84:1-84:14
     Float -> Float
-Internals.lc 84:24-84:29
+84:24-84:29
     Type
-Internals.lc 84:33-84:38
+84:33-84:38
     Type | Type
-Internals.lc 85:1-85:10
+85:1-85:10
     Float -> Int
-Internals.lc 85:24-85:29
+85:24-85:29
     Type
-Internals.lc 85:33-85:36
+85:33-85:36
     Type | Type
-Internals.lc 88:19-88:23
+88:19-88:23
     Type
-Internals.lc 88:19-88:38
+88:19-88:38
     Type
-Internals.lc 88:27-88:28
+88:27-88:28
     _c
-Internals.lc 88:27-88:38
+88:27-88:38
     Type
-Internals.lc 88:32-88:33
+88:32-88:33
     Type
-Internals.lc 88:32-88:38
+88:32-88:38
     Type
-Internals.lc 88:37-88:38
+88:37-88:38
     Type | Type
-Internals.lc 89:1-89:15
+89:1-89:15
     forall a . Bool -> a -> a -> a
-Internals.lc 89:28-89:29
+89:28-89:29
     _d
-Internals.lc 89:28-90:29
+89:28-90:29
     Bool -> _d | _d
-Internals.lc 90:28-90:29
+90:28-90:29
     _e
-Internals.lc 92:1-92:5
+92:1-92:5
     Ordering -> Bool
-Internals.lc 92:11-92:15
+92:11-92:15
     Bool
-Internals.lc 92:11-93:15
+92:11-93:15
     Bool -> Ordering -> Bool
-Internals.lc 93:10-93:15
+93:10-93:15
     Bool | Bool
-Internals.lc 96:7-96:10
+96:7-96:10
     Type -> Constraint | Type -> Constraint | Constraint | Type
       -> Constraint | Constraint | Type -> Constraint | Constraint
-Internals.lc 96:7-97:22
+96:7-97:22
     Type
-Internals.lc 96:7-98:32
+96:7-98:32
     Type
-Internals.lc 96:7-99:19
+96:7-99:19
     Type
-Internals.lc 97:3-97:10
+97:3-97:10
     forall a . Num a => Int -> a
-Internals.lc 97:14-97:17
+97:14-97:17
     Type
-Internals.lc 97:14-97:22
+97:14-97:22
     Type
-Internals.lc 97:21-97:22
+97:21-97:22
     Type | Type
-Internals.lc 98:3-98:10
+98:3-98:10
     forall a . Num a => a -> a -> Ordering
-Internals.lc 98:14-98:15
+98:14-98:15
     Type
-Internals.lc 98:14-98:32
+98:14-98:32
     Type
-Internals.lc 98:19-98:20
+98:19-98:20
     Type
-Internals.lc 98:19-98:32
+98:19-98:32
     Type
-Internals.lc 98:24-98:32
+98:24-98:32
     Type | Type
-Internals.lc 99:3-99:9
+99:3-99:9
     forall a . Num a => a -> a
-Internals.lc 99:13-99:14
+99:13-99:14
     Type
-Internals.lc 99:13-99:19
+99:13-99:19
     Type
-Internals.lc 99:18-99:19
+99:18-99:19
     Type | Type
-Internals.lc 102:13-114:25
+102:13-114:25
     Int -> _b
-Internals.lc 102:19-102:20
+102:19-102:20
     _b
-Internals.lc 103:13-103:27
+103:13-103:27
     Int -> Int -> Ordering
-Internals.lc 103:13-115:22
+103:13-115:22
     _b -> _b -> Ordering
-Internals.lc 104:13-104:26
+104:13-104:26
     Int -> Int
-Internals.lc 104:13-116:22
+104:13-116:22
     _b -> _b
-Internals.lc 106:13-106:26
+106:13-106:26
     Int -> Word
-Internals.lc 106:13-114:25
+106:13-114:25
     Int -> _b
-Internals.lc 107:13-107:28
+107:13-107:28
     Word -> Word -> Ordering
-Internals.lc 107:13-115:22
+107:13-115:22
     _b -> _b -> Ordering
-Internals.lc 108:13-108:27
+108:13-108:27
     Word -> Word
-Internals.lc 108:13-116:22
+108:13-116:22
     _b -> _b
-Internals.lc 110:13-110:27
+110:13-110:27
     Int -> Float
-Internals.lc 110:13-114:25
+110:13-114:25
     Int -> _b
-Internals.lc 111:13-111:29
+111:13-111:29
     Float -> Float -> Ordering
-Internals.lc 111:13-115:22
+111:13-115:22
     _b -> _b -> Ordering
-Internals.lc 112:13-112:28
+112:13-112:28
     Float -> Float
-Internals.lc 112:13-116:22
+112:13-116:22
     _b -> _b
-Internals.lc 114:13-114:25
+114:13-114:25
     Int -> Nat
-Internals.lc 115:13-115:22
+115:13-115:22
     forall a . a
-Internals.lc 116:13-116:22
+116:13-116:22
     forall a . a
-Internals.lc 118:7-118:9
+118:7-118:9
     Type -> Constraint | Type -> Constraint | Constraint
-Internals.lc 118:7-119:27
+118:7-119:27
     Type
-Internals.lc 119:6-119:8
+119:6-119:8
     forall a . Eq a => a -> a -> Bool
-Internals.lc 119:13-119:14
+119:13-119:14
     Type
-Internals.lc 119:13-119:27
+119:13-119:27
     Type
-Internals.lc 119:18-119:19
+119:18-119:19
     Type
-Internals.lc 119:18-119:27
+119:18-119:27
     Type
-Internals.lc 119:23-119:27
+119:23-119:27
     Type | Type
-Internals.lc 123:35-123:39
+123:35-123:39
     Ordering -> Bool
-Internals.lc 123:35-123:63
+123:35-123:63
     Bool
-Internals.lc 123:35-134:29
+123:35-134:29
     _b -> _b -> Bool
-Internals.lc 123:41-123:58
+123:41-123:58
     String -> String -> Ordering
-Internals.lc 123:41-123:60
+123:41-123:60
     String -> Ordering
-Internals.lc 123:41-123:62
+123:41-123:62
     Ordering
-Internals.lc 123:59-123:60
+123:59-123:60
     _d
-Internals.lc 123:61-123:62
+123:61-123:62
     _b
-Internals.lc 124:33-124:37
+124:33-124:37
     Ordering -> Bool
-Internals.lc 124:33-124:59
+124:33-124:59
     Bool
-Internals.lc 124:33-134:29
+124:33-134:29
     _b -> _b -> Bool
-Internals.lc 124:39-124:54
+124:39-124:54
     Char -> Char -> Ordering
-Internals.lc 124:39-124:56
+124:39-124:56
     Char -> Ordering
-Internals.lc 124:39-124:58
+124:39-124:58
     Ordering
-Internals.lc 124:55-124:56
+124:55-124:56
     _d
-Internals.lc 124:57-124:58
+124:57-124:58
     _b
-Internals.lc 125:32-125:36
+125:32-125:36
     Ordering -> Bool
-Internals.lc 125:32-125:57
+125:32-125:57
     Bool
-Internals.lc 125:32-134:29
+125:32-134:29
     _b -> _b -> Bool
-Internals.lc 125:38-125:52
+125:38-125:52
     Int -> Int -> Ordering
-Internals.lc 125:38-125:54
+125:38-125:54
     Int -> Ordering
-Internals.lc 125:38-125:56
+125:38-125:56
     Ordering
-Internals.lc 125:53-125:54
+125:53-125:54
     _d
-Internals.lc 125:55-125:56
+125:55-125:56
     _b
-Internals.lc 126:34-126:38
+126:34-126:38
     Ordering -> Bool
-Internals.lc 126:34-126:61
+126:34-126:61
     Bool
-Internals.lc 126:34-134:29
+126:34-134:29
     _b -> _b -> Bool
-Internals.lc 126:40-126:56
+126:40-126:56
     Float -> Float -> Ordering
-Internals.lc 126:40-126:58
+126:40-126:58
     Float -> Ordering
-Internals.lc 126:40-126:60
+126:40-126:60
     Ordering
-Internals.lc 126:57-126:58
+126:57-126:58
     _d
-Internals.lc 126:59-126:60
+126:59-126:60
     _b
-Internals.lc 128:20-128:24
+128:20-128:24
     Bool
-Internals.lc 128:20-130:19
+128:20-130:19
     Bool -> Bool | Bool
-Internals.lc 128:20-134:29
+128:20-134:29
     _b -> _b -> Bool
-Internals.lc 129:22-129:26
+129:22-129:26
     Bool
-Internals.lc 129:22-130:19
+129:22-130:19
     Bool -> Bool | Bool
-Internals.lc 130:14-130:19
+130:14-130:19
     Bool | Bool
-Internals.lc 132:24-132:28
+132:24-132:28
     Bool
-Internals.lc 132:24-134:29
+132:24-134:29
     Nat -> Bool
-Internals.lc 133:24-133:25
+133:24-133:25
     Nat
-Internals.lc 133:24-133:28
+133:24-133:28
     Nat -> Bool
-Internals.lc 133:24-133:30
+133:24-133:30
     Bool
-Internals.lc 133:24-134:29
+133:24-134:29
     Nat -> Bool
-Internals.lc 133:26-133:28
+133:26-133:28
     forall a . Eq a => a -> a -> Bool
-Internals.lc 133:29-133:30
+133:29-133:30
     Nat
-Internals.lc 134:24-134:29
+134:24-134:29
     Bool | Bool
-Internals.lc 136:6-136:10
+136:6-136:10
     Type -> Type | Type -> Type | Type -> Type | Type -> Type | Type -> Type | Type
-Internals.lc 136:6-136:12
+136:6-136:12
     Type | Type | Type | Type
-Internals.lc 136:6-136:23
+136:6-136:23
     Type | Type | Type
-Internals.lc 136:6-136:35
+136:6-136:35
     Type | Type
-Internals.lc 136:11-136:12
+136:11-136:12
     Type | Type
-Internals.lc 136:15-136:18
+136:15-136:18
     forall a . [a] | [_b]
-Internals.lc 136:22-136:23
+136:22-136:23
     forall a . a -> [a] -> [a] | [_e] | Type | Type | Type
-Internals.lc 136:25-136:26
+136:25-136:26
     Type
-Internals.lc 136:28-136:32
+136:28-136:32
     Type -> Type
-Internals.lc 136:28-136:34
+136:28-136:34
     Type
-Internals.lc 136:33-136:34
+136:33-136:34
     Type
-Internals.lc 140:6-140:11
+140:6-140:11
     [Type] -> Type | [Type] -> Type | Type | [Type] -> Type | Type | Type
-Internals.lc 140:6-142:45
+140:6-142:45
     Type | Type
-Internals.lc 140:15-140:21
+140:15-140:21
     Type
-Internals.lc 140:16-140:20
+140:16-140:20
     Type
-Internals.lc 140:25-140:29
+140:25-140:29
     Type | Type
-Internals.lc 141:5-141:9
+141:5-141:9
     ()
-Internals.lc 141:5-141:22
+141:5-141:22
     Type
-Internals.lc 141:13-141:18
+141:13-141:18
     [Type] -> Type
-Internals.lc 141:13-141:22
+141:13-141:22
     Type
-Internals.lc 141:19-141:22
+141:19-141:22
     forall a . [a] | forall a . [a]
-Internals.lc 142:5-142:10
+142:5-142:10
     forall a (b :: [Type]) . a -> HList b -> HList (a : b) | HList (_d : _c)
-Internals.lc 142:5-142:45
+142:5-142:45
     Type | Type | Type | Type | Type
-Internals.lc 142:14-142:15
+142:14-142:15
     _d
-Internals.lc 142:14-142:45
+142:14-142:45
     Type | Type
-Internals.lc 142:19-142:24
+142:19-142:24
     [Type] -> Type
-Internals.lc 142:19-142:27
+142:19-142:27
     Type
-Internals.lc 142:19-142:45
+142:19-142:45
     Type
-Internals.lc 142:25-142:27
+142:25-142:27
     _c
-Internals.lc 142:31-142:36
+142:31-142:36
     [Type] -> Type
-Internals.lc 142:31-142:45
+142:31-142:45
     Type | Type
-Internals.lc 142:39-142:40
+142:39-142:40
     Type | Type
-Internals.lc 142:39-142:41
+142:39-142:41
     [Type] -> [Type] | [Type] -> [Type]
-Internals.lc 142:39-142:44
+142:39-142:44
     [Type] | [Type]
-Internals.lc 142:40-142:41
+142:40-142:41
     forall a . a -> [a] -> [a] | forall a . a -> [a] -> [a]
-Internals.lc 142:42-142:44
+142:42-142:44
     [Type] | [Type]
-Internals.lc 144:1-144:13
+144:1-144:13
     forall a -> a -> () -> a
-Internals.lc 144:29-144:30
+144:29-144:30
     _b
-Internals.lc 144:29-144:48
+144:29-144:48
     Type
-Internals.lc 144:34-144:39
+144:34-144:39
     [Type] -> Type
-Internals.lc 144:34-144:43
+144:34-144:43
     Type
-Internals.lc 144:34-144:48
+144:34-144:48
     Type
-Internals.lc 144:40-144:43
+144:40-144:43
     forall a . [a]
-Internals.lc 144:47-144:48
+144:47-144:48
     Type | Type
-Internals.lc 145:1-145:14
+145:1-145:14
     forall a (b :: [Type]) . forall c -> (a -> HList b -> c) -> HList (a : b) -> c
-Internals.lc 146:21-146:25
+146:21-146:25
     Type
-Internals.lc 146:33-146:37
+146:33-146:37
     Type -> Type
-Internals.lc 146:33-146:42
+146:33-146:42
     Type
-Internals.lc 146:33-150:9
+146:33-150:9
     Type
-Internals.lc 146:38-146:42
+146:38-146:42
     Type
-Internals.lc 147:8-150:9
+147:8-150:9
     Type
-Internals.lc 148:8-150:9
+148:8-150:9
     Type
-Internals.lc 148:9-148:10
+148:9-148:10
     Type
-Internals.lc 148:14-148:19
+148:14-148:19
     [Type] -> Type
-Internals.lc 148:14-148:21
+148:14-148:21
     Type
-Internals.lc 148:14-148:26
+148:14-148:26
     Type
-Internals.lc 148:20-148:21
+148:20-148:21
     [Type]
-Internals.lc 148:25-148:26
+148:25-148:26
     _d | Type
-Internals.lc 149:8-149:13
+149:8-149:13
     [Type] -> Type
-Internals.lc 149:8-149:20
+149:8-149:20
     Type
-Internals.lc 149:8-150:9
+149:8-150:9
     Type
-Internals.lc 149:15-149:16
+149:15-149:16
     Type
-Internals.lc 149:15-149:17
+149:15-149:17
     [Type] -> [Type]
-Internals.lc 149:15-149:19
+149:15-149:19
     [Type]
-Internals.lc 149:16-149:17
+149:16-149:17
     forall a . a -> [a] -> [a]
-Internals.lc 149:18-149:19
+149:18-149:19
     [Type]
-Internals.lc 150:8-150:9
+150:8-150:9
     Type | Type
\ No newline at end of file
diff --git a/testdata/Material.out b/testdata/Material.out
index 3fddcea1..58a16c18 100644
--- a/testdata/Material.out
+++ b/testdata/Material.out
@@ -1148,425 +1148,425 @@ saTextureUniform :: StageAttrs -> String
 saTextureUniform
   = \a -> case'StageAttrs (\_ -> 'String) (\_ _ _ _ _ _ _ _ _ _ b -> _rhs b) a
 ------------ tooltips
-Material.lc 7:18-7:23
+7:18-7:23
     Type
-Material.lc 8:1-8:14
+8:1-8:14
     Float
-Material.lc 8:17-8:18
+8:17-8:18
     _b
-Material.lc 10:6-10:12
+10:6-10:12
     Type | Type | Type | Type | Type | Type
-Material.lc 10:6-11:13
+10:6-11:13
     Type
-Material.lc 10:6-15:39
+10:6-15:39
     Type | Type | Type
-Material.lc 11:7-11:13
+11:7-11:13
     Vec 4 Float
       -> Vec 4 Float
         -> Vec 3 Float
           -> Vec 4 Float -> Entity | Entity | Type | Type | Type | Type | Type
-Material.lc 12:7-12:20
+12:7-12:20
     Entity -> VecS Float 4
-Material.lc 12:28-12:31
+12:28-12:31
     Nat -> Type -> Type
-Material.lc 12:28-12:33
+12:28-12:33
     Type -> Type
-Material.lc 12:28-12:39
+12:28-12:39
     Type
-Material.lc 12:32-12:33
+12:32-12:33
     _b
-Material.lc 12:34-12:39
+12:34-12:39
     Type
-Material.lc 13:7-13:21
+13:7-13:21
     Entity -> VecS Float 4
-Material.lc 13:28-13:31
+13:28-13:31
     Nat -> Type -> Type
-Material.lc 13:28-13:33
+13:28-13:33
     Type -> Type
-Material.lc 13:28-13:39
+13:28-13:39
     Type
-Material.lc 13:32-13:33
+13:32-13:33
     _b
-Material.lc 13:34-13:39
+13:34-13:39
     Type
-Material.lc 14:7-14:16
+14:7-14:16
     Entity -> VecS Float 3
-Material.lc 14:28-14:31
+14:28-14:31
     Nat -> Type -> Type
-Material.lc 14:28-14:33
+14:28-14:33
     Type -> Type
-Material.lc 14:28-14:39
+14:28-14:39
     Type
-Material.lc 14:32-14:33
+14:32-14:33
     _b
-Material.lc 14:34-14:39
+14:34-14:39
     Type
-Material.lc 15:7-15:18
+15:7-15:18
     Entity -> VecS Float 4
-Material.lc 15:28-15:31
+15:28-15:31
     Nat -> Type -> Type
-Material.lc 15:28-15:33
+15:28-15:33
     Type -> Type
-Material.lc 15:28-15:39
+15:28-15:39
     Type
-Material.lc 15:32-15:33
+15:32-15:33
     _b
-Material.lc 15:34-15:39
+15:34-15:39
     Type
-Material.lc 18:6-18:14
+18:6-18:14
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 18:6-24:15
+18:6-24:15
     Type | Type | Type | Type | Type | Type
-Material.lc 19:7-19:13
+19:7-19:13
     WaveType
-Material.lc 20:7-20:18
+20:7-20:18
     WaveType
-Material.lc 21:7-21:16
+21:7-21:16
     WaveType
-Material.lc 22:7-22:18
+22:7-22:18
     WaveType
-Material.lc 23:7-23:25
+23:7-23:25
     WaveType
-Material.lc 24:7-24:15
+24:7-24:15
     WaveType
-Material.lc 27:6-27:10
+27:6-27:10
     Type | Type | Type | Type | Type | Type
-Material.lc 27:6-27:17
+27:6-27:17
     Type
-Material.lc 27:6-27:50
+27:6-27:50
     Type | Type | Type | Type
-Material.lc 27:13-27:17
+27:13-27:17
     WaveType
       -> Float
         -> Float
           -> Float -> Float -> Wave | Wave | Type | Type | Type | Type | Type | Type
-Material.lc 27:18-27:26
+27:18-27:26
     Type
-Material.lc 27:27-27:32
+27:27-27:32
     Type
-Material.lc 27:33-27:38
+27:33-27:38
     Type
-Material.lc 27:39-27:44
+27:39-27:44
     Type
-Material.lc 27:45-27:50
+27:45-27:50
     Type
-Material.lc 29:6-29:12
+29:6-29:12
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 29:6-32:32
+29:6-32:32
     Type | Type
-Material.lc 29:6-33:32
+29:6-33:32
     Type
-Material.lc 29:6-34:27
+29:6-34:27
     Type
-Material.lc 29:6-44:13
+29:6-44:13
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 29:6-44:24
+29:6-44:24
     Type
-Material.lc 30:7-30:19
+30:7-30:19
     Deform
-Material.lc 31:7-31:20
+31:7-31:20
     Deform
-Material.lc 32:7-32:14
+32:7-32:14
     Float -> Float -> Float -> Deform | Deform | Type | Type | Type | Type
-Material.lc 32:15-32:20
+32:15-32:20
     Type
-Material.lc 32:21-32:26
+32:21-32:26
     Type
-Material.lc 32:27-32:32
+32:27-32:32
     Type
-Material.lc 33:7-33:13
+33:7-33:13
     Vec 3 Float -> Wave -> Deform | Deform | Type | Type | Type
-Material.lc 33:15-33:18
+33:15-33:18
     Nat -> Type -> Type
-Material.lc 33:15-33:20
+33:15-33:20
     Type -> Type
-Material.lc 33:15-33:26
+33:15-33:26
     Type
-Material.lc 33:19-33:20
+33:19-33:20
     _b
-Material.lc 33:21-33:26
+33:21-33:26
     Type
-Material.lc 33:28-33:32
+33:28-33:32
     Type
-Material.lc 34:7-34:15
+34:7-34:15
     Float -> Float -> Deform | Deform | Type | Type | Type
-Material.lc 34:16-34:21
+34:16-34:21
     Type
-Material.lc 34:22-34:27
+34:22-34:27
     Type
-Material.lc 35:7-35:25
+35:7-35:25
     Deform
-Material.lc 36:7-36:14
+36:7-36:14
     Deform
-Material.lc 37:7-37:14
+37:7-37:14
     Deform
-Material.lc 38:7-38:14
+38:7-38:14
     Deform
-Material.lc 39:7-39:14
+39:7-39:14
     Deform
-Material.lc 40:7-40:14
+40:7-40:14
     Deform
-Material.lc 41:7-41:14
+41:7-41:14
     Deform
-Material.lc 42:7-42:14
+42:7-42:14
     Deform
-Material.lc 43:7-43:14
+43:7-43:14
     Deform
-Material.lc 44:7-44:13
+44:7-44:13
     Float -> Wave -> Deform | Deform | Type | Type | Type
-Material.lc 44:14-44:19
+44:14-44:19
     Type
-Material.lc 44:20-44:24
+44:20-44:24
     Type
-Material.lc 47:6-47:14
+47:6-47:14
     Type | Type | Type | Type | Type | Type | Type
-Material.lc 47:6-50:18
+47:6-50:18
     Type | Type | Type
-Material.lc 48:7-48:20
+48:7-48:20
     CullType
-Material.lc 49:7-49:19
+49:7-49:19
     CullType
-Material.lc 50:7-50:18
+50:7-50:18
     CullType
-Material.lc 53:6-53:15
+53:6-53:15
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 53:6-64:13
+53:6-64:13
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 54:7-54:17
+54:7-54:17
     Blending'
-Material.lc 55:7-55:17
+55:7-55:17
     Blending'
-Material.lc 56:7-56:12
+56:7-56:12
     Blending'
-Material.lc 57:7-57:25
+57:7-57:25
     Blending'
-Material.lc 58:7-58:25
+58:7-58:25
     Blending'
-Material.lc 59:7-59:25
+59:7-59:25
     Blending'
-Material.lc 60:7-60:25
+60:7-60:25
     Blending'
-Material.lc 61:7-61:17
+61:7-61:17
     Blending'
-Material.lc 62:7-62:25
+62:7-62:25
     Blending'
-Material.lc 63:7-63:17
+63:7-63:17
     Blending'
-Material.lc 64:7-64:13
+64:7-64:13
     Blending'
-Material.lc 67:6-67:12
+67:6-67:12
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 67:6-69:34
+67:6-69:34
     Type | Type
-Material.lc 67:6-78:20
+67:6-78:20
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 68:7-68:15
+68:7-68:15
     Wave -> RGBGen | RGBGen | Type | Type
-Material.lc 68:16-68:20
+68:16-68:20
     Type
-Material.lc 69:7-69:16
+69:7-69:16
     Float -> Float -> Float -> RGBGen | RGBGen | Type | Type | Type | Type
-Material.lc 69:17-69:22
+69:17-69:22
     Type
-Material.lc 69:23-69:28
+69:23-69:28
     Type
-Material.lc 69:29-69:34
+69:29-69:34
     Type
-Material.lc 70:7-70:19
+70:7-70:19
     RGBGen
-Material.lc 71:7-71:27
+71:7-71:27
     RGBGen
-Material.lc 72:7-72:17
+72:7-72:17
     RGBGen
-Material.lc 73:7-73:25
+73:7-73:25
     RGBGen
-Material.lc 74:7-74:22
+74:7-74:22
     RGBGen
-Material.lc 75:7-75:17
+75:7-75:17
     RGBGen
-Material.lc 76:7-76:26
+76:7-76:26
     RGBGen
-Material.lc 77:7-77:25
+77:7-77:25
     RGBGen
-Material.lc 78:7-78:20
+78:7-78:20
     RGBGen
-Material.lc 81:6-81:14
+81:6-81:14
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 81:6-90:23
+81:6-90:23
     Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 82:7-82:13
+82:7-82:13
     Wave -> AlphaGen | AlphaGen | Type | Type
-Material.lc 82:14-82:18
+82:14-82:18
     Type
-Material.lc 83:7-83:14
+83:7-83:14
     Float -> AlphaGen | AlphaGen | Type | Type
-Material.lc 83:15-83:20
+83:15-83:20
     Type
-Material.lc 84:7-84:15
+84:7-84:15
     AlphaGen
-Material.lc 85:7-85:17
+85:7-85:17
     AlphaGen
-Material.lc 86:7-86:15
+86:7-86:15
     AlphaGen
-Material.lc 87:7-87:23
+87:7-87:23
     AlphaGen
-Material.lc 88:7-88:15
+88:7-88:15
     AlphaGen
-Material.lc 89:7-89:25
+89:7-89:25
     AlphaGen
-Material.lc 90:7-90:23
+90:7-90:23
     AlphaGen
-Material.lc 93:6-93:11
+93:6-93:11
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 93:6-97:44
+93:6-97:44
     Type
-Material.lc 93:6-98:19
+93:6-98:19
     Type | Type | Type | Type | Type
-Material.lc 94:7-94:14
+94:7-94:14
     TCGen
-Material.lc 95:7-95:18
+95:7-95:18
     TCGen
-Material.lc 96:7-96:21
+96:7-96:21
     TCGen
-Material.lc 97:7-97:16
+97:7-97:16
     Vec 3 Float -> Vec 3 Float -> TCGen | TCGen | Type | Type | Type
-Material.lc 97:18-97:21
+97:18-97:21
     Nat -> Type -> Type
-Material.lc 97:18-97:23
+97:18-97:23
     Type -> Type
-Material.lc 97:18-97:29
+97:18-97:29
     Type
-Material.lc 97:22-97:23
+97:22-97:23
     _b
-Material.lc 97:24-97:29
+97:24-97:29
     Type
-Material.lc 97:32-97:35
+97:32-97:35
     Nat -> Type -> Type
-Material.lc 97:32-97:37
+97:32-97:37
     Type -> Type
-Material.lc 97:32-97:43
+97:32-97:43
     Type
-Material.lc 97:36-97:37
+97:36-97:37
     _b
-Material.lc 97:38-97:43
+97:38-97:43
     Type
-Material.lc 98:7-98:19
+98:7-98:19
     TCGen
-Material.lc 101:6-101:11
+101:6-101:11
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 101:6-104:28
+101:6-104:28
     Type
-Material.lc 101:6-105:27
+101:6-105:27
     Type
-Material.lc 101:6-107:55
+101:6-107:55
     Type | Type | Type | Type | Type
-Material.lc 101:6-108:14
+101:6-108:14
     Type | Type | Type | Type | Type | Type | Type
-Material.lc 101:6-108:38
+101:6-108:38
     Type | Type | Type
-Material.lc 102:7-102:25
+102:7-102:25
     TCMod
-Material.lc 103:7-103:16
+103:7-103:16
     Float -> TCMod | TCMod | Type | Type
-Material.lc 103:17-103:22
+103:17-103:22
     Type
-Material.lc 104:7-104:16
+104:7-104:16
     Float -> Float -> TCMod | TCMod | Type | Type | Type
-Material.lc 104:17-104:22
+104:17-104:22
     Type
-Material.lc 104:23-104:28
+104:23-104:28
     Type
-Material.lc 105:7-105:15
+105:7-105:15
     Float -> Float -> TCMod | TCMod | Type | Type | Type
-Material.lc 105:16-105:21
+105:16-105:21
     Type
-Material.lc 105:22-105:27
+105:22-105:27
     Type
-Material.lc 106:7-106:17
+106:7-106:17
     Wave -> TCMod | TCMod | Type | Type
-Material.lc 106:18-106:22
+106:18-106:22
     Type
-Material.lc 107:7-107:19
+107:7-107:19
     Float
       -> Float
         -> Float
           -> Float
             -> Float
               -> Float -> TCMod | TCMod | Type | Type | Type | Type | Type | Type | Type
-Material.lc 107:20-107:25
+107:20-107:25
     Type
-Material.lc 107:26-107:31
+107:26-107:31
     Type
-Material.lc 107:32-107:37
+107:32-107:37
     Type
-Material.lc 107:38-107:43
+107:38-107:43
     Type
-Material.lc 107:44-107:49
+107:44-107:49
     Type
-Material.lc 107:50-107:55
+107:50-107:55
     Type
-Material.lc 108:7-108:14
+108:7-108:14
     Float
       -> Float -> Float -> Float -> TCMod | TCMod | Type | Type | Type | Type | Type
-Material.lc 108:15-108:20
+108:15-108:20
     Type
-Material.lc 108:21-108:26
+108:21-108:26
     Type
-Material.lc 108:27-108:32
+108:27-108:32
     Type
-Material.lc 108:33-108:38
+108:33-108:38
     Type
-Material.lc 111:6-111:18
+111:6-111:18
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 111:6-114:35
+111:6-114:35
     Type
-Material.lc 111:6-116:20
+111:6-116:20
     Type | Type | Type | Type | Type
-Material.lc 112:7-112:13
+112:7-112:13
     String -> StageTexture | StageTexture | Type | Type
-Material.lc 112:21-112:27
+112:21-112:27
     Type
-Material.lc 113:7-113:18
+113:7-113:18
     String -> StageTexture | StageTexture | Type | Type
-Material.lc 113:21-113:27
+113:21-113:27
     Type
-Material.lc 114:7-114:17
+114:7-114:17
     Float -> [String] -> StageTexture | StageTexture | Type | Type | Type
-Material.lc 114:21-114:26
+114:21-114:26
     Type
-Material.lc 114:27-114:35
+114:27-114:35
     Type
-Material.lc 114:28-114:34
+114:28-114:34
     Type
-Material.lc 115:7-115:18
+115:7-115:18
     StageTexture
-Material.lc 116:7-116:20
+116:7-116:20
     StageTexture
-Material.lc 119:6-119:19
+119:6-119:19
     Type | Type | Type | Type | Type | Type | Type
-Material.lc 119:6-122:14
+119:6-122:14
     Type | Type | Type
-Material.lc 120:7-120:12
+120:7-120:12
     AlphaFunction
-Material.lc 121:7-121:14
+121:7-121:14
     AlphaFunction
-Material.lc 122:7-122:14
+122:7-122:14
     AlphaFunction
-Material.lc 125:6-125:19
+125:6-125:19
     Type | Type | Type | Type | Type | Type
-Material.lc 125:6-127:15
+125:6-127:15
     Type | Type
-Material.lc 126:7-126:14
+126:7-126:14
     DepthFunction
-Material.lc 127:7-127:15
+127:7-127:15
     DepthFunction
-Material.lc 130:6-130:16
+130:6-130:16
     Type | Type | Type | Type | Type | Type
-Material.lc 130:6-131:17
+130:6-131:17
     Type
-Material.lc 130:6-144:34
+130:6-144:34
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 131:7-131:17
+131:7-131:17
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -1579,71 +1579,71 @@ Material.lc 131:7-131:17
                       -> Bool
                         -> String
                           -> StageAttrs | StageAttrs | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 132:7-132:14
+132:7-132:14
     StageAttrs -> Maybe (Blending', Blending')
-Material.lc 132:25-132:30
+132:25-132:30
     Type -> Type
-Material.lc 132:25-132:53
+132:25-132:53
     Type
-Material.lc 132:31-132:53
+132:31-132:53
     Type
-Material.lc 132:32-132:41
+132:32-132:41
     Type
-Material.lc 132:32-132:52
+132:32-132:52
     [Type]
-Material.lc 132:43-132:52
+132:43-132:52
     Type | [Type]
-Material.lc 133:7-133:15
+133:7-133:15
     StageAttrs -> RGBGen
-Material.lc 133:24-133:30
+133:24-133:30
     Type
-Material.lc 134:7-134:17
+134:7-134:17
     StageAttrs -> AlphaGen
-Material.lc 134:24-134:32
+134:24-134:32
     Type
-Material.lc 135:7-135:14
+135:7-135:14
     StageAttrs -> TCGen
-Material.lc 135:24-135:29
+135:24-135:29
     Type
-Material.lc 136:7-136:14
+136:7-136:14
     StageAttrs -> [TCMod]
-Material.lc 136:24-136:31
+136:24-136:31
     Type
-Material.lc 136:25-136:30
+136:25-136:30
     Type
-Material.lc 137:7-137:16
+137:7-137:16
     StageAttrs -> StageTexture
-Material.lc 137:24-137:36
+137:24-137:36
     Type
-Material.lc 138:7-138:19
+138:7-138:19
     StageAttrs -> Bool
-Material.lc 138:24-138:28
+138:24-138:28
     Type
-Material.lc 139:7-139:18
+139:7-139:18
     StageAttrs -> DepthFunction
-Material.lc 139:24-139:37
+139:24-139:37
     Type
-Material.lc 140:7-140:18
+140:7-140:18
     StageAttrs -> Maybe AlphaFunction
-Material.lc 140:25-140:30
+140:25-140:30
     Type -> Type
-Material.lc 140:25-140:44
+140:25-140:44
     Type
-Material.lc 140:31-140:44
+140:31-140:44
     Type
-Material.lc 143:7-143:26
+143:7-143:26
     StageAttrs -> Bool
-Material.lc 143:32-143:36
+143:32-143:36
     Type
-Material.lc 144:7-144:23
+144:7-144:23
     StageAttrs -> String
-Material.lc 144:28-144:34
+144:28-144:34
     Type
-Material.lc 148:22-148:32
+148:22-148:32
     Type
-Material.lc 149:1-149:18
+149:1-149:18
     StageAttrs
-Material.lc 149:21-149:31
+149:21-149:31
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -1651,72 +1651,72 @@ Material.lc 149:21-149:31
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-Material.lc 149:21-150:30
+149:21-150:30
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-Material.lc 149:21-151:36
+149:21-151:36
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-Material.lc 149:21-152:33
+149:21-152:33
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-Material.lc 149:21-153:35
+149:21-153:35
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-Material.lc 149:21-154:25
+149:21-154:25
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-Material.lc 149:21-155:36
+149:21-155:36
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-Material.lc 149:21-156:27
+149:21-156:27
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-Material.lc 149:21-157:31
+149:21-157:31
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-Material.lc 149:21-158:30
+149:21-158:30
     Bool -> String -> StageAttrs
-Material.lc 149:21-159:36
+149:21-159:36
     String -> StageAttrs
-Material.lc 149:21-161:6
+149:21-161:6
     StageAttrs
-Material.lc 150:23-150:30
+150:23-150:30
     forall a . Maybe a
-Material.lc 151:23-151:36
+151:23-151:36
     RGBGen
-Material.lc 152:23-152:33
+152:23-152:33
     AlphaGen
-Material.lc 153:23-153:35
+153:23-153:35
     TCGen
-Material.lc 154:23-154:25
+154:23-154:25
     forall a . [a]
-Material.lc 155:23-155:36
+155:23-155:36
     StageTexture
-Material.lc 156:23-156:27
+156:23-156:27
     Bool
-Material.lc 157:23-157:31
+157:23-157:31
     DepthFunction
-Material.lc 158:23-158:30
+158:23-158:30
     forall a . Maybe a
-Material.lc 159:31-159:36
+159:31-159:36
     Bool
-Material.lc 160:27-160:29
+160:27-160:29
     String
-Material.lc 163:6-163:17
+163:6-163:17
     Type | Type | Type | Type | Type | Type
-Material.lc 163:6-164:18
+163:6-164:18
     Type
-Material.lc 163:6-178:32
+163:6-178:32
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 164:7-164:18
+164:7-164:18
     ()
       -> ()
         -> Bool
@@ -1730,63 +1730,63 @@ Material.lc 164:7-164:18
                         -> [StageAttrs]
                           -> Bool
                             -> CommonAttrs | CommonAttrs | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 165:7-165:17
+165:7-165:17
     CommonAttrs -> ()
-Material.lc 165:28-165:30
+165:28-165:30
     Type
-Material.lc 166:7-166:17
+166:7-166:17
     CommonAttrs -> ()
-Material.lc 166:28-166:30
+166:28-166:30
     Type
-Material.lc 167:7-167:15
+167:7-167:15
     CommonAttrs -> Bool
-Material.lc 167:28-167:32
+167:28-167:32
     Type
-Material.lc 168:7-168:13
+168:7-168:13
     CommonAttrs -> Float
-Material.lc 168:28-168:33
+168:28-168:33
     Type
-Material.lc 169:7-169:23
+169:7-169:23
     CommonAttrs -> Bool
-Material.lc 169:28-169:32
+169:28-169:32
     Type
-Material.lc 170:7-170:16
+170:7-170:16
     CommonAttrs -> Bool
-Material.lc 170:28-170:32
+170:28-170:32
     Type
-Material.lc 171:7-171:13
+171:7-171:13
     CommonAttrs -> CullType
-Material.lc 171:28-171:36
+171:28-171:36
     Type
-Material.lc 172:7-172:23
+172:7-172:23
     CommonAttrs -> [Deform]
-Material.lc 172:28-172:36
+172:28-172:36
     Type
-Material.lc 172:29-172:35
+172:29-172:35
     Type
-Material.lc 173:7-173:18
+173:7-173:18
     CommonAttrs -> Bool
-Material.lc 173:28-173:32
+173:28-173:32
     Type
-Material.lc 174:7-174:22
+174:7-174:22
     CommonAttrs -> Bool
-Material.lc 174:28-174:32
+174:28-174:32
     Type
-Material.lc 175:7-175:15
+175:7-175:15
     CommonAttrs -> [StageAttrs]
-Material.lc 175:28-175:40
+175:28-175:40
     Type
-Material.lc 175:29-175:39
+175:29-175:39
     Type
-Material.lc 178:7-178:14
+178:7-178:14
     CommonAttrs -> Bool
-Material.lc 178:28-178:32
+178:28-178:32
     Type
-Material.lc 182:23-182:34
+182:23-182:34
     Type
-Material.lc 183:1-183:19
+183:1-183:19
     CommonAttrs
-Material.lc 183:22-183:33
+183:22-183:33
     ()
       -> ()
         -> Bool
@@ -1794,66 +1794,66 @@ Material.lc 183:22-183:33
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-Material.lc 183:22-184:29
+183:22-184:29
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-Material.lc 183:22-185:29
+183:22-185:29
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-Material.lc 183:22-186:32
+183:22-186:32
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-Material.lc 183:22-187:28
+183:22-187:28
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-Material.lc 183:22-188:32
+183:22-188:32
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-Material.lc 183:22-189:32
+183:22-189:32
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-Material.lc 183:22-190:40
+183:22-190:40
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-Material.lc 183:22-191:29
+183:22-191:29
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-Material.lc 183:22-192:32
+183:22-192:32
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-Material.lc 183:22-193:32
+183:22-193:32
     [StageAttrs] -> Bool -> CommonAttrs
-Material.lc 183:22-194:29
+183:22-194:29
     Bool -> CommonAttrs
-Material.lc 183:22-196:6
+183:22-196:6
     CommonAttrs
-Material.lc 184:27-184:29
+184:27-184:29
     ()
-Material.lc 185:27-185:29
+185:27-185:29
     ()
-Material.lc 186:27-186:32
+186:27-186:32
     Bool
-Material.lc 187:27-187:28
+187:27-187:28
     _b
-Material.lc 188:27-188:32
+188:27-188:32
     Bool
-Material.lc 189:27-189:32
+189:27-189:32
     Bool
-Material.lc 190:27-190:40
+190:27-190:40
     CullType
-Material.lc 191:27-191:29
+191:27-191:29
     forall a . [a]
-Material.lc 192:27-192:32
+192:27-192:32
     Bool
-Material.lc 193:27-193:32
+193:27-193:32
     Bool
-Material.lc 194:27-194:29
+194:27-194:29
     forall a . [a]
-Material.lc 195:27-195:32
+195:27-195:32
     Bool
\ No newline at end of file
diff --git a/testdata/Prelude.out b/testdata/Prelude.out
index 014b4c4e..0bad198a 100644
--- a/testdata/Prelude.out
+++ b/testdata/Prelude.out
@@ -1633,2859 +1633,2859 @@ zip
 ||| :: Bool -> Bool -> Bool
 ||| = \a b -> case'Bool (\_ -> 'Bool) (_rhs b) (_rhs True) a
 ------------ tooltips
-Prelude.lc 16:1-16:6
+16:1-16:6
     forall a b . a -> b -> a
-Prelude.lc 16:13-16:14
+16:13-16:14
     _d
-Prelude.lc 18:1-18:10
+18:1-18:10
     Bool
-Prelude.lc 18:13-18:17
+18:13-18:17
     Bool
-Prelude.lc 20:3-20:4
+20:3-20:4
     forall a b . a -> (a -> b) -> b
-Prelude.lc 20:9-20:10
+20:9-20:10
     _b
-Prelude.lc 20:11-20:12
+20:11-20:12
     _g
-Prelude.lc 22:2-22:3
+22:2-22:3
     forall a b . (a -> b) -> a -> b
-Prelude.lc 22:15-22:16
+22:15-22:16
     _d
-Prelude.lc 22:17-22:18
+22:17-22:18
     _e
-Prelude.lc 23:2-23:3
+23:2-23:3
     forall a b c . (b -> c) -> (a -> b) -> a -> c
-Prelude.lc 23:17-23:18
+23:17-23:18
     _f
-Prelude.lc 23:20-23:21
+23:20-23:21
     _g
-Prelude.lc 23:22-23:23
+23:22-23:23
     _h
-Prelude.lc 25:1-25:8
+25:1-25:8
     forall a b c . (a -> c -> b) -> (a, c) -> b
-Prelude.lc 25:20-25:21
+25:20-25:21
     _o
-Prelude.lc 25:20-25:25
+25:20-25:25
     _c | _d
-Prelude.lc 25:22-25:23
+25:22-25:23
     _n
-Prelude.lc 25:24-25:25
+25:24-25:25
     _j
-Prelude.lc 27:2-27:5
+27:2-27:5
     forall a b c d . (a -> c) -> (b -> d) -> (a, b) -> (c, d)
-Prelude.lc 27:20-27:30
+27:20-27:30
     (_b, _a) | (_b, _a) | (_b, _a)
-Prelude.lc 27:21-27:22
+27:21-27:22
     _s
-Prelude.lc 27:23-27:24
+27:23-27:24
     _p
-Prelude.lc 27:26-27:27
+27:26-27:27
     _r
-Prelude.lc 27:26-27:29
+27:26-27:29
     ((_a))
-Prelude.lc 27:28-27:29
+27:28-27:29
     _l
-Prelude.lc 29:1-29:3
+29:1-29:3
     Float
-Prelude.lc 29:6-29:23
+29:6-29:23
     Float
-Prelude.lc 31:8-31:11
+31:8-31:11
     Type
-Prelude.lc 31:8-31:29
+31:8-31:29
     Type | Type
-Prelude.lc 31:9-31:10
+31:9-31:10
     _d
-Prelude.lc 31:15-31:18
+31:15-31:18
     Type
-Prelude.lc 31:15-31:29
+31:15-31:29
     Type
-Prelude.lc 31:16-31:17
+31:16-31:17
     _c
-Prelude.lc 31:22-31:29
+31:22-31:29
     Type | Type
-Prelude.lc 31:23-31:28
+31:23-31:28
     Type
-Prelude.lc 31:24-31:25
+31:24-31:25
     Type
-Prelude.lc 31:24-31:27
+31:24-31:27
     [Type]
-Prelude.lc 31:26-31:27
+31:26-31:27
     Type | [Type]
-Prelude.lc 32:1-32:4
+32:1-32:4
     forall a b . [a] -> [b] -> [(a, b)]
-Prelude.lc 32:22-32:24
+32:22-32:24
     forall a . [a]
-Prelude.lc 32:22-34:39
+32:22-34:39
     [_a] -> [(_a, _d)] | [(_d, _c)]
-Prelude.lc 33:22-33:24
+33:22-33:24
     forall a . [a]
-Prelude.lc 33:22-34:39
+33:22-34:39
     [_a] -> [(_e, _a)] | [(_c, _f)]
-Prelude.lc 34:23-34:28
+34:23-34:28
     (_h, _d)
-Prelude.lc 34:23-34:29
+34:23-34:29
     [(_h, _d)] -> [(_h, _d)]
-Prelude.lc 34:23-34:39
+34:23-34:39
     [(_g, _c)]
-Prelude.lc 34:24-34:25
+34:24-34:25
     _k
-Prelude.lc 34:26-34:27
+34:26-34:27
     _g | ((_d))
-Prelude.lc 34:28-34:29
+34:28-34:29
     forall a . a -> [a] -> [a]
-Prelude.lc 34:30-34:33
+34:30-34:33
     forall a b . [a] -> [b] -> [(a, b)]
-Prelude.lc 34:30-34:36
+34:30-34:36
     [_a] -> [(_h, _a)]
-Prelude.lc 34:30-34:39
+34:30-34:39
     [(_g, _c)]
-Prelude.lc 34:34-34:36
+34:34-34:36
     [_i]
-Prelude.lc 34:37-34:39
+34:37-34:39
     [_c]
-Prelude.lc 36:10-36:17
+36:10-36:17
     Type
-Prelude.lc 36:10-36:30
+36:10-36:30
     Type | Type
-Prelude.lc 36:11-36:16
+36:11-36:16
     Type
-Prelude.lc 36:12-36:13
+36:12-36:13
     _e
-Prelude.lc 36:12-36:15
+36:12-36:15
     [Type]
-Prelude.lc 36:14-36:15
+36:14-36:15
     _c | [Type]
-Prelude.lc 36:21-36:30
+36:21-36:30
     Type | Type
-Prelude.lc 36:22-36:25
+36:22-36:25
     Type
-Prelude.lc 36:22-36:29
+36:22-36:29
     [Type]
-Prelude.lc 36:23-36:24
+36:23-36:24
     Type
-Prelude.lc 36:26-36:29
+36:26-36:29
     Type | [Type]
-Prelude.lc 36:27-36:28
+36:27-36:28
     Type
-Prelude.lc 37:1-37:6
+37:1-37:6
     forall a b . [(a, b)] -> ([a], [b])
-Prelude.lc 37:12-37:19
+37:12-37:19
     ([_b], [_a])
-Prelude.lc 37:12-39:27
+37:12-39:27
     [(_b, _a)] -> ([_b], [_a]) | ([_c], [_b])
-Prelude.lc 37:13-37:15
+37:13-37:15
     forall a . [a]
-Prelude.lc 37:16-37:18
+37:16-37:18
     forall a . [a] | (([_a]))
-Prelude.lc 38:20-38:31
+38:20-38:31
     ([_n], [_i])
-Prelude.lc 38:20-39:27
+38:20-39:27
     ([_h], [_c]) | ([_d], [_a]) | ([_d], [_c])
-Prelude.lc 38:21-38:22
+38:21-38:22
     _s
-Prelude.lc 38:21-38:23
+38:21-38:23
     [_r] -> [_r]
-Prelude.lc 38:21-38:25
+38:21-38:25
     [_p]
-Prelude.lc 38:22-38:23
+38:22-38:23
     forall a . a -> [a] -> [a]
-Prelude.lc 38:23-38:25
+38:23-38:25
     [_f]
-Prelude.lc 38:26-38:27
+38:26-38:27
     _n
-Prelude.lc 38:26-38:28
+38:26-38:28
     [_m] -> [_m]
-Prelude.lc 38:26-38:30
+38:26-38:30
     [_k] | (([_i]))
-Prelude.lc 38:27-38:28
+38:27-38:28
     forall a . a -> [a] -> [a]
-Prelude.lc 38:28-38:30
+38:28-38:30
     [_f]
-Prelude.lc 39:10-39:12
+39:10-39:12
     _k | _h | _d
-Prelude.lc 39:10-39:15
+39:10-39:15
     ([_e], [_d]) | ([_f], [_e])
-Prelude.lc 39:13-39:15
+39:13-39:15
     _f | _c | _c
-Prelude.lc 39:19-39:24
+39:19-39:24
     forall a b . [(a, b)] -> ([a], [b])
-Prelude.lc 39:19-39:27
+39:19-39:27
     ([_b], [_a])
-Prelude.lc 39:25-39:27
+39:25-39:27
     [_r]
-Prelude.lc 41:1-41:7
+41:1-41:7
     forall a . (a -> Bool) -> [a] -> [a]
-Prelude.lc 41:21-41:23
+41:21-41:23
     forall a . [a]
-Prelude.lc 41:21-44:49
+41:21-44:49
     [_a] -> [_a]
-Prelude.lc 42:22-44:49
+42:22-44:49
     [_c]
-Prelude.lc 42:27-42:31
+42:27-42:31
     _g
-Prelude.lc 42:32-42:33
+42:32-42:33
     _f
-Prelude.lc 43:32-44:49
+43:32-44:49
     Bool -> [_f]
-Prelude.lc 43:33-43:34
+43:33-43:34
     _h
-Prelude.lc 43:33-43:36
+43:33-43:36
     [_g] -> [_g]
-Prelude.lc 43:33-43:51
+43:33-43:51
     [_f]
-Prelude.lc 43:35-43:36
+43:35-43:36
     forall a . a -> [a] -> [a]
-Prelude.lc 43:37-43:43
+43:37-43:43
     _j -> [_f] -> [_f]
-Prelude.lc 43:37-43:48
+43:37-43:48
     [_f] -> [_f]
-Prelude.lc 43:37-43:51
+43:37-43:51
     [_f]
-Prelude.lc 43:44-43:48
+43:44-43:48
     _j
-Prelude.lc 43:49-43:51
+43:49-43:51
     [_f]
-Prelude.lc 44:34-44:40
+44:34-44:40
     _m
-Prelude.lc 44:41-44:45
+44:41-44:45
     _n
-Prelude.lc 44:46-44:48
+44:46-44:48
     [_k]
-Prelude.lc 49:9-49:12
+49:9-49:12
     Type
-Prelude.lc 49:9-49:19
+49:9-49:19
     Type
-Prelude.lc 49:10-49:11
+49:10-49:11
     _b
-Prelude.lc 49:16-49:19
+49:16-49:19
     Type | Type
-Prelude.lc 49:17-49:18
+49:17-49:18
     Type
-Prelude.lc 50:1-50:5
+50:1-50:5
     forall a . [a] -> [a]
-Prelude.lc 50:16-50:18
+50:16-50:18
     [_d] | [_b]
-Prelude.lc 52:10-52:13
+52:10-52:13
     Type
-Prelude.lc 52:10-52:25
+52:10-52:25
     Type
-Prelude.lc 52:11-52:12
+52:11-52:12
     _b
-Prelude.lc 52:17-52:25
+52:17-52:25
     Type | Type
-Prelude.lc 52:18-52:24
+52:18-52:24
     Type
-Prelude.lc 52:19-52:20
+52:19-52:20
     Type
-Prelude.lc 52:19-52:23
+52:19-52:23
     [Type]
-Prelude.lc 52:22-52:23
+52:22-52:23
     Type | [Type]
-Prelude.lc 53:1-53:6
+53:1-53:6
     forall a . [a] -> [(a, a)]
-Prelude.lc 53:11-53:14
+53:11-53:14
     forall a b . [a] -> [b] -> [(a, b)]
-Prelude.lc 53:11-53:16
+53:11-53:16
     [_a] -> [(_c, _a)]
-Prelude.lc 53:11-53:25
+53:11-53:25
     [(_b, _b)]
-Prelude.lc 53:15-53:16
+53:15-53:16
     [_d]
-Prelude.lc 53:18-53:22
+53:18-53:22
     forall a . [a] -> [a]
-Prelude.lc 53:18-53:24
+53:18-53:24
     [_b]
-Prelude.lc 53:23-53:24
+53:23-53:24
     [_c]
-Prelude.lc 55:1-55:7
+55:1-55:7
     forall a b . (a -> b -> a) -> a -> [b] -> a
-Prelude.lc 55:17-55:18
+55:17-55:18
     _f
-Prelude.lc 55:17-56:41
+55:17-56:41
     [_b] -> _f
-Prelude.lc 56:22-56:28
+56:22-56:28
     _k
-Prelude.lc 56:29-56:30
+56:29-56:30
     _l
-Prelude.lc 56:32-56:33
+56:32-56:33
     _m
-Prelude.lc 56:34-56:35
+56:34-56:35
     _n
-Prelude.lc 56:36-56:37
+56:36-56:37
     _k
-Prelude.lc 56:39-56:41
+56:39-56:41
     [_h]
-Prelude.lc 58:1-58:7
+58:1-58:7
     forall a . (a -> a -> a) -> [a] -> a
-Prelude.lc 58:20-58:25
+58:20-58:25
     forall a b . (b -> a -> a) -> a -> [b] -> a
-Prelude.lc 58:20-58:27
+58:20-58:27
     _b -> [_a] -> _b
-Prelude.lc 58:20-58:29
+58:20-58:29
     [_a] -> _e
-Prelude.lc 58:20-58:32
+58:20-58:32
     _c
-Prelude.lc 58:26-58:27
+58:26-58:27
     _j
-Prelude.lc 58:28-58:29
+58:28-58:29
     _f
-Prelude.lc 58:30-58:32
+58:30-58:32
     [_d]
-Prelude.lc 60:1-60:6
+60:1-60:6
     forall a . [a] -> ([a], [a])
-Prelude.lc 60:12-60:20
+60:12-60:20
     ([_b], [_a])
-Prelude.lc 60:12-61:55
+60:12-61:55
     [_b] -> ([_b], [_a])
-Prelude.lc 60:13-60:15
+60:13-60:15
     forall a . [a]
-Prelude.lc 60:17-60:19
+60:17-60:19
     forall a . [a] | (([_a]))
-Prelude.lc 61:17-61:28
+61:17-61:28
     ([_i], _c)
-Prelude.lc 61:18-61:19
+61:18-61:19
     _m
-Prelude.lc 61:18-61:20
+61:18-61:20
     [_l] -> [_l]
-Prelude.lc 61:18-61:23
+61:18-61:23
     [_j]
-Prelude.lc 61:19-61:20
+61:19-61:20
     forall a . a -> [a] -> [a]
-Prelude.lc 61:21-61:23
+61:21-61:23
     _d
-Prelude.lc 61:25-61:27
+61:25-61:27
     _f | ((_c))
-Prelude.lc 61:37-61:39
+61:37-61:39
     _k | _h | _d
-Prelude.lc 61:37-61:43
+61:37-61:43
     _d | (_e, _d)
-Prelude.lc 61:41-61:43
+61:41-61:43
     _f | _c | _c
-Prelude.lc 61:47-61:52
+61:47-61:52
     _i
-Prelude.lc 61:53-61:55
+61:53-61:55
     [_h]
-Prelude.lc 63:1-63:8
+63:1-63:8
     forall a . (a -> a -> Ordering) -> [a] -> [a] -> [a]
-Prelude.lc 63:27-65:32
+63:27-65:32
     [_e]
-Prelude.lc 63:27-67:21
+63:27-67:21
     [_c] -> [_c] | [_c]
-Prelude.lc 63:32-63:33
+63:32-63:33
     _j
-Prelude.lc 63:34-63:35
+63:34-63:35
     _h
-Prelude.lc 63:36-63:37
+63:36-63:37
     _i
-Prelude.lc 64:11-64:12
+64:11-64:12
     _j
-Prelude.lc 64:11-64:13
+64:11-64:13
     [_i] -> [_i]
-Prelude.lc 64:11-64:33
+64:11-64:33
     [_h]
-Prelude.lc 64:11-65:32
+64:11-65:32
     [_g] -> Ordering -> [_g]
-Prelude.lc 64:12-64:13
+64:12-64:13
     forall a . a -> [a] -> [a]
-Prelude.lc 64:14-64:21
+64:14-64:21
     _p
-Prelude.lc 64:22-64:23
+64:22-64:23
     _q
-Prelude.lc 64:24-64:26
+64:24-64:26
     [_l]
-Prelude.lc 64:28-64:29
+64:28-64:29
     _j
-Prelude.lc 64:28-64:30
+64:28-64:30
     [_i] -> [_i]
-Prelude.lc 64:28-64:32
+64:28-64:32
     [_i]
-Prelude.lc 64:29-64:30
+64:29-64:30
     forall a . a -> [a] -> [a]
-Prelude.lc 64:30-64:32
+64:30-64:32
     [_i]
-Prelude.lc 65:10-65:11
+65:10-65:11
     _f | _h
-Prelude.lc 65:10-65:12
+65:10-65:12
     [_e] -> [_e] | [_g] -> [_g]
-Prelude.lc 65:10-65:32
+65:10-65:32
     [_g] | [_g]
-Prelude.lc 65:11-65:12
+65:11-65:12
     forall a . a -> [a] -> [a] | forall a . a -> [a] -> [a]
-Prelude.lc 65:13-65:20
+65:13-65:20
     _m -> [_g] -> [_g] -> [_g] | _m -> [_g] -> [_g] -> [_g]
-Prelude.lc 65:13-65:22
+65:13-65:22
     [_g] -> [_g] -> [_g] | [_g] -> [_g] -> [_g]
-Prelude.lc 65:13-65:29
+65:13-65:29
     [_g] -> [_g] | [_g] -> [_g]
-Prelude.lc 65:13-65:32
+65:13-65:32
     [_g] | [_g]
-Prelude.lc 65:21-65:22
+65:21-65:22
     _m | _m
-Prelude.lc 65:24-65:25
+65:24-65:25
     _h | _h
-Prelude.lc 65:24-65:26
+65:24-65:26
     [_g] -> [_g] | [_g] -> [_g]
-Prelude.lc 65:24-65:28
+65:24-65:28
     [_g] | [_g]
-Prelude.lc 65:25-65:26
+65:25-65:26
     forall a . a -> [a] -> [a] | forall a . a -> [a] -> [a]
-Prelude.lc 65:26-65:28
+65:26-65:28
     [_g] | [_g]
-Prelude.lc 65:30-65:32
+65:30-65:32
     [_g] | [_g]
-Prelude.lc 66:19-66:21
+66:19-66:21
     _d
-Prelude.lc 67:19-67:21
+67:19-67:21
     _i
-Prelude.lc 69:1-69:7
+69:1-69:7
     forall a . (a -> a -> Ordering) -> [a] -> [a]
-Prelude.lc 69:15-69:17
+69:15-69:17
     forall a . [a]
-Prelude.lc 69:15-71:71
+69:15-71:71
     [_b] -> [_b]
-Prelude.lc 70:16-70:19
+70:16-70:19
     [_e]
-Prelude.lc 70:16-71:71
+70:16-71:71
     [_b] -> [_f] | [_d]
-Prelude.lc 70:17-70:18
+70:17-70:18
     _g
-Prelude.lc 71:15-71:22
+71:15-71:22
     forall a b c . (a -> c -> b) -> (a, c) -> b
-Prelude.lc 71:15-71:34
+71:15-71:34
     ([_a], [_a]) -> [_a]
-Prelude.lc 71:15-71:71
+71:15-71:71
     [_h]
-Prelude.lc 71:24-71:31
+71:24-71:31
     forall a . (a -> a -> Ordering) -> [a] -> [a] -> [a]
-Prelude.lc 71:24-71:33
+71:24-71:33
     [_a] -> [_a] -> [_a]
-Prelude.lc 71:32-71:33
+71:32-71:33
     _o
-Prelude.lc 71:36-71:70
+71:36-71:70
     ([_h], [_h])
-Prelude.lc 71:37-71:43
+71:37-71:43
     _p
-Prelude.lc 71:37-71:49
+71:37-71:49
     (_c -> _a) -> (_d, _c) -> (_b, _a)
-Prelude.lc 71:37-71:58
+71:37-71:58
     (_b, _b) -> (_a, _a)
-Prelude.lc 71:44-71:45
+71:44-71:45
     _n -> _n -> Ordering
-Prelude.lc 71:46-71:49
+71:46-71:49
     forall a b c d . (a -> c) -> (b -> d) -> (a, b) -> (c, d)
-Prelude.lc 71:50-71:56
+71:50-71:56
     (_k -> _k -> Ordering) -> _d -> _b
-Prelude.lc 71:50-71:58
+71:50-71:58
     _b -> _a
-Prelude.lc 71:57-71:58
+71:57-71:58
     _i -> _i -> Ordering
-Prelude.lc 71:61-71:66
+71:61-71:66
     forall a . [a] -> ([a], [a])
-Prelude.lc 71:61-71:69
+71:61-71:69
     ([_a], [_a])
-Prelude.lc 71:67-71:69
+71:67-71:69
     _k
-Prelude.lc 73:12-73:32
+73:12-73:32
     Type
-Prelude.lc 73:13-73:14
+73:13-73:14
     _b
-Prelude.lc 73:18-73:19
+73:18-73:19
     Type | Type
-Prelude.lc 73:24-73:25
+73:24-73:25
     Type
-Prelude.lc 73:24-73:32
+73:24-73:32
     Type
-Prelude.lc 73:29-73:32
+73:29-73:32
     Type | Type
-Prelude.lc 73:30-73:31
+73:30-73:31
     Type
-Prelude.lc 74:1-74:8
+74:1-74:8
     forall a . (a -> a) -> a -> [a]
-Prelude.lc 74:16-74:17
+74:16-74:17
     _d
-Prelude.lc 74:16-74:19
+74:16-74:19
     [_c] -> [_c]
-Prelude.lc 74:16-74:35
+74:16-74:35
     [_c]
-Prelude.lc 74:18-74:19
+74:18-74:19
     forall a . a -> [a] -> [a]
-Prelude.lc 74:20-74:27
+74:20-74:27
     forall a . (a -> a) -> a -> [a]
-Prelude.lc 74:20-74:29
+74:20-74:29
     _c -> [_c]
-Prelude.lc 74:20-74:35
+74:20-74:35
     [_c]
-Prelude.lc 74:28-74:29
+74:28-74:29
     _d -> _d
-Prelude.lc 74:31-74:32
+74:31-74:32
     _c -> _c
-Prelude.lc 74:31-74:34
+74:31-74:34
     _c
-Prelude.lc 74:33-74:34
+74:33-74:34
     _c
-Prelude.lc 76:1-76:4
+76:1-76:4
     forall a b . (a, b) -> a
-Prelude.lc 76:14-76:15
+76:14-76:15
     _k | _h | _d
-Prelude.lc 77:1-77:4
+77:1-77:4
     forall a b . (a, b) -> b
-Prelude.lc 77:14-77:15
+77:14-77:15
     _f | _c | _c
-Prelude.lc 79:7-79:10
+79:7-79:10
     Bool -> Bool -> Bool
-Prelude.lc 79:15-79:16
+79:15-79:16
     _c
-Prelude.lc 79:15-80:18
+79:15-80:18
     Bool -> Bool
-Prelude.lc 80:14-80:18
+80:14-80:18
     Bool
-Prelude.lc 84:6-84:9
+84:6-84:9
     Bool -> Bool -> Bool
-Prelude.lc 84:14-84:15
+84:14-84:15
     _b
-Prelude.lc 84:14-85:20
+84:14-85:20
     Bool -> Bool
-Prelude.lc 85:15-85:20
+85:15-85:20
     Bool
-Prelude.lc 122:6-122:13
+122:6-122:13
     Type | Type | Type | Type | Type | Type
-Prelude.lc 122:6-122:23
+122:6-122:23
     Type
-Prelude.lc 122:6-122:35
+122:6-122:35
     Type
-Prelude.lc 122:16-122:23
+122:16-122:23
     String -> Type -> RecItem | RecItem | Type | Type | Type
-Prelude.lc 122:24-122:30
+122:24-122:30
     Type
-Prelude.lc 122:31-122:35
+122:31-122:35
     Type
-Prelude.lc 124:1-124:12
+124:1-124:12
     RecItem -> Type
-Prelude.lc 124:29-124:30
+124:29-124:30
     Type
-Prelude.lc 126:6-126:13
+126:6-126:13
     [RecItem] -> Type | [RecItem] -> Type | [RecItem] -> Type | [RecItem]
       -> Type | Type
-Prelude.lc 126:6-126:17
+126:6-126:17
     Type | Type
-Prelude.lc 126:6-127:17
+126:6-127:17
     Type | Type
-Prelude.lc 126:6-127:46
+126:6-127:46
     Type
-Prelude.lc 126:15-126:17
+126:15-126:17
     [RecItem]
-Prelude.lc 126:21-126:30
+126:21-126:30
     Type | Type | Type
-Prelude.lc 126:22-126:29
+126:22-126:29
     Type | Type | Type
-Prelude.lc 127:7-127:17
+127:7-127:17
     forall (a :: [RecItem]) . HList (map recItemType a) -> RecordC a | RecordC
       _c | Type | Type
-Prelude.lc 127:19-127:24
+127:19-127:24
     [Type] -> Type
-Prelude.lc 127:19-127:45
+127:19-127:45
     Type
-Prelude.lc 127:26-127:29
+127:26-127:29
     forall a b . (a -> b) -> [a] -> [b]
-Prelude.lc 127:26-127:41
+127:26-127:41
     [RecItem] -> [Type]
-Prelude.lc 127:26-127:44
+127:26-127:44
     [Type]
-Prelude.lc 127:30-127:41
+127:30-127:41
     RecItem -> Type
-Prelude.lc 127:42-127:44
+127:42-127:44
     [RecItem]
-Prelude.lc 129:1-129:7
+129:1-129:7
     String -> Type -> [RecItem] -> Constraint
-Prelude.lc 129:17-129:24
+129:17-129:24
     String -> Constraint
-Prelude.lc 129:17-129:27
+129:17-129:27
     Constraint
-Prelude.lc 129:17-130:75
+129:17-130:75
     [RecItem] -> Constraint
-Prelude.lc 129:25-129:27
+129:25-129:27
     String
-Prelude.lc 130:34-130:75
+130:34-130:75
     Constraint | Constraint
-Prelude.lc 130:37-130:38
+130:37-130:38
     _o
-Prelude.lc 130:37-130:41
+130:37-130:41
     _n -> Bool
-Prelude.lc 130:37-130:44
+130:37-130:44
     Bool
-Prelude.lc 130:37-130:56
+130:37-130:56
     Constraint -> Constraint
-Prelude.lc 130:39-130:41
+130:39-130:41
     forall a . Eq a => a -> a -> Bool
-Prelude.lc 130:42-130:44
+130:42-130:44
     String
-Prelude.lc 130:50-130:51
+130:50-130:51
     _l
-Prelude.lc 130:50-130:53
+130:50-130:53
     _k -> Constraint
-Prelude.lc 130:50-130:56
+130:50-130:56
     Constraint
-Prelude.lc 130:52-130:53
+130:52-130:53
     forall a . a -> a -> Constraint
-Prelude.lc 130:54-130:56
+130:54-130:56
     Type
-Prelude.lc 130:62-130:68
+130:62-130:68
     _k
-Prelude.lc 130:69-130:70
+130:69-130:70
     String
-Prelude.lc 130:71-130:72
+130:71-130:72
     Type
-Prelude.lc 130:73-130:75
+130:73-130:75
     [_i]
-Prelude.lc 132:1-132:7
+132:1-132:7
     forall a (b :: [Type]) . HList (a : b) -> a
-Prelude.lc 132:10-132:23
+132:10-132:23
     forall a (b :: [Type]) . forall c -> (a -> HList b -> c) -> HList (a : b) -> c
-Prelude.lc 132:10-132:25
+132:10-132:25
     (_c -> HList _b -> _a) -> HList (_c : _b) -> _a
-Prelude.lc 132:10-132:37
+132:10-132:37
     HList (_b : _a) -> _b
-Prelude.lc 132:35-132:36
+132:35-132:36
     _e
-Prelude.lc 133:1-133:7
+133:1-133:7
     forall a (b :: [Type]) . HList (a : b) -> HList b
-Prelude.lc 133:10-133:23
+133:10-133:23
     forall a (b :: [Type]) . forall c -> (a -> HList b -> c) -> HList (a : b) -> c
-Prelude.lc 133:10-133:25
+133:10-133:25
     (_c -> HList _b -> _a) -> HList (_c : _b) -> _a
-Prelude.lc 133:10-133:37
+133:10-133:37
     HList (_b : _a) -> HList _a
-Prelude.lc 133:35-133:36
+133:35-133:36
     HList _d
-Prelude.lc 136:28-136:37
+136:28-136:37
     Type
-Prelude.lc 136:28-136:97
+136:28-136:97
     Type
-Prelude.lc 136:29-136:36
+136:29-136:36
     Type
-Prelude.lc 136:41-136:97
+136:41-136:97
     Type
-Prelude.lc 136:54-136:60
+136:54-136:60
     Type
-Prelude.lc 136:65-136:71
+136:65-136:71
     String -> Type -> [RecItem] -> Constraint
-Prelude.lc 136:65-136:73
+136:65-136:73
     Type -> [RecItem] -> Constraint
-Prelude.lc 136:65-136:75
+136:65-136:75
     [RecItem] -> Constraint
-Prelude.lc 136:65-136:78
+136:65-136:78
     Constraint
-Prelude.lc 136:65-136:97
+136:65-136:97
     Type
-Prelude.lc 136:72-136:73
+136:72-136:73
     String
-Prelude.lc 136:74-136:75
+136:74-136:75
     _d
-Prelude.lc 136:76-136:78
+136:76-136:78
     [RecItem]
-Prelude.lc 136:82-136:89
+136:82-136:89
     [RecItem] -> Type
-Prelude.lc 136:82-136:92
+136:82-136:92
     Type
-Prelude.lc 136:82-136:97
+136:82-136:97
     Type
-Prelude.lc 136:90-136:92
+136:90-136:92
     [RecItem]
-Prelude.lc 136:96-136:97
+136:96-136:97
     Type | Type
-Prelude.lc 137:1-137:8
+137:1-137:8
     forall a (b :: [RecItem])
       . forall (c :: String) -> isKeyC c a b => RecordC b -> a
-Prelude.lc 137:57-137:58
+137:57-137:58
     String
-Prelude.lc 137:57-137:61
+137:57-137:61
     String -> Bool
-Prelude.lc 137:57-137:64
+137:57-137:64
     Bool
-Prelude.lc 137:57-138:186
+137:57-138:186
     _m | _j | _g | _e
-Prelude.lc 137:59-137:61
+137:59-137:61
     forall a . Eq a => a -> a -> Bool
-Prelude.lc 137:62-137:64
+137:62-137:64
     String
-Prelude.lc 137:67-137:73
+137:67-137:73
     forall a (b :: [Type]) . HList (a : b) -> a
-Prelude.lc 137:67-137:129
+137:67-137:129
     _n
-Prelude.lc 137:67-138:186
+137:67-138:186
     Bool -> _n
-Prelude.lc 137:75-137:87
+137:75-137:87
     forall a b . a -> b
-Prelude.lc 137:75-137:90
+137:75-137:90
     forall a . _a -> a
-Prelude.lc 137:75-137:125
+137:75-137:125
     _a -> HList (_q : map recItemType _j)
-Prelude.lc 137:75-137:128
+137:75-137:128
     HList (_n : map recItemType _g)
-Prelude.lc 137:93-137:98
+137:93-137:98
     [Type] -> Type
-Prelude.lc 137:93-137:124
+137:93-137:124
     Type
-Prelude.lc 137:101-137:102
+137:101-137:102
     Type
-Prelude.lc 137:101-137:104
+137:101-137:104
     [Type] -> [Type]
-Prelude.lc 137:101-137:123
+137:101-137:123
     [Type]
-Prelude.lc 137:103-137:104
+137:103-137:104
     forall a . a -> [a] -> [a]
-Prelude.lc 137:105-137:108
+137:105-137:108
     forall a b . (a -> b) -> [a] -> [b]
-Prelude.lc 137:105-137:120
+137:105-137:120
     [RecItem] -> [Type]
-Prelude.lc 137:105-137:123
+137:105-137:123
     [Type]
-Prelude.lc 137:109-137:120
+137:109-137:120
     RecItem -> Type
-Prelude.lc 137:121-137:123
+137:121-137:123
     [RecItem]
-Prelude.lc 137:126-137:128
+137:126-137:128
     HList (map recItemType _d)
-Prelude.lc 138:57-138:64
+138:57-138:64
     forall a (b :: [RecItem])
       . forall (c :: String) -> isKeyC c a b => RecordC b -> a
-Prelude.lc 138:57-138:67
+138:57-138:67
     forall (a :: [RecItem])
       . forall (b :: String) -> isKeyC b _p a => RecordC a -> _p
-Prelude.lc 138:57-138:71
+138:57-138:71
     forall (a :: String) -> isKeyC a _o _h => RecordC _h -> _o
-Prelude.lc 138:57-138:73
+138:57-138:73
     isKeyC _m _o _h => RecordC _h -> _o
-Prelude.lc 138:57-138:108
+138:57-138:108
     RecordC _h -> _o
-Prelude.lc 138:57-138:186
+138:57-138:186
     _n
-Prelude.lc 138:66-138:67
+138:66-138:67
     Type
-Prelude.lc 138:69-138:71
+138:69-138:71
     [_k]
-Prelude.lc 138:72-138:73
+138:72-138:73
     String
-Prelude.lc 138:76-138:85
+138:76-138:85
     forall a . a
-Prelude.lc 138:76-138:107
+138:76-138:107
     CW (isKeyC _m _o _h)
-Prelude.lc 138:88-138:90
+138:88-138:90
     Constraint -> Type
-Prelude.lc 138:88-138:106
+138:88-138:106
     Type
-Prelude.lc 138:92-138:98
+138:92-138:98
     String -> Type -> [RecItem] -> Constraint
-Prelude.lc 138:92-138:100
+138:92-138:100
     Type -> [RecItem] -> Constraint
-Prelude.lc 138:92-138:102
+138:92-138:102
     [RecItem] -> Constraint
-Prelude.lc 138:92-138:105
+138:92-138:105
     Constraint
-Prelude.lc 138:99-138:100
+138:99-138:100
     String
-Prelude.lc 138:101-138:102
+138:101-138:102
     Type
-Prelude.lc 138:103-138:105
+138:103-138:105
     [RecItem]
-Prelude.lc 138:110-138:120
+138:110-138:120
     forall (a :: [RecItem]) . HList (map recItemType a) -> RecordC a
-Prelude.lc 138:110-138:185
+138:110-138:185
     RecordC _b
-Prelude.lc 138:122-138:128
+138:122-138:128
     forall a (b :: [Type]) . HList (a : b) -> HList b
-Prelude.lc 138:122-138:184
+138:122-138:184
     HList (map recItemType _h)
-Prelude.lc 138:130-138:142
+138:130-138:142
     forall a b . a -> b
-Prelude.lc 138:130-138:145
+138:130-138:145
     forall a . _a -> a
-Prelude.lc 138:130-138:180
+138:130-138:180
     _a -> HList (_r : map recItemType _k)
-Prelude.lc 138:130-138:183
+138:130-138:183
     HList (_o : map recItemType _h)
-Prelude.lc 138:148-138:153
+138:148-138:153
     [Type] -> Type
-Prelude.lc 138:148-138:179
+138:148-138:179
     Type
-Prelude.lc 138:156-138:157
+138:156-138:157
     Type
-Prelude.lc 138:156-138:159
+138:156-138:159
     [Type] -> [Type]
-Prelude.lc 138:156-138:178
+138:156-138:178
     [Type]
-Prelude.lc 138:158-138:159
+138:158-138:159
     forall a . a -> [a] -> [a]
-Prelude.lc 138:160-138:163
+138:160-138:163
     forall a b . (a -> b) -> [a] -> [b]
-Prelude.lc 138:160-138:175
+138:160-138:175
     [RecItem] -> [Type]
-Prelude.lc 138:160-138:178
+138:160-138:178
     [Type]
-Prelude.lc 138:164-138:175
+138:164-138:175
     RecItem -> Type
-Prelude.lc 138:176-138:178
+138:176-138:178
     [RecItem]
-Prelude.lc 138:181-138:183
+138:181-138:183
     HList (map recItemType _e)
-Prelude.lc 142:1-142:4
+142:1-142:4
     Float -> Float -> Float -> VecS Float 4
-Prelude.lc 142:13-142:15
+142:13-142:15
     forall a . a -> a -> a -> a -> VecS a 4
-Prelude.lc 142:13-142:17
+142:13-142:17
     _f -> _f -> _f -> VecS _f 4
-Prelude.lc 142:13-142:19
+142:13-142:19
     _e -> _e -> VecS _e 4
-Prelude.lc 142:13-142:21
+142:13-142:21
     _d -> VecS _d 4
-Prelude.lc 142:13-142:25
+142:13-142:25
     VecS Float 4
-Prelude.lc 142:16-142:17
+142:16-142:17
     _g
-Prelude.lc 142:18-142:19
+142:18-142:19
     _d
-Prelude.lc 142:20-142:21
+142:20-142:21
     _b
-Prelude.lc 142:22-142:25
+142:22-142:25
     Float
-Prelude.lc 144:1-144:6
+144:1-144:6
     VecS Float 4
-Prelude.lc 144:11-144:14
+144:11-144:14
     Float -> Float -> Float -> VecS Float 4
-Prelude.lc 144:11-144:18
+144:11-144:18
     Float -> Float -> VecS Float 4
-Prelude.lc 144:11-144:22
+144:11-144:22
     Float -> VecS Float 4
-Prelude.lc 144:11-144:26
+144:11-144:26
     VecS Float 4
-Prelude.lc 144:15-144:18
+144:15-144:18
     Float
-Prelude.lc 144:19-144:22
+144:19-144:22
     Float
-Prelude.lc 144:23-144:26
+144:23-144:26
     Float
-Prelude.lc 145:1-145:5
+145:1-145:5
     VecS Float 4
-Prelude.lc 145:11-145:14
+145:11-145:14
     Float -> Float -> Float -> VecS Float 4
-Prelude.lc 145:11-145:18
+145:11-145:18
     Float -> Float -> VecS Float 4
-Prelude.lc 145:11-145:22
+145:11-145:22
     Float -> VecS Float 4
-Prelude.lc 145:11-145:26
+145:11-145:26
     VecS Float 4
-Prelude.lc 145:15-145:18
+145:15-145:18
     Float
-Prelude.lc 145:19-145:22
+145:19-145:22
     Float
-Prelude.lc 145:23-145:26
+145:23-145:26
     Float
-Prelude.lc 146:1-146:7
+146:1-146:7
     VecS Float 4
-Prelude.lc 146:11-146:14
+146:11-146:14
     Float -> Float -> Float -> VecS Float 4
-Prelude.lc 146:11-146:19
+146:11-146:19
     Float -> Float -> VecS Float 4
-Prelude.lc 146:11-146:24
+146:11-146:24
     Float -> VecS Float 4
-Prelude.lc 146:11-146:29
+146:11-146:29
     VecS Float 4
-Prelude.lc 146:15-146:19
+146:15-146:19
     Float
-Prelude.lc 146:20-146:24
+146:20-146:24
     Float
-Prelude.lc 146:25-146:29
+146:25-146:29
     Float
-Prelude.lc 147:1-147:6
+147:1-147:6
     VecS Float 4
-Prelude.lc 147:11-147:14
+147:11-147:14
     Float -> Float -> Float -> VecS Float 4
-Prelude.lc 147:11-147:18
+147:11-147:18
     Float -> Float -> VecS Float 4
-Prelude.lc 147:11-147:22
+147:11-147:22
     Float -> VecS Float 4
-Prelude.lc 147:11-147:26
+147:11-147:26
     VecS Float 4
-Prelude.lc 147:15-147:18
+147:15-147:18
     Float
-Prelude.lc 147:19-147:22
+147:19-147:22
     Float
-Prelude.lc 147:23-147:26
+147:23-147:26
     Float
-Prelude.lc 148:1-148:7
+148:1-148:7
     VecS Float 4
-Prelude.lc 148:11-148:14
+148:11-148:14
     Float -> Float -> Float -> VecS Float 4
-Prelude.lc 148:11-148:18
+148:11-148:18
     Float -> Float -> VecS Float 4
-Prelude.lc 148:11-148:22
+148:11-148:22
     Float -> VecS Float 4
-Prelude.lc 148:11-148:26
+148:11-148:26
     VecS Float 4
-Prelude.lc 148:15-148:18
+148:15-148:18
     Float
-Prelude.lc 148:19-148:22
+148:19-148:22
     Float
-Prelude.lc 148:23-148:26
+148:23-148:26
     Float
-Prelude.lc 149:1-149:4
+149:1-149:4
     VecS Float 4
-Prelude.lc 149:11-149:14
+149:11-149:14
     Float -> Float -> Float -> VecS Float 4
-Prelude.lc 149:11-149:18
+149:11-149:18
     Float -> Float -> VecS Float 4
-Prelude.lc 149:11-149:22
+149:11-149:22
     Float -> VecS Float 4
-Prelude.lc 149:11-149:26
+149:11-149:26
     VecS Float 4
-Prelude.lc 149:15-149:18
+149:15-149:18
     Float
-Prelude.lc 149:19-149:22
+149:19-149:22
     Float
-Prelude.lc 149:23-149:26
+149:23-149:26
     Float
-Prelude.lc 150:1-150:6
+150:1-150:6
     VecS Float 4
-Prelude.lc 150:11-150:14
+150:11-150:14
     Float -> Float -> Float -> VecS Float 4
-Prelude.lc 150:11-150:18
+150:11-150:18
     Float -> Float -> VecS Float 4
-Prelude.lc 150:11-150:22
+150:11-150:22
     Float -> VecS Float 4
-Prelude.lc 150:11-150:26
+150:11-150:26
     VecS Float 4
-Prelude.lc 150:15-150:18
+150:15-150:18
     Float
-Prelude.lc 150:19-150:22
+150:19-150:22
     Float
-Prelude.lc 150:23-150:26
+150:23-150:26
     Float
-Prelude.lc 151:1-151:7
+151:1-151:7
     VecS Float 4
-Prelude.lc 151:11-151:14
+151:11-151:14
     Float -> Float -> Float -> VecS Float 4
-Prelude.lc 151:11-151:18
+151:11-151:18
     Float -> Float -> VecS Float 4
-Prelude.lc 151:11-151:22
+151:11-151:22
     Float -> VecS Float 4
-Prelude.lc 151:11-151:26
+151:11-151:26
     VecS Float 4
-Prelude.lc 151:15-151:18
+151:15-151:18
     Float
-Prelude.lc 151:19-151:22
+151:19-151:22
     Float
-Prelude.lc 151:23-151:26
+151:23-151:26
     Float
-Prelude.lc 152:1-152:6
+152:1-152:6
     VecS Float 4
-Prelude.lc 152:11-152:14
+152:11-152:14
     Float -> Float -> Float -> VecS Float 4
-Prelude.lc 152:11-152:18
+152:11-152:18
     Float -> Float -> VecS Float 4
-Prelude.lc 152:11-152:22
+152:11-152:22
     Float -> VecS Float 4
-Prelude.lc 152:11-152:26
+152:11-152:26
     VecS Float 4
-Prelude.lc 152:15-152:18
+152:15-152:18
     Float
-Prelude.lc 152:19-152:22
+152:19-152:22
     Float
-Prelude.lc 152:23-152:26
+152:23-152:26
     Float
-Prelude.lc 153:1-153:5
+153:1-153:5
     VecS Float 4
-Prelude.lc 153:11-153:14
+153:11-153:14
     Float -> Float -> Float -> VecS Float 4
-Prelude.lc 153:11-153:18
+153:11-153:18
     Float -> Float -> VecS Float 4
-Prelude.lc 153:11-153:22
+153:11-153:22
     Float -> VecS Float 4
-Prelude.lc 153:11-153:26
+153:11-153:26
     VecS Float 4
-Prelude.lc 153:15-153:18
+153:15-153:18
     Float
-Prelude.lc 153:19-153:22
+153:19-153:22
     Float
-Prelude.lc 153:23-153:26
+153:23-153:26
     Float
-Prelude.lc 154:1-154:5
+154:1-154:5
     VecS Float 4
-Prelude.lc 154:11-154:14
+154:11-154:14
     Float -> Float -> Float -> VecS Float 4
-Prelude.lc 154:11-154:18
+154:11-154:18
     Float -> Float -> VecS Float 4
-Prelude.lc 154:11-154:22
+154:11-154:22
     Float -> VecS Float 4
-Prelude.lc 154:11-154:26
+154:11-154:26
     VecS Float 4
-Prelude.lc 154:15-154:18
+154:15-154:18
     Float
-Prelude.lc 154:19-154:22
+154:19-154:22
     Float
-Prelude.lc 154:23-154:26
+154:23-154:26
     Float
-Prelude.lc 155:1-155:5
+155:1-155:5
     VecS Float 4
-Prelude.lc 155:11-155:14
+155:11-155:14
     Float -> Float -> Float -> VecS Float 4
-Prelude.lc 155:11-155:18
+155:11-155:18
     Float -> Float -> VecS Float 4
-Prelude.lc 155:11-155:22
+155:11-155:22
     Float -> VecS Float 4
-Prelude.lc 155:11-155:26
+155:11-155:26
     VecS Float 4
-Prelude.lc 155:15-155:18
+155:15-155:18
     Float
-Prelude.lc 155:19-155:22
+155:19-155:22
     Float
-Prelude.lc 155:23-155:26
+155:23-155:26
     Float
-Prelude.lc 156:1-156:5
+156:1-156:5
     VecS Float 4
-Prelude.lc 156:11-156:14
+156:11-156:14
     Float -> Float -> Float -> VecS Float 4
-Prelude.lc 156:11-156:18
+156:11-156:18
     Float -> Float -> VecS Float 4
-Prelude.lc 156:11-156:22
+156:11-156:22
     Float -> VecS Float 4
-Prelude.lc 156:11-156:26
+156:11-156:26
     VecS Float 4
-Prelude.lc 156:15-156:18
+156:15-156:18
     Float
-Prelude.lc 156:19-156:22
+156:19-156:22
     Float
-Prelude.lc 156:23-156:26
+156:23-156:26
     Float
-Prelude.lc 157:1-157:5
+157:1-157:5
     VecS Float 4
-Prelude.lc 157:11-157:14
+157:11-157:14
     Float -> Float -> Float -> VecS Float 4
-Prelude.lc 157:11-157:18
+157:11-157:18
     Float -> Float -> VecS Float 4
-Prelude.lc 157:11-157:22
+157:11-157:22
     Float -> VecS Float 4
-Prelude.lc 157:11-157:26
+157:11-157:26
     VecS Float 4
-Prelude.lc 157:15-157:18
+157:15-157:18
     Float
-Prelude.lc 157:19-157:22
+157:19-157:22
     Float
-Prelude.lc 157:23-157:26
+157:23-157:26
     Float
-Prelude.lc 158:1-158:7
+158:1-158:7
     VecS Float 4
-Prelude.lc 158:11-158:14
+158:11-158:14
     Float -> Float -> Float -> VecS Float 4
-Prelude.lc 158:11-158:18
+158:11-158:18
     Float -> Float -> VecS Float 4
-Prelude.lc 158:11-158:22
+158:11-158:22
     Float -> VecS Float 4
-Prelude.lc 158:11-158:26
+158:11-158:26
     VecS Float 4
-Prelude.lc 158:15-158:18
+158:15-158:18
     Float
-Prelude.lc 158:19-158:22
+158:19-158:22
     Float
-Prelude.lc 158:23-158:26
+158:23-158:26
     Float
-Prelude.lc 159:1-159:8
+159:1-159:8
     VecS Float 4
-Prelude.lc 159:11-159:14
+159:11-159:14
     Float -> Float -> Float -> VecS Float 4
-Prelude.lc 159:11-159:18
+159:11-159:18
     Float -> Float -> VecS Float 4
-Prelude.lc 159:11-159:22
+159:11-159:22
     Float -> VecS Float 4
-Prelude.lc 159:11-159:26
+159:11-159:26
     VecS Float 4
-Prelude.lc 159:15-159:18
+159:15-159:18
     Float
-Prelude.lc 159:19-159:22
+159:19-159:22
     Float
-Prelude.lc 159:23-159:26
+159:23-159:26
     Float
-Prelude.lc 161:1-161:12
+161:1-161:12
     forall (a :: Nat) b c . (Num b, c ~ VecScalar a b) => c -> Image 1 ('Color c)
-Prelude.lc 161:15-161:25
+161:15-161:25
     forall (a :: Nat) (b :: Nat) c d
       . (Num c, d ~ VecScalar b c) => d -> Image a ('Color d)
-Prelude.lc 161:15-161:28
+161:15-161:28
     forall (a :: Nat) b c . (Num b, c ~ VecScalar a b) => c -> Image 1 ('Color c)
-Prelude.lc 161:27-161:28
+161:27-161:28
     _b
-Prelude.lc 162:1-162:12
+162:1-162:12
     forall (a :: Nat) b c . (Num b, c ~ VecScalar a b) => c -> Image 2 ('Color c)
-Prelude.lc 162:15-162:25
+162:15-162:25
     forall (a :: Nat) (b :: Nat) c d
       . (Num c, d ~ VecScalar b c) => d -> Image a ('Color d)
-Prelude.lc 162:15-162:28
+162:15-162:28
     forall (a :: Nat) b c . (Num b, c ~ VecScalar a b) => c -> Image 2 ('Color c)
-Prelude.lc 162:27-162:28
+162:27-162:28
     _b
-Prelude.lc 164:1-164:12
+164:1-164:12
     Float -> Image 1 'Depth
-Prelude.lc 164:15-164:25
+164:15-164:25
     forall (a :: Nat) . Float -> Image a 'Depth
-Prelude.lc 164:15-164:28
+164:15-164:28
     Float -> Image 1 'Depth
-Prelude.lc 164:27-164:28
+164:27-164:28
     _b
-Prelude.lc 166:13-166:16
+166:13-166:16
     Nat -> Type -> Type
-Prelude.lc 166:13-166:18
+166:13-166:18
     Type -> Type
-Prelude.lc 166:13-166:24
+166:13-166:24
     Type
-Prelude.lc 166:17-166:18
+166:17-166:18
     _b
-Prelude.lc 166:19-166:24
+166:19-166:24
     Type
-Prelude.lc 166:28-166:31
+166:28-166:31
     Nat -> Type -> Type
-Prelude.lc 166:28-166:33
+166:28-166:33
     Type -> Type
-Prelude.lc 166:28-166:39
+166:28-166:39
     Type | Type
-Prelude.lc 166:32-166:33
+166:32-166:33
     _b
-Prelude.lc 166:34-166:39
+166:34-166:39
     Type
-Prelude.lc 167:1-167:9
+167:1-167:9
     Vec 3 Float -> VecS Float 4
-Prelude.lc 167:14-167:16
+167:14-167:16
     forall a . a -> a -> a -> a -> VecS a 4
-Prelude.lc 167:14-167:20
+167:14-167:20
     Float -> Float -> Float -> VecS Float 4
-Prelude.lc 167:14-167:24
+167:14-167:24
     Float -> Float -> VecS Float 4
-Prelude.lc 167:14-167:28
+167:14-167:28
     Float -> VecS Float 4
-Prelude.lc 167:14-167:30
+167:14-167:30
     VecS Float 4
-Prelude.lc 167:17-167:18
+167:17-167:18
     Vec 3 Float
-Prelude.lc 167:17-167:20
+167:17-167:20
     Float
-Prelude.lc 167:21-167:22
+167:21-167:22
     Vec 3 Float
-Prelude.lc 167:21-167:24
+167:21-167:24
     Float
-Prelude.lc 167:25-167:26
+167:25-167:26
     Vec 3 Float
-Prelude.lc 167:25-167:28
+167:25-167:28
     Float
-Prelude.lc 167:29-167:30
+167:29-167:30
     _b
-Prelude.lc 174:1-174:8
+174:1-174:8
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 174:11-174:22
+174:11-174:22
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 175:1-175:8
+175:1-175:8
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 175:11-175:22
+175:11-175:22
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 176:1-176:4
+176:1-176:4
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 176:7-176:14
+176:7-176:14
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 177:1-177:4
+177:1-177:4
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 177:7-177:14
+177:7-177:14
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 178:1-178:4
+178:1-178:4
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 178:7-178:14
+178:7-178:14
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 179:1-179:5
+179:1-179:5
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 179:8-179:16
+179:8-179:16
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 180:1-180:5
+180:1-180:5
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 180:8-180:16
+180:8-180:16
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 181:1-181:5
+181:1-181:5
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 181:8-181:16
+181:8-181:16
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 182:1-182:5
+182:1-182:5
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 182:8-182:16
+182:8-182:16
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 183:1-183:6
+183:1-183:6
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 183:9-183:18
+183:9-183:18
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 184:1-184:5
+184:1-184:5
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 184:8-184:16
+184:8-184:16
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 185:1-185:6
+185:1-185:6
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 185:9-185:18
+185:9-185:18
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 186:1-186:5
+186:1-186:5
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 186:8-186:16
+186:8-186:16
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 187:1-187:6
+187:1-187:6
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 187:9-187:18
+187:9-187:18
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 188:1-188:6
+188:1-188:6
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a -> a
-Prelude.lc 188:9-188:18
+188:9-188:18
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a -> a
-Prelude.lc 191:1-191:4
+191:1-191:4
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a -> a
-Prelude.lc 191:7-191:14
+191:7-191:14
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a -> a
-Prelude.lc 192:1-192:4
+192:1-192:4
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 192:7-192:14
+192:7-192:14
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 193:1-193:4
+193:1-193:4
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 193:7-193:14
+193:7-193:14
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 194:1-194:5
+194:1-194:5
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 194:8-194:16
+194:8-194:16
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 195:1-195:5
+195:1-195:5
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 195:8-195:16
+195:8-195:16
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 196:1-196:5
+196:1-196:5
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 196:8-196:16
+196:8-196:16
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 197:1-197:12
+197:1-197:12
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 197:15-197:26
+197:15-197:26
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 200:1-200:4
+200:1-200:4
     forall a b (c :: Nat) . (Signed a, b ~ VecScalar c a) => b -> b
-Prelude.lc 200:7-200:14
+200:7-200:14
     forall a b (c :: Nat) . (Signed a, b ~ VecScalar c a) => b -> b
-Prelude.lc 201:1-201:5
+201:1-201:5
     forall a b (c :: Nat) . (Signed a, b ~ VecScalar c a) => b -> b
-Prelude.lc 201:8-201:16
+201:8-201:16
     forall a b (c :: Nat) . (Signed a, b ~ VecScalar c a) => b -> b
-Prelude.lc 202:1-202:6
+202:1-202:6
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 202:9-202:18
+202:9-202:18
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 203:1-203:6
+203:1-203:6
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 203:9-203:18
+203:9-203:18
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 204:1-204:6
+204:1-204:6
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 204:9-204:18
+204:9-204:18
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 205:1-205:10
+205:1-205:10
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 205:13-205:26
+205:13-205:26
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 206:1-206:5
+206:1-206:5
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 206:8-206:16
+206:8-206:16
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 207:1-207:6
+207:1-207:6
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 207:9-207:18
+207:9-207:18
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 208:1-208:4
+208:1-208:4
     forall a b (c :: Nat) . (Num a, b ~ VecScalar c a) => b -> b -> b
-Prelude.lc 208:7-208:14
+208:7-208:14
     forall a b (c :: Nat) . (Num a, b ~ VecScalar c a) => b -> b -> b
-Prelude.lc 209:1-209:4
+209:1-209:4
     forall a b (c :: Nat) . (Num a, b ~ VecScalar c a) => b -> b -> b
-Prelude.lc 209:7-209:14
+209:7-209:14
     forall a b (c :: Nat) . (Num a, b ~ VecScalar c a) => b -> b -> b
-Prelude.lc 210:1-210:4
+210:1-210:4
     forall a b (c :: Nat) . (Num a, b ~ VecScalar c a) => b -> b -> b
-Prelude.lc 210:7-210:14
+210:7-210:14
     forall a b (c :: Nat) . (Num a, b ~ VecScalar c a) => b -> b -> b
-Prelude.lc 211:1-211:5
+211:1-211:5
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> (a, a)
-Prelude.lc 211:8-211:16
+211:8-211:16
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> (a, a)
-Prelude.lc 212:1-212:6
+212:1-212:6
     forall a b (c :: Nat) . (Num a, b ~ VecScalar c a) => b -> b -> b -> b
-Prelude.lc 212:9-212:18
+212:9-212:18
     forall a b (c :: Nat) . (Num a, b ~ VecScalar c a) => b -> b -> b -> b
-Prelude.lc 213:1-213:7
+213:1-213:7
     forall a b (c :: Nat) . (Num a, b ~ VecScalar c a) => b -> a -> a -> b
-Prelude.lc 213:10-213:20
+213:10-213:20
     forall a b (c :: Nat) . (Num a, b ~ VecScalar c a) => b -> a -> a -> b
-Prelude.lc 214:1-214:4
+214:1-214:4
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a -> a -> a
-Prelude.lc 214:7-214:14
+214:7-214:14
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a -> a -> a
-Prelude.lc 215:1-215:5
+215:1-215:5
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a -> Float -> a
-Prelude.lc 215:8-215:16
+215:8-215:16
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a -> Float -> a
-Prelude.lc 216:1-216:5
+216:1-216:5
     forall a (b :: Nat) c
       . (a ~ VecScalar b Float, c ~ VecScalar b Bool) => a -> a -> c -> a
-Prelude.lc 216:8-216:16
+216:8-216:16
     forall a (b :: Nat) c
       . (a ~ VecScalar b Float, c ~ VecScalar b Bool) => a -> a -> c -> a
-Prelude.lc 217:1-217:5
+217:1-217:5
     forall a (b :: Nat) . (a ~ VecS Float b) => a -> a -> a
-Prelude.lc 217:8-217:16
+217:8-217:16
     forall a (b :: Nat) . (a ~ VecS Float b) => a -> a -> a
-Prelude.lc 218:1-218:6
+218:1-218:6
     forall a (b :: Nat) . (a ~ VecScalar b Float) => Float -> a -> a
-Prelude.lc 218:9-218:18
+218:9-218:18
     forall a (b :: Nat) . (a ~ VecScalar b Float) => Float -> a -> a
-Prelude.lc 219:1-219:11
+219:1-219:11
     forall a (b :: Nat) . (a ~ VecS Float b) => a -> a -> a -> a
-Prelude.lc 219:14-219:28
+219:14-219:28
     forall a (b :: Nat) . (a ~ VecS Float b) => a -> a -> a -> a
-Prelude.lc 220:1-220:12
+220:1-220:12
     forall a (b :: Nat) . (a ~ VecScalar b Float) => Float -> Float -> a -> a
-Prelude.lc 220:15-220:30
+220:15-220:30
     forall a (b :: Nat) . (a ~ VecScalar b Float) => Float -> Float -> a -> a
-Prelude.lc 221:1-221:6
+221:1-221:6
     forall a (b :: Nat) c . (a ~ VecScalar b Float, c ~ VecScalar b Bool) => a -> c
-Prelude.lc 221:9-221:18
+221:9-221:18
     forall a (b :: Nat) c . (a ~ VecScalar b Float, c ~ VecScalar b Bool) => a -> c
-Prelude.lc 222:1-222:6
+222:1-222:6
     forall a (b :: Nat) c . (a ~ VecScalar b Float, c ~ VecScalar b Bool) => a -> c
-Prelude.lc 222:9-222:18
+222:9-222:18
     forall a (b :: Nat) c . (a ~ VecScalar b Float, c ~ VecScalar b Bool) => a -> c
-Prelude.lc 224:1-224:5
+224:1-224:5
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 224:8-224:16
+224:8-224:16
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 225:1-225:5
+225:1-225:5
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 225:8-225:16
+225:8-225:16
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 226:1-226:7
+226:1-226:7
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 226:10-226:20
+226:10-226:20
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 228:1-228:7
+228:1-228:7
     forall (a :: Nat) . VecScalar a Float -> Float
-Prelude.lc 228:10-228:20
+228:10-228:20
     forall (a :: Nat) . VecScalar a Float -> Float
-Prelude.lc 229:1-229:7
+229:1-229:7
     forall (a :: Nat) . VecScalar a Float -> Vec 2 Float
-Prelude.lc 229:10-229:20
+229:10-229:20
     forall (a :: Nat) . VecScalar a Float -> Vec 2 Float
-Prelude.lc 230:1-230:7
+230:1-230:7
     forall (a :: Nat) . VecScalar a Float -> Vec 3 Float
-Prelude.lc 230:10-230:20
+230:10-230:20
     forall (a :: Nat) . VecScalar a Float -> Vec 3 Float
-Prelude.lc 231:1-231:7
+231:1-231:7
     forall (a :: Nat) . VecScalar a Float -> Vec 4 Float
-Prelude.lc 231:10-231:20
+231:10-231:20
     forall (a :: Nat) . VecScalar a Float -> Vec 4 Float
-Prelude.lc 234:1-234:7
+234:1-234:7
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> Float
-Prelude.lc 234:10-234:20
+234:10-234:20
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> Float
-Prelude.lc 235:1-235:9
+235:1-235:9
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a -> Float
-Prelude.lc 235:12-235:24
+235:12-235:24
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a -> Float
-Prelude.lc 236:1-236:4
+236:1-236:4
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a -> Float
-Prelude.lc 236:7-236:14
+236:7-236:14
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a -> Float
-Prelude.lc 237:1-237:6
+237:1-237:6
     forall a . (a ~ VecS Float 3) => a -> a -> a
-Prelude.lc 237:9-237:18
+237:9-237:18
     forall a . (a ~ VecS Float 3) => a -> a -> a
-Prelude.lc 238:1-238:10
+238:1-238:10
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 238:13-238:26
+238:13-238:26
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 239:1-239:12
+239:1-239:12
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a -> a -> a
-Prelude.lc 239:15-239:30
+239:15-239:30
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a -> a -> a
-Prelude.lc 240:1-240:8
+240:1-240:8
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a -> a
-Prelude.lc 240:11-240:22
+240:11-240:22
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a -> a
-Prelude.lc 241:1-241:8
+241:1-241:8
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a -> a -> a
-Prelude.lc 241:11-241:22
+241:11-241:22
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a -> a -> a
-Prelude.lc 243:1-243:10
+243:1-243:10
     forall (a :: Nat) (b :: Nat) c . Mat a b c -> Mat b a c
-Prelude.lc 243:13-243:26
+243:13-243:26
     forall (a :: Nat) (b :: Nat) c . Mat a b c -> Mat b a c
-Prelude.lc 244:1-244:4
+244:1-244:4
     forall (a :: Nat) b . Mat a a b -> Float
-Prelude.lc 244:7-244:22
+244:7-244:22
     forall (a :: Nat) b . Mat a a b -> Float
-Prelude.lc 245:1-245:4
+245:1-245:4
     forall (a :: Nat) b . Mat a a b -> Mat a a b
-Prelude.lc 245:7-245:18
+245:7-245:18
     forall (a :: Nat) b . Mat a a b -> Mat a a b
-Prelude.lc 246:1-246:6
+246:1-246:6
     forall (a :: Nat) b (c :: Nat) . Vec a b -> Vec c b -> Mat c a b
-Prelude.lc 246:9-246:25
+246:9-246:25
     forall (a :: Nat) b (c :: Nat) . Vec a b -> Vec c b -> Mat c a b
-Prelude.lc 248:1-248:5
+248:1-248:5
     forall a b (c :: Nat) . (Integral a, b ~ VecScalar c a) => b -> b -> b
-Prelude.lc 248:11-248:19
+248:11-248:19
     forall a b (c :: Nat) . (Integral a, b ~ VecScalar c a) => b -> b -> b
-Prelude.lc 249:1-249:4
+249:1-249:4
     forall a b (c :: Nat) . (Integral a, b ~ VecScalar c a) => b -> b -> b
-Prelude.lc 249:11-249:18
+249:11-249:18
     forall a b (c :: Nat) . (Integral a, b ~ VecScalar c a) => b -> b -> b
-Prelude.lc 250:1-250:5
+250:1-250:5
     forall a b (c :: Nat) . (Integral a, b ~ VecScalar c a) => b -> b -> b
-Prelude.lc 250:11-250:19
+250:11-250:19
     forall a b (c :: Nat) . (Integral a, b ~ VecScalar c a) => b -> b -> b
-Prelude.lc 251:1-251:5
+251:1-251:5
     forall a b (c :: Nat) . (Integral a, b ~ VecScalar c a) => b -> b
-Prelude.lc 251:11-251:19
+251:11-251:19
     forall a b (c :: Nat) . (Integral a, b ~ VecScalar c a) => b -> b
-Prelude.lc 252:1-252:6
+252:1-252:6
     forall a b (c :: Nat) . (Integral a, b ~ VecScalar c a) => b -> a -> b
-Prelude.lc 252:11-252:20
+252:11-252:20
     forall a b (c :: Nat) . (Integral a, b ~ VecScalar c a) => b -> a -> b
-Prelude.lc 253:1-253:5
+253:1-253:5
     forall a b (c :: Nat) . (Integral a, b ~ VecScalar c a) => b -> a -> b
-Prelude.lc 253:11-253:19
+253:11-253:19
     forall a b (c :: Nat) . (Integral a, b ~ VecScalar c a) => b -> a -> b
-Prelude.lc 254:1-254:6
+254:1-254:6
     forall a b (c :: Nat) . (Integral a, b ~ VecScalar c a) => b -> a -> b
-Prelude.lc 254:11-254:20
+254:11-254:20
     forall a b (c :: Nat) . (Integral a, b ~ VecScalar c a) => b -> a -> b
-Prelude.lc 255:1-255:7
+255:1-255:7
     forall a b (c :: Nat) d
       . (Integral a, b ~ VecScalar c a, d ~ VecScalar c Word) => b -> d -> b
-Prelude.lc 255:11-255:22
+255:11-255:22
     forall a b (c :: Nat) d
       . (Integral a, b ~ VecScalar c a, d ~ VecScalar c Word) => b -> d -> b
-Prelude.lc 256:1-256:7
+256:1-256:7
     forall a b (c :: Nat) d
       . (Integral a, b ~ VecScalar c a, d ~ VecScalar c Word) => b -> d -> b
-Prelude.lc 256:11-256:22
+256:11-256:22
     forall a b (c :: Nat) d
       . (Integral a, b ~ VecScalar c a, d ~ VecScalar c Word) => b -> d -> b
-Prelude.lc 257:1-257:8
+257:1-257:8
     forall a b (c :: Nat) . (Integral a, b ~ VecScalar c a) => b -> Word -> b
-Prelude.lc 257:11-257:23
+257:11-257:23
     forall a b (c :: Nat) . (Integral a, b ~ VecScalar c a) => b -> Word -> b
-Prelude.lc 258:1-258:8
+258:1-258:8
     forall a b (c :: Nat) . (Integral a, b ~ VecScalar c a) => b -> Word -> b
-Prelude.lc 258:11-258:23
+258:11-258:23
     forall a b (c :: Nat) . (Integral a, b ~ VecScalar c a) => b -> Word -> b
-Prelude.lc 260:1-260:15
+260:1-260:15
     forall (a :: Nat) . VecScalar a Float -> VecScalar a Int
-Prelude.lc 260:19-260:37
+260:19-260:37
     forall (a :: Nat) . VecScalar a Float -> VecScalar a Int
-Prelude.lc 261:1-261:16
+261:1-261:16
     forall (a :: Nat) . VecScalar a Float -> VecScalar a Word
-Prelude.lc 261:19-261:38
+261:19-261:38
     forall (a :: Nat) . VecScalar a Float -> VecScalar a Word
-Prelude.lc 262:1-262:15
+262:1-262:15
     forall (a :: Nat) . VecScalar a Int -> VecScalar a Float
-Prelude.lc 262:19-262:37
+262:19-262:37
     forall (a :: Nat) . VecScalar a Int -> VecScalar a Float
-Prelude.lc 263:1-263:16
+263:1-263:16
     forall (a :: Nat) . VecScalar a Word -> VecScalar a Float
-Prelude.lc 263:19-263:38
+263:19-263:38
     forall (a :: Nat) . VecScalar a Word -> VecScalar a Float
-Prelude.lc 281:3-281:4
+281:3-281:4
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 281:9-281:16
+281:9-281:16
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 281:9-281:18
+281:9-281:18
     _e -> _e
-Prelude.lc 281:9-281:20
+281:9-281:20
     _d
-Prelude.lc 281:17-281:18
+281:17-281:18
     _f
-Prelude.lc 281:19-281:20
+281:19-281:20
     _c
-Prelude.lc 282:3-282:4
+282:3-282:4
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 282:9-282:16
+282:9-282:16
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 282:9-282:18
+282:9-282:18
     _e -> _e
-Prelude.lc 282:9-282:20
+282:9-282:20
     _d
-Prelude.lc 282:17-282:18
+282:17-282:18
     _f
-Prelude.lc 282:19-282:20
+282:19-282:20
     _c
-Prelude.lc 283:3-283:4
+283:3-283:4
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 283:9-283:16
+283:9-283:16
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 283:9-283:18
+283:9-283:18
     _e -> _e
-Prelude.lc 283:9-283:20
+283:9-283:20
     _d
-Prelude.lc 283:17-283:18
+283:17-283:18
     _f
-Prelude.lc 283:19-283:20
+283:19-283:20
     _c
-Prelude.lc 284:3-284:4
+284:3-284:4
     forall a (b :: Nat) . Num a => VecScalar b a -> VecScalar b a -> VecScalar b a
-Prelude.lc 284:9-284:16
+284:9-284:16
     forall a b (c :: Nat) . (Num a, b ~ VecScalar c a) => b -> b -> b
-Prelude.lc 284:9-284:18
+284:9-284:18
     VecScalar _b _c -> VecScalar _b _c
-Prelude.lc 284:9-284:20
+284:9-284:20
     VecScalar _b _c
-Prelude.lc 284:17-284:18
+284:17-284:18
     _g
-Prelude.lc 284:19-284:20
+284:19-284:20
     _e
-Prelude.lc 285:3-285:4
+285:3-285:4
     forall a (b :: Nat) . Num a => VecScalar b a -> VecScalar b a -> VecScalar b a
-Prelude.lc 285:9-285:16
+285:9-285:16
     forall a b (c :: Nat) . (Num a, b ~ VecScalar c a) => b -> b -> b
-Prelude.lc 285:9-285:18
+285:9-285:18
     VecScalar _b _c -> VecScalar _b _c
-Prelude.lc 285:9-285:20
+285:9-285:20
     VecScalar _b _c
-Prelude.lc 285:17-285:18
+285:17-285:18
     _g
-Prelude.lc 285:19-285:20
+285:19-285:20
     _e
-Prelude.lc 287:1-287:4
+287:1-287:4
     forall a . Signed (MatVecScalarElem a) => a -> a
-Prelude.lc 287:9-287:16
+287:9-287:16
     forall a . Signed (MatVecScalarElem a) => a -> a
-Prelude.lc 287:9-287:18
+287:9-287:18
     _c
-Prelude.lc 287:17-287:18
+287:17-287:18
     _d
-Prelude.lc 291:3-291:5
+291:3-291:5
     forall a . a -> a -> Bool
-Prelude.lc 291:10-291:22
+291:10-291:22
     forall a b . (b ~ MatVecScalarElem a) => a -> a -> Bool
-Prelude.lc 291:10-291:24
+291:10-291:24
     _d -> Bool
-Prelude.lc 291:10-291:26
+291:10-291:26
     Bool
-Prelude.lc 291:23-291:24
+291:23-291:24
     _e
-Prelude.lc 291:25-291:26
+291:25-291:26
     _b
-Prelude.lc 292:3-292:4
+292:3-292:4
     forall (a :: Nat) b
       . Num b => VecScalar a b -> VecScalar a b -> VecScalar a Bool
-Prelude.lc 292:9-292:21
+292:9-292:21
     forall a (b :: Nat) c d
       . (Num c, a ~ VecScalar b c, d ~ VecScalar b Bool) => a -> a -> d
-Prelude.lc 292:9-292:23
+292:9-292:23
     VecScalar _c _b -> VecScalar _c Bool
-Prelude.lc 292:9-292:25
+292:9-292:25
     VecScalar _c Bool
-Prelude.lc 292:22-292:23
+292:22-292:23
     _g
-Prelude.lc 292:24-292:25
+292:24-292:25
     _e
-Prelude.lc 293:3-293:5
+293:3-293:5
     forall (a :: Nat) b
       . Num b => VecScalar a b -> VecScalar a b -> VecScalar a Bool
-Prelude.lc 293:10-293:27
+293:10-293:27
     forall a (b :: Nat) c d
       . (Num c, a ~ VecScalar b c, d ~ VecScalar b Bool) => a -> a -> d
-Prelude.lc 293:10-293:29
+293:10-293:29
     VecScalar _c _b -> VecScalar _c Bool
-Prelude.lc 293:10-293:31
+293:10-293:31
     VecScalar _c Bool
-Prelude.lc 293:28-293:29
+293:28-293:29
     _g
-Prelude.lc 293:30-293:31
+293:30-293:31
     _e
-Prelude.lc 294:3-294:5
+294:3-294:5
     forall (a :: Nat) b
       . Num b => VecScalar a b -> VecScalar a b -> VecScalar a Bool
-Prelude.lc 294:10-294:30
+294:10-294:30
     forall a (b :: Nat) c d
       . (Num c, a ~ VecScalar b c, d ~ VecScalar b Bool) => a -> a -> d
-Prelude.lc 294:10-294:32
+294:10-294:32
     VecScalar _c _b -> VecScalar _c Bool
-Prelude.lc 294:10-294:34
+294:10-294:34
     VecScalar _c Bool
-Prelude.lc 294:31-294:32
+294:31-294:32
     _g
-Prelude.lc 294:33-294:34
+294:33-294:34
     _e
-Prelude.lc 295:3-295:4
+295:3-295:4
     forall (a :: Nat) b
       . Num b => VecScalar a b -> VecScalar a b -> VecScalar a Bool
-Prelude.lc 295:9-295:24
+295:9-295:24
     forall a (b :: Nat) c d
       . (Num c, a ~ VecScalar b c, d ~ VecScalar b Bool) => a -> a -> d
-Prelude.lc 295:9-295:26
+295:9-295:26
     VecScalar _c _b -> VecScalar _c Bool
-Prelude.lc 295:9-295:28
+295:9-295:28
     VecScalar _c Bool
-Prelude.lc 295:25-295:26
+295:25-295:26
     _g
-Prelude.lc 295:27-295:28
+295:27-295:28
     _e
-Prelude.lc 298:3-298:5
+298:3-298:5
     Bool -> Bool -> Bool
-Prelude.lc 298:10-298:17
+298:10-298:17
     Bool -> Bool -> Bool
-Prelude.lc 298:10-298:19
+298:10-298:19
     Bool -> Bool
-Prelude.lc 298:10-298:21
+298:10-298:21
     Bool
-Prelude.lc 298:18-298:19
+298:18-298:19
     _d
-Prelude.lc 298:20-298:21
+298:20-298:21
     _b
-Prelude.lc 299:3-299:5
+299:3-299:5
     Bool -> Bool -> Bool
-Prelude.lc 299:10-299:16
+299:10-299:16
     Bool -> Bool -> Bool
-Prelude.lc 299:10-299:18
+299:10-299:18
     Bool -> Bool
-Prelude.lc 299:10-299:20
+299:10-299:20
     Bool
-Prelude.lc 299:17-299:18
+299:17-299:18
     _d
-Prelude.lc 299:19-299:20
+299:19-299:20
     _b
-Prelude.lc 300:1-300:4
+300:1-300:4
     Bool -> Bool -> Bool
-Prelude.lc 300:7-300:14
+300:7-300:14
     Bool -> Bool -> Bool
-Prelude.lc 301:1-301:4
+301:1-301:4
     forall (a :: Nat) . VecScalar a Bool -> VecScalar a Bool
-Prelude.lc 301:9-301:16
+301:9-301:16
     forall a (b :: Nat) . (a ~ VecScalar b Bool) => a -> a
-Prelude.lc 301:9-301:18
+301:9-301:18
     VecScalar _a Bool
-Prelude.lc 301:17-301:18
+301:17-301:18
     _c
-Prelude.lc 302:1-302:4
+302:1-302:4
     forall (a :: Nat) . VecScalar a Bool -> Bool
-Prelude.lc 302:9-302:16
+302:9-302:16
     forall (a :: Nat) . VecScalar a Bool -> Bool
-Prelude.lc 302:9-302:18
+302:9-302:18
     Bool
-Prelude.lc 302:17-302:18
+302:17-302:18
     _c
-Prelude.lc 303:1-303:4
+303:1-303:4
     forall (a :: Nat) . VecScalar a Bool -> Bool
-Prelude.lc 303:9-303:16
+303:9-303:16
     forall (a :: Nat) . VecScalar a Bool -> Bool
-Prelude.lc 303:9-303:18
+303:9-303:18
     Bool
-Prelude.lc 303:17-303:18
+303:17-303:18
     _c
-Prelude.lc 306:3-306:6
+306:3-306:6
     forall (a :: Nat) (b :: Nat) c (d :: Nat) . Mat a b c -> Mat b d c -> Mat a d c
-Prelude.lc 306:11-306:24
+306:11-306:24
     forall (a :: Nat) (b :: Nat) c (d :: Nat) . Mat a b c -> Mat b d c -> Mat a d c
-Prelude.lc 306:11-306:26
+306:11-306:26
     Mat _c _a _b -> Mat _d _a _b
-Prelude.lc 306:11-306:28
+306:11-306:28
     Mat _d _a _b
-Prelude.lc 306:25-306:26
+306:25-306:26
     _h
-Prelude.lc 306:27-306:28
+306:27-306:28
     _f
-Prelude.lc 307:3-307:5
+307:3-307:5
     forall (a :: Nat) (b :: Nat) c . Mat a b c -> VecS c b -> Vec a c
-Prelude.lc 307:10-307:23
+307:10-307:23
     forall (a :: Nat) (b :: Nat) c . Mat a b c -> Vec b c -> Vec a c
-Prelude.lc 307:10-307:25
+307:10-307:25
     Vec _b _a -> Vec _c _a
-Prelude.lc 307:10-307:27
+307:10-307:27
     Vec _c _a
-Prelude.lc 307:24-307:25
+307:24-307:25
     _g
-Prelude.lc 307:26-307:27
+307:26-307:27
     _e
-Prelude.lc 308:3-308:5
+308:3-308:5
     forall (a :: Nat) b (c :: Nat) . VecS b a -> Mat a c b -> Vec c b
-Prelude.lc 308:10-308:23
+308:10-308:23
     forall (a :: Nat) b (c :: Nat) . Vec a b -> Mat a c b -> Vec c b
-Prelude.lc 308:10-308:25
+308:10-308:25
     Mat _c _a _b -> Vec _a _b
-Prelude.lc 308:10-308:27
+308:10-308:27
     Vec _a _b
-Prelude.lc 308:24-308:25
+308:24-308:25
     _g
-Prelude.lc 308:26-308:27
+308:26-308:27
     _e
-Prelude.lc 315:3-315:5
+315:3-315:5
     forall a . Num (MatVecScalarElem a) => a -> MatVecScalarElem a -> a
-Prelude.lc 315:10-315:18
+315:10-315:18
     forall a b . (a ~ MatVecScalarElem b, Num a) => b -> a -> b
-Prelude.lc 315:10-315:20
+315:10-315:20
     MatVecScalarElem _e -> _e
-Prelude.lc 315:10-315:22
+315:10-315:22
     _d
-Prelude.lc 315:19-315:20
+315:19-315:20
     _f
-Prelude.lc 315:21-315:22
+315:21-315:22
     _c
-Prelude.lc 316:3-316:5
+316:3-316:5
     forall a . Num (MatVecScalarElem a) => a -> MatVecScalarElem a -> a
-Prelude.lc 316:10-316:18
+316:10-316:18
     forall a b . (a ~ MatVecScalarElem b, Num a) => b -> a -> b
-Prelude.lc 316:10-316:20
+316:10-316:20
     MatVecScalarElem _e -> _e
-Prelude.lc 316:10-316:22
+316:10-316:22
     _d
-Prelude.lc 316:19-316:20
+316:19-316:20
     _f
-Prelude.lc 316:21-316:22
+316:21-316:22
     _c
-Prelude.lc 317:3-317:5
+317:3-317:5
     forall a . Num (MatVecScalarElem a) => a -> MatVecScalarElem a -> a
-Prelude.lc 317:10-317:18
+317:10-317:18
     forall a b . (a ~ MatVecScalarElem b, Num a) => b -> a -> b
-Prelude.lc 317:10-317:20
+317:10-317:20
     MatVecScalarElem _e -> _e
-Prelude.lc 317:10-317:22
+317:10-317:22
     _d
-Prelude.lc 317:19-317:20
+317:19-317:20
     _f
-Prelude.lc 317:21-317:22
+317:21-317:22
     _c
-Prelude.lc 318:3-318:5
+318:3-318:5
     forall a (b :: Nat) . Num a => VecScalar b a -> a -> VecScalar b a
-Prelude.lc 318:10-318:18
+318:10-318:18
     forall a b (c :: Nat) . (Num a, b ~ VecScalar c a) => b -> a -> b
-Prelude.lc 318:10-318:20
+318:10-318:20
     _c -> VecScalar _b _c
-Prelude.lc 318:10-318:22
+318:10-318:22
     VecScalar _b _d
-Prelude.lc 318:19-318:20
+318:19-318:20
     _g
-Prelude.lc 318:21-318:22
+318:21-318:22
     _e
-Prelude.lc 319:3-319:5
+319:3-319:5
     forall a (b :: Nat) . Num a => VecScalar b a -> a -> VecScalar b a
-Prelude.lc 319:10-319:18
+319:10-319:18
     forall a b (c :: Nat) . (Num a, b ~ VecScalar c a) => b -> a -> b
-Prelude.lc 319:10-319:20
+319:10-319:20
     _c -> VecScalar _b _c
-Prelude.lc 319:10-319:22
+319:10-319:22
     VecScalar _b _d
-Prelude.lc 319:19-319:20
+319:19-319:20
     _g
-Prelude.lc 319:21-319:22
+319:21-319:22
     _e
-Prelude.lc 326:16-326:21
+326:16-326:21
     Type
-Prelude.lc 327:16-327:21
+327:16-327:21
     Type
-Prelude.lc 327:16-330:29
+327:16-330:29
     Type
-Prelude.lc 328:16-328:21
+328:16-328:21
     Type
-Prelude.lc 328:16-330:29
+328:16-330:29
     Type
-Prelude.lc 329:16-329:21
+329:16-329:21
     Type
-Prelude.lc 329:16-330:29
+329:16-330:29
     Type
-Prelude.lc 330:16-330:19
+330:16-330:19
     Nat -> Nat -> Type -> Type
-Prelude.lc 330:16-330:21
+330:16-330:21
     Nat -> Type -> Type
-Prelude.lc 330:16-330:23
+330:16-330:23
     Type -> Type
-Prelude.lc 330:16-330:29
+330:16-330:29
     Type | Type
-Prelude.lc 330:20-330:21
+330:20-330:21
     _b
-Prelude.lc 330:22-330:23
+330:22-330:23
     _b
-Prelude.lc 330:24-330:29
+330:24-330:29
     Type
-Prelude.lc 331:1-331:12
+331:1-331:12
     Float -> Float -> Float -> Float -> Mat 4 4 Float
-Prelude.lc 332:5-332:9
+332:5-332:9
     Vec 4 Float -> Vec 4 Float -> Vec 4 Float -> Vec 4 Float -> Mat 4 4 Float
-Prelude.lc 332:5-332:59
+332:5-332:59
     Vec 4 Float -> Vec 4 Float -> Vec 4 Float -> Mat 4 4 Float
-Prelude.lc 332:5-333:59
+332:5-333:59
     Vec 4 Float -> Vec 4 Float -> Mat 4 4 Float
-Prelude.lc 332:5-334:62
+332:5-334:62
     Vec 4 Float -> Mat 4 4 Float
-Prelude.lc 332:5-335:59
+332:5-335:59
     Mat 4 4 Float
-Prelude.lc 332:11-332:13
+332:11-332:13
     forall a . a -> a -> a -> a -> VecS a 4
-Prelude.lc 332:11-332:25
+332:11-332:25
     Float -> Float -> Float -> VecS Float 4
-Prelude.lc 332:11-332:29
+332:11-332:29
     Float -> Float -> VecS Float 4
-Prelude.lc 332:11-332:43
+332:11-332:43
     Float -> VecS Float 4
-Prelude.lc 332:11-332:58
+332:11-332:58
     VecS Float 4
-Prelude.lc 332:15-332:16
+332:15-332:16
     _b
-Prelude.lc 332:15-332:17
+332:15-332:17
     _c -> _c
-Prelude.lc 332:15-332:18
+332:15-332:18
     VecScalar 1 Float
-Prelude.lc 332:15-332:19
+332:15-332:19
     VecScalar 1 Float -> VecScalar 1 Float
-Prelude.lc 332:15-332:24
+332:15-332:24
     VecScalar 1 Float
-Prelude.lc 332:16-332:17
+332:16-332:17
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 332:17-332:18
+332:17-332:18
     Float
-Prelude.lc 332:18-332:19
+332:18-332:19
     forall a (b :: Nat) . Num a => VecScalar b a -> VecScalar b a -> VecScalar b a
-Prelude.lc 332:20-332:21
+332:20-332:21
     Float
-Prelude.lc 332:20-332:22
+332:20-332:22
     Float -> Float
-Prelude.lc 332:20-332:23
+332:20-332:23
     Float
-Prelude.lc 332:21-332:22
+332:21-332:22
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 332:22-332:23
+332:22-332:23
     Float
-Prelude.lc 332:28-332:29
+332:28-332:29
     _b
-Prelude.lc 332:42-332:43
+332:42-332:43
     _b
-Prelude.lc 332:57-332:58
+332:57-332:58
     _b
-Prelude.lc 333:11-333:13
+333:11-333:13
     forall a . a -> a -> a -> a -> VecS a 4
-Prelude.lc 333:11-333:15
+333:11-333:15
     _b -> _b -> _b -> VecS _b 4
-Prelude.lc 333:11-333:39
+333:11-333:39
     Float -> Float -> VecS Float 4
-Prelude.lc 333:11-333:43
+333:11-333:43
     Float -> VecS Float 4
-Prelude.lc 333:11-333:58
+333:11-333:58
     VecS Float 4
-Prelude.lc 333:14-333:15
+333:14-333:15
     _b
-Prelude.lc 333:29-333:30
+333:29-333:30
     _b
-Prelude.lc 333:29-333:31
+333:29-333:31
     _c -> _c
-Prelude.lc 333:29-333:32
+333:29-333:32
     VecScalar 1 Float
-Prelude.lc 333:29-333:33
+333:29-333:33
     VecScalar 1 Float -> VecScalar 1 Float
-Prelude.lc 333:29-333:38
+333:29-333:38
     VecScalar 1 Float
-Prelude.lc 333:30-333:31
+333:30-333:31
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 333:31-333:32
+333:31-333:32
     Float
-Prelude.lc 333:32-333:33
+333:32-333:33
     forall a (b :: Nat) . Num a => VecScalar b a -> VecScalar b a -> VecScalar b a
-Prelude.lc 333:34-333:35
+333:34-333:35
     Float
-Prelude.lc 333:34-333:36
+333:34-333:36
     Float -> Float
-Prelude.lc 333:34-333:37
+333:34-333:37
     Float
-Prelude.lc 333:35-333:36
+333:35-333:36
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 333:36-333:37
+333:36-333:37
     Float
-Prelude.lc 333:42-333:43
+333:42-333:43
     _b
-Prelude.lc 333:57-333:58
+333:57-333:58
     _b
-Prelude.lc 334:11-334:13
+334:11-334:13
     forall a . a -> a -> a -> a -> VecS a 4
-Prelude.lc 334:11-334:27
+334:11-334:27
     Float -> Float -> Float -> VecS Float 4
-Prelude.lc 334:11-334:41
+334:11-334:41
     Float -> Float -> VecS Float 4
-Prelude.lc 334:11-334:56
+334:11-334:56
     Float -> VecS Float 4
-Prelude.lc 334:11-334:61
+334:11-334:61
     VecS Float 4
-Prelude.lc 334:15-334:21
+334:15-334:21
     VecScalar 1 Float -> VecScalar 1 Float
-Prelude.lc 334:15-334:26
+334:15-334:26
     VecScalar 1 Float
-Prelude.lc 334:16-334:17
+334:16-334:17
     Float
-Prelude.lc 334:16-334:18
+334:16-334:18
     Float -> Float
-Prelude.lc 334:16-334:19
+334:16-334:19
     Float
-Prelude.lc 334:17-334:18
+334:17-334:18
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 334:18-334:19
+334:18-334:19
     Float
-Prelude.lc 334:20-334:21
+334:20-334:21
     forall a (b :: Nat) . Num a => VecScalar b a -> VecScalar b a -> VecScalar b a
-Prelude.lc 334:22-334:23
+334:22-334:23
     Float
-Prelude.lc 334:22-334:24
+334:22-334:24
     Float -> Float
-Prelude.lc 334:22-334:25
+334:22-334:25
     Float
-Prelude.lc 334:23-334:24
+334:23-334:24
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 334:24-334:25
+334:24-334:25
     Float
-Prelude.lc 334:29-334:35
+334:29-334:35
     VecScalar 1 Float -> VecScalar 1 Float
-Prelude.lc 334:29-334:40
+334:29-334:40
     VecScalar 1 Float
-Prelude.lc 334:30-334:31
+334:30-334:31
     Float
-Prelude.lc 334:30-334:32
+334:30-334:32
     Float -> Float
-Prelude.lc 334:30-334:33
+334:30-334:33
     Float
-Prelude.lc 334:31-334:32
+334:31-334:32
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 334:32-334:33
+334:32-334:33
     Float
-Prelude.lc 334:34-334:35
+334:34-334:35
     forall a (b :: Nat) . Num a => VecScalar b a -> VecScalar b a -> VecScalar b a
-Prelude.lc 334:36-334:37
+334:36-334:37
     Float
-Prelude.lc 334:36-334:38
+334:36-334:38
     Float -> Float
-Prelude.lc 334:36-334:39
+334:36-334:39
     Float
-Prelude.lc 334:37-334:38
+334:37-334:38
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 334:38-334:39
+334:38-334:39
     Float
-Prelude.lc 334:43-334:44
+334:43-334:44
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 334:43-334:55
+334:43-334:55
     Float
-Prelude.lc 334:44-334:50
+334:44-334:50
     VecScalar 1 Float -> VecScalar 1 Float
-Prelude.lc 334:44-334:55
+334:44-334:55
     VecScalar 1 Float
-Prelude.lc 334:45-334:46
+334:45-334:46
     Float
-Prelude.lc 334:45-334:47
+334:45-334:47
     Float -> Float
-Prelude.lc 334:45-334:48
+334:45-334:48
     Float
-Prelude.lc 334:46-334:47
+334:46-334:47
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 334:47-334:48
+334:47-334:48
     Float
-Prelude.lc 334:49-334:50
+334:49-334:50
     forall a (b :: Nat) . Num a => VecScalar b a -> VecScalar b a -> VecScalar b a
-Prelude.lc 334:51-334:52
+334:51-334:52
     Float
-Prelude.lc 334:51-334:53
+334:51-334:53
     Float -> Float
-Prelude.lc 334:51-334:54
+334:51-334:54
     Float
-Prelude.lc 334:52-334:53
+334:52-334:53
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 334:53-334:54
+334:53-334:54
     Float
-Prelude.lc 334:58-334:59
+334:58-334:59
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 334:58-334:60
+334:58-334:60
     Float
-Prelude.lc 334:59-334:60
+334:59-334:60
     _b
-Prelude.lc 335:11-335:13
+335:11-335:13
     forall a . a -> a -> a -> a -> VecS a 4
-Prelude.lc 335:11-335:15
+335:11-335:15
     _b -> _b -> _b -> VecS _b 4
-Prelude.lc 335:11-335:29
+335:11-335:29
     _c -> _c -> VecS _c 4
-Prelude.lc 335:11-335:56
+335:11-335:56
     Float -> VecS Float 4
-Prelude.lc 335:11-335:58
+335:11-335:58
     VecS Float 4
-Prelude.lc 335:14-335:15
+335:14-335:15
     _b
-Prelude.lc 335:28-335:29
+335:28-335:29
     _b
-Prelude.lc 335:43-335:44
+335:43-335:44
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 335:43-335:55
+335:43-335:55
     Float
-Prelude.lc 335:44-335:45
+335:44-335:45
     _b
-Prelude.lc 335:44-335:46
+335:44-335:46
     _c -> _c
-Prelude.lc 335:44-335:47
+335:44-335:47
     Float
-Prelude.lc 335:44-335:48
+335:44-335:48
     Float -> Float
-Prelude.lc 335:44-335:49
+335:44-335:49
     Float
-Prelude.lc 335:44-335:50
+335:44-335:50
     VecScalar 1 Float -> VecScalar 1 Float
-Prelude.lc 335:44-335:55
+335:44-335:55
     VecScalar 1 Float
-Prelude.lc 335:45-335:46
+335:45-335:46
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 335:46-335:47
+335:46-335:47
     Float
-Prelude.lc 335:47-335:48
+335:47-335:48
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 335:48-335:49
+335:48-335:49
     Float
-Prelude.lc 335:49-335:50
+335:49-335:50
     forall a (b :: Nat) . Num a => VecScalar b a -> VecScalar b a -> VecScalar b a
-Prelude.lc 335:51-335:52
+335:51-335:52
     Float
-Prelude.lc 335:51-335:53
+335:51-335:53
     Float -> Float
-Prelude.lc 335:51-335:54
+335:51-335:54
     Float
-Prelude.lc 335:52-335:53
+335:52-335:53
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 335:53-335:54
+335:53-335:54
     Float
-Prelude.lc 335:57-335:58
+335:57-335:58
     _b
-Prelude.lc 337:9-337:10
+337:9-337:10
     Float
-Prelude.lc 337:9-337:11
+337:9-337:11
     Float -> Float
-Prelude.lc 337:9-337:22
+337:9-337:22
     Float
-Prelude.lc 337:10-337:11
+337:10-337:11
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 337:11-337:14
+337:11-337:14
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 337:11-337:22
+337:11-337:22
     VecScalar 1 Float
-Prelude.lc 337:15-337:19
+337:15-337:19
     Float
-Prelude.lc 337:15-337:20
+337:15-337:20
     VecScalar 1 Float -> VecScalar 1 Float
-Prelude.lc 337:15-337:21
+337:15-337:21
     VecScalar 1 Float
-Prelude.lc 337:19-337:20
+337:19-337:20
     forall a (b :: Nat) . Num a => VecScalar b a -> VecScalar b a -> VecScalar b a
-Prelude.lc 337:20-337:21
+337:20-337:21
     _b
-Prelude.lc 338:9-338:10
+338:9-338:10
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 338:9-338:11
+338:9-338:11
     Float
-Prelude.lc 338:10-338:11
+338:10-338:11
     Float
-Prelude.lc 339:9-339:15
+339:9-339:15
     Float
-Prelude.lc 339:9-339:16
+339:9-339:16
     Float -> Float
-Prelude.lc 339:9-339:17
+339:9-339:17
     Float
-Prelude.lc 339:15-339:16
+339:15-339:16
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 339:16-339:17
+339:16-339:17
     Float
-Prelude.lc 340:9-340:10
+340:9-340:10
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 340:9-340:11
+340:9-340:11
     Float
-Prelude.lc 340:10-340:11
+340:10-340:11
     Float
-Prelude.lc 342:1-342:11
+342:1-342:11
     VecScalar 1 Float -> Mat 4 4 Float
-Prelude.lc 342:16-342:20
+342:16-342:20
     Vec 4 Float -> Vec 4 Float -> Vec 4 Float -> Vec 4 Float -> Mat 4 4 Float
-Prelude.lc 342:16-342:33
+342:16-342:33
     Vec 4 Float -> Vec 4 Float -> Vec 4 Float -> Mat 4 4 Float
-Prelude.lc 342:16-342:49
+342:16-342:49
     Vec 4 Float -> Vec 4 Float -> Mat 4 4 Float
-Prelude.lc 342:16-342:62
+342:16-342:62
     Vec 4 Float -> Mat 4 4 Float
-Prelude.lc 342:16-342:75
+342:16-342:75
     Mat 4 4 Float
-Prelude.lc 342:22-342:24
+342:22-342:24
     forall a . a -> a -> a -> a -> VecS a 4
-Prelude.lc 342:22-342:26
+342:22-342:26
     VecScalar _c Float
       -> VecScalar _c Float -> VecScalar _c Float -> VecS (VecScalar _c Float) 4
-Prelude.lc 342:22-342:28
+342:22-342:28
     VecScalar _c Float -> VecScalar _c Float -> VecS (VecScalar _c Float) 4
-Prelude.lc 342:22-342:30
+342:22-342:30
     VecScalar _d Float -> VecS (VecScalar _d Float) 4
-Prelude.lc 342:22-342:32
+342:22-342:32
     VecS (VecScalar 1 Float) 4
-Prelude.lc 342:25-342:26
+342:25-342:26
     VecScalar _d Float
-Prelude.lc 342:27-342:28
+342:27-342:28
     VecScalar _c Float
-Prelude.lc 342:29-342:30
+342:29-342:30
     _b
-Prelude.lc 342:31-342:32
+342:31-342:32
     _b
-Prelude.lc 342:35-342:37
+342:35-342:37
     forall a . a -> a -> a -> a -> VecS a 4
-Prelude.lc 342:35-342:42
+342:35-342:42
     Float -> Float -> Float -> VecS Float 4
-Prelude.lc 342:35-342:44
+342:35-342:44
     Float -> Float -> VecS Float 4
-Prelude.lc 342:35-342:46
+342:35-342:46
     Float -> VecS Float 4
-Prelude.lc 342:35-342:48
+342:35-342:48
     VecS Float 4
-Prelude.lc 342:39-342:40
+342:39-342:40
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 342:39-342:41
+342:39-342:41
     Float
-Prelude.lc 342:40-342:41
+342:40-342:41
     VecScalar 1 Float
-Prelude.lc 342:43-342:44
+342:43-342:44
     VecScalar 1 Float
-Prelude.lc 342:45-342:46
+342:45-342:46
     _b
-Prelude.lc 342:47-342:48
+342:47-342:48
     _b
-Prelude.lc 342:51-342:53
+342:51-342:53
     forall a . a -> a -> a -> a -> VecS a 4
-Prelude.lc 342:51-342:55
+342:51-342:55
     _b -> _b -> _b -> VecS _b 4
-Prelude.lc 342:51-342:57
+342:51-342:57
     _c -> _c -> VecS _c 4
-Prelude.lc 342:51-342:59
+342:51-342:59
     _c -> VecS _c 4
-Prelude.lc 342:51-342:61
+342:51-342:61
     VecS Float 4
-Prelude.lc 342:54-342:55
+342:54-342:55
     _b
-Prelude.lc 342:56-342:57
+342:56-342:57
     _b
-Prelude.lc 342:58-342:59
+342:58-342:59
     _b
-Prelude.lc 342:60-342:61
+342:60-342:61
     _b
-Prelude.lc 342:64-342:66
+342:64-342:66
     forall a . a -> a -> a -> a -> VecS a 4
-Prelude.lc 342:64-342:68
+342:64-342:68
     _b -> _b -> _b -> VecS _b 4
-Prelude.lc 342:64-342:70
+342:64-342:70
     _c -> _c -> VecS _c 4
-Prelude.lc 342:64-342:72
+342:64-342:72
     _c -> VecS _c 4
-Prelude.lc 342:64-342:74
+342:64-342:74
     VecS Float 4
-Prelude.lc 342:67-342:68
+342:67-342:68
     _b
-Prelude.lc 342:69-342:70
+342:69-342:70
     _b
-Prelude.lc 342:71-342:72
+342:71-342:72
     _b
-Prelude.lc 342:73-342:74
+342:73-342:74
     _b
-Prelude.lc 344:9-344:12
+344:9-344:12
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 344:9-344:14
+344:9-344:14
     VecScalar _a Float
-Prelude.lc 344:13-344:14
+344:13-344:14
     _c
-Prelude.lc 345:9-345:12
+345:9-345:12
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 345:9-345:14
+345:9-345:14
     VecScalar _b Float
-Prelude.lc 345:13-345:14
+345:13-345:14
     VecScalar _c Float
-Prelude.lc 347:1-347:11
+347:1-347:11
     VecScalar 1 Float -> Mat 4 4 Float
-Prelude.lc 347:16-347:20
+347:16-347:20
     Vec 4 Float -> Vec 4 Float -> Vec 4 Float -> Vec 4 Float -> Mat 4 4 Float
-Prelude.lc 347:16-347:36
+347:16-347:36
     Vec 4 Float -> Vec 4 Float -> Vec 4 Float -> Mat 4 4 Float
-Prelude.lc 347:16-347:49
+347:16-347:49
     Vec 4 Float -> Vec 4 Float -> Mat 4 4 Float
-Prelude.lc 347:16-347:62
+347:16-347:62
     Vec 4 Float -> Mat 4 4 Float
-Prelude.lc 347:16-347:75
+347:16-347:75
     Mat 4 4 Float
-Prelude.lc 347:22-347:24
+347:22-347:24
     forall a . a -> a -> a -> a -> VecS a 4
-Prelude.lc 347:22-347:26
+347:22-347:26
     VecScalar _c Float
       -> VecScalar _c Float -> VecScalar _c Float -> VecS (VecScalar _c Float) 4
-Prelude.lc 347:22-347:28
+347:22-347:28
     VecScalar _d Float -> VecScalar _d Float -> VecS (VecScalar _d Float) 4
-Prelude.lc 347:22-347:33
+347:22-347:33
     VecScalar _f Float -> VecS (VecScalar _f Float) 4
-Prelude.lc 347:22-347:35
+347:22-347:35
     VecS (VecScalar 1 Float) 4
-Prelude.lc 347:25-347:26
+347:25-347:26
     VecScalar _d Float
-Prelude.lc 347:27-347:28
+347:27-347:28
     _b
-Prelude.lc 347:30-347:31
+347:30-347:31
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 347:30-347:32
+347:30-347:32
     VecScalar _f Float
-Prelude.lc 347:31-347:32
+347:31-347:32
     VecScalar _f Float
-Prelude.lc 347:34-347:35
+347:34-347:35
     _b
-Prelude.lc 347:38-347:40
+347:38-347:40
     forall a . a -> a -> a -> a -> VecS a 4
-Prelude.lc 347:38-347:42
+347:38-347:42
     _b -> _b -> _b -> VecS _b 4
-Prelude.lc 347:38-347:44
+347:38-347:44
     _c -> _c -> VecS _c 4
-Prelude.lc 347:38-347:46
+347:38-347:46
     _c -> VecS _c 4
-Prelude.lc 347:38-347:48
+347:38-347:48
     VecS Float 4
-Prelude.lc 347:41-347:42
+347:41-347:42
     _b
-Prelude.lc 347:43-347:44
+347:43-347:44
     _b
-Prelude.lc 347:45-347:46
+347:45-347:46
     _b
-Prelude.lc 347:47-347:48
+347:47-347:48
     _b
-Prelude.lc 347:51-347:53
+347:51-347:53
     forall a . a -> a -> a -> a -> VecS a 4
-Prelude.lc 347:51-347:55
+347:51-347:55
     Float -> Float -> Float -> VecS Float 4
-Prelude.lc 347:51-347:57
+347:51-347:57
     Float -> Float -> VecS Float 4
-Prelude.lc 347:51-347:59
+347:51-347:59
     Float -> VecS Float 4
-Prelude.lc 347:51-347:61
+347:51-347:61
     VecS Float 4
-Prelude.lc 347:54-347:55
+347:54-347:55
     VecScalar 1 Float
-Prelude.lc 347:56-347:57
+347:56-347:57
     _b
-Prelude.lc 347:58-347:59
+347:58-347:59
     VecScalar 1 Float
-Prelude.lc 347:60-347:61
+347:60-347:61
     _b
-Prelude.lc 347:64-347:66
+347:64-347:66
     forall a . a -> a -> a -> a -> VecS a 4
-Prelude.lc 347:64-347:68
+347:64-347:68
     _b -> _b -> _b -> VecS _b 4
-Prelude.lc 347:64-347:70
+347:64-347:70
     _c -> _c -> VecS _c 4
-Prelude.lc 347:64-347:72
+347:64-347:72
     _c -> VecS _c 4
-Prelude.lc 347:64-347:74
+347:64-347:74
     VecS Float 4
-Prelude.lc 347:67-347:68
+347:67-347:68
     _b
-Prelude.lc 347:69-347:70
+347:69-347:70
     _b
-Prelude.lc 347:71-347:72
+347:71-347:72
     _b
-Prelude.lc 347:73-347:74
+347:73-347:74
     _b
-Prelude.lc 349:9-349:12
+349:9-349:12
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 349:9-349:14
+349:9-349:14
     VecScalar _a Float
-Prelude.lc 349:13-349:14
+349:13-349:14
     _c
-Prelude.lc 350:9-350:12
+350:9-350:12
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 350:9-350:14
+350:9-350:14
     VecScalar _b Float
-Prelude.lc 350:13-350:14
+350:13-350:14
     VecScalar _c Float
-Prelude.lc 352:1-352:11
+352:1-352:11
     VecScalar 1 Float -> Mat 4 4 Float
-Prelude.lc 352:16-352:20
+352:16-352:20
     Vec 4 Float -> Vec 4 Float -> Vec 4 Float -> Vec 4 Float -> Mat 4 4 Float
-Prelude.lc 352:16-352:33
+352:16-352:33
     Vec 4 Float -> Vec 4 Float -> Vec 4 Float -> Mat 4 4 Float
-Prelude.lc 352:16-352:46
+352:16-352:46
     Vec 4 Float -> Vec 4 Float -> Mat 4 4 Float
-Prelude.lc 352:16-352:62
+352:16-352:62
     Vec 4 Float -> Mat 4 4 Float
-Prelude.lc 352:16-352:75
+352:16-352:75
     Mat 4 4 Float
-Prelude.lc 352:22-352:24
+352:22-352:24
     forall a . a -> a -> a -> a -> VecS a 4
-Prelude.lc 352:22-352:26
+352:22-352:26
     _b -> _b -> _b -> VecS _b 4
-Prelude.lc 352:22-352:28
+352:22-352:28
     _c -> _c -> VecS _c 4
-Prelude.lc 352:22-352:30
+352:22-352:30
     _c -> VecS _c 4
-Prelude.lc 352:22-352:32
+352:22-352:32
     VecS Float 4
-Prelude.lc 352:25-352:26
+352:25-352:26
     _b
-Prelude.lc 352:27-352:28
+352:27-352:28
     _b
-Prelude.lc 352:29-352:30
+352:29-352:30
     _b
-Prelude.lc 352:31-352:32
+352:31-352:32
     _b
-Prelude.lc 352:35-352:37
+352:35-352:37
     forall a . a -> a -> a -> a -> VecS a 4
-Prelude.lc 352:35-352:39
+352:35-352:39
     _b -> _b -> _b -> VecS _b 4
-Prelude.lc 352:35-352:41
+352:35-352:41
     VecScalar _d Float -> VecScalar _d Float -> VecS (VecScalar _d Float) 4
-Prelude.lc 352:35-352:43
+352:35-352:43
     VecScalar _d Float -> VecS (VecScalar _d Float) 4
-Prelude.lc 352:35-352:45
+352:35-352:45
     VecS (VecScalar 1 Float) 4
-Prelude.lc 352:38-352:39
+352:38-352:39
     _b
-Prelude.lc 352:40-352:41
+352:40-352:41
     VecScalar _e Float
-Prelude.lc 352:42-352:43
+352:42-352:43
     VecScalar _d Float
-Prelude.lc 352:44-352:45
+352:44-352:45
     _b
-Prelude.lc 352:48-352:50
+352:48-352:50
     forall a . a -> a -> a -> a -> VecS a 4
-Prelude.lc 352:48-352:52
+352:48-352:52
     _b -> _b -> _b -> VecS _b 4
-Prelude.lc 352:48-352:57
+352:48-352:57
     Float -> Float -> VecS Float 4
-Prelude.lc 352:48-352:59
+352:48-352:59
     Float -> VecS Float 4
-Prelude.lc 352:48-352:61
+352:48-352:61
     VecS Float 4
-Prelude.lc 352:51-352:52
+352:51-352:52
     _b
-Prelude.lc 352:54-352:55
+352:54-352:55
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 352:54-352:56
+352:54-352:56
     Float
-Prelude.lc 352:55-352:56
+352:55-352:56
     VecScalar 1 Float
-Prelude.lc 352:58-352:59
+352:58-352:59
     VecScalar 1 Float
-Prelude.lc 352:60-352:61
+352:60-352:61
     _b
-Prelude.lc 352:64-352:66
+352:64-352:66
     forall a . a -> a -> a -> a -> VecS a 4
-Prelude.lc 352:64-352:68
+352:64-352:68
     _b -> _b -> _b -> VecS _b 4
-Prelude.lc 352:64-352:70
+352:64-352:70
     _c -> _c -> VecS _c 4
-Prelude.lc 352:64-352:72
+352:64-352:72
     _c -> VecS _c 4
-Prelude.lc 352:64-352:74
+352:64-352:74
     VecS Float 4
-Prelude.lc 352:67-352:68
+352:67-352:68
     _b
-Prelude.lc 352:69-352:70
+352:69-352:70
     _b
-Prelude.lc 352:71-352:72
+352:71-352:72
     _b
-Prelude.lc 352:73-352:74
+352:73-352:74
     _b
-Prelude.lc 354:9-354:12
+354:9-354:12
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 354:9-354:14
+354:9-354:14
     VecScalar _a Float
-Prelude.lc 354:13-354:14
+354:13-354:14
     _c
-Prelude.lc 355:9-355:12
+355:9-355:12
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 355:9-355:14
+355:9-355:14
     VecScalar _b Float
-Prelude.lc 355:13-355:14
+355:13-355:14
     VecScalar _c Float
-Prelude.lc 357:1-357:14
+357:1-357:14
     Float -> Float -> Float -> Mat 4 4 Float
-Prelude.lc 357:23-357:33
+357:23-357:33
     VecScalar 1 Float -> Mat 4 4 Float
-Prelude.lc 357:23-357:35
+357:23-357:35
     Mat 4 4 Float
-Prelude.lc 357:23-357:39
+357:23-357:39
     Mat 4 _a Float -> Mat 4 _a Float
-Prelude.lc 357:23-357:52
+357:23-357:52
     Mat 4 4 Float
-Prelude.lc 357:23-357:56
+357:23-357:56
     Mat 4 _a Float -> Mat 4 _a Float
-Prelude.lc 357:23-357:69
+357:23-357:69
     Mat 4 4 Float
-Prelude.lc 357:34-357:35
+357:34-357:35
     _k
-Prelude.lc 357:36-357:39
+357:36-357:39
     forall (a :: Nat) (b :: Nat) c (d :: Nat) . Mat a b c -> Mat b d c -> Mat a d c
-Prelude.lc 357:40-357:50
+357:40-357:50
     VecScalar 1 Float -> Mat 4 4 Float
-Prelude.lc 357:40-357:52
+357:40-357:52
     Mat 4 4 Float
-Prelude.lc 357:51-357:52
+357:51-357:52
     _e
-Prelude.lc 357:53-357:56
+357:53-357:56
     forall (a :: Nat) (b :: Nat) c (d :: Nat) . Mat a b c -> Mat b d c -> Mat a d c
-Prelude.lc 357:57-357:67
+357:57-357:67
     VecScalar 1 Float -> Mat 4 4 Float
-Prelude.lc 357:57-357:69
+357:57-357:69
     Mat 4 4 Float
-Prelude.lc 357:68-357:69
+357:68-357:69
     _b
-Prelude.lc 359:21-359:24
+359:21-359:24
     Nat -> Type -> Type
-Prelude.lc 359:21-359:26
+359:21-359:26
     Type -> Type
-Prelude.lc 359:21-359:32
+359:21-359:32
     Type
-Prelude.lc 359:25-359:26
+359:25-359:26
     _b
-Prelude.lc 359:27-359:32
+359:27-359:32
     Type
-Prelude.lc 359:36-359:39
+359:36-359:39
     Nat -> Nat -> Type -> Type
-Prelude.lc 359:36-359:41
+359:36-359:41
     Nat -> Type -> Type
-Prelude.lc 359:36-359:43
+359:36-359:43
     Type -> Type
-Prelude.lc 359:36-359:49
+359:36-359:49
     Type | Type
-Prelude.lc 359:40-359:41
+359:40-359:41
     _b
-Prelude.lc 359:42-359:43
+359:42-359:43
     _b
-Prelude.lc 359:44-359:49
+359:44-359:49
     Type
-Prelude.lc 360:1-360:17
+360:1-360:17
     Vec 3 Float -> Mat 4 4 Float
-Prelude.lc 360:22-360:26
+360:22-360:26
     Vec 4 Float -> Vec 4 Float -> Vec 4 Float -> Vec 4 Float -> Mat 4 4 Float
-Prelude.lc 360:22-360:29
+360:22-360:29
     Vec 4 Float -> Vec 4 Float -> Vec 4 Float -> Mat 4 4 Float
-Prelude.lc 360:22-360:32
+360:22-360:32
     Vec 4 Float -> Vec 4 Float -> Mat 4 4 Float
-Prelude.lc 360:22-360:35
+360:22-360:35
     Vec 4 Float -> Mat 4 4 Float
-Prelude.lc 360:22-360:38
+360:22-360:38
     Mat 4 4 Float
-Prelude.lc 360:27-360:29
+360:27-360:29
     forall a . Num a => VecS a 4
-Prelude.lc 360:30-360:32
+360:30-360:32
     forall a . Num a => VecS a 4
-Prelude.lc 360:33-360:35
+360:33-360:35
     forall a . Num a => VecS a 4
-Prelude.lc 360:36-360:38
+360:36-360:38
     VecS Float 4
-Prelude.lc 362:9-362:11
+362:9-362:11
     forall a . a -> a -> a -> a -> VecS a 4
-Prelude.lc 362:9-362:13
+362:9-362:13
     _b -> _b -> _b -> VecS _b 4
-Prelude.lc 362:9-362:15
+362:9-362:15
     _c -> _c -> VecS _c 4
-Prelude.lc 362:9-362:17
+362:9-362:17
     _c -> VecS _c 4
-Prelude.lc 362:9-362:19
+362:9-362:19
     VecS _c 4
-Prelude.lc 362:12-362:13
+362:12-362:13
     _b
-Prelude.lc 362:14-362:15
+362:14-362:15
     _b
-Prelude.lc 362:16-362:17
+362:16-362:17
     _b
-Prelude.lc 362:18-362:19
+362:18-362:19
     _b
-Prelude.lc 363:9-363:11
+363:9-363:11
     forall a . a -> a -> a -> a -> VecS a 4
-Prelude.lc 363:9-363:13
+363:9-363:13
     _b -> _b -> _b -> VecS _b 4
-Prelude.lc 363:9-363:15
+363:9-363:15
     _c -> _c -> VecS _c 4
-Prelude.lc 363:9-363:17
+363:9-363:17
     _c -> VecS _c 4
-Prelude.lc 363:9-363:19
+363:9-363:19
     VecS _c 4
-Prelude.lc 363:12-363:13
+363:12-363:13
     _b
-Prelude.lc 363:14-363:15
+363:14-363:15
     _b
-Prelude.lc 363:16-363:17
+363:16-363:17
     _b
-Prelude.lc 363:18-363:19
+363:18-363:19
     _b
-Prelude.lc 364:9-364:11
+364:9-364:11
     forall a . a -> a -> a -> a -> VecS a 4
-Prelude.lc 364:9-364:13
+364:9-364:13
     _b -> _b -> _b -> VecS _b 4
-Prelude.lc 364:9-364:15
+364:9-364:15
     _c -> _c -> VecS _c 4
-Prelude.lc 364:9-364:17
+364:9-364:17
     _c -> VecS _c 4
-Prelude.lc 364:9-364:19
+364:9-364:19
     VecS _c 4
-Prelude.lc 364:12-364:13
+364:12-364:13
     _b
-Prelude.lc 364:14-364:15
+364:14-364:15
     _b
-Prelude.lc 364:16-364:17
+364:16-364:17
     _b
-Prelude.lc 364:18-364:19
+364:18-364:19
     _b
-Prelude.lc 365:9-365:11
+365:9-365:11
     forall a . a -> a -> a -> a -> VecS a 4
-Prelude.lc 365:9-365:15
+365:9-365:15
     Float -> Float -> Float -> VecS Float 4
-Prelude.lc 365:9-365:19
+365:9-365:19
     Float -> Float -> VecS Float 4
-Prelude.lc 365:9-365:23
+365:9-365:23
     Float -> VecS Float 4
-Prelude.lc 365:9-365:25
+365:9-365:25
     VecS Float 4
-Prelude.lc 365:12-365:13
+365:12-365:13
     Vec 3 Float
-Prelude.lc 365:12-365:15
+365:12-365:15
     Float
-Prelude.lc 365:16-365:17
+365:16-365:17
     Vec 3 Float
-Prelude.lc 365:16-365:19
+365:16-365:19
     Float
-Prelude.lc 365:20-365:21
+365:20-365:21
     Vec 3 Float
-Prelude.lc 365:20-365:23
+365:20-365:23
     Float
-Prelude.lc 365:24-365:25
+365:24-365:25
     _b
-Prelude.lc 368:11-368:14
+368:11-368:14
     Nat -> Type -> Type
-Prelude.lc 368:11-368:16
+368:11-368:16
     Type -> Type
-Prelude.lc 368:11-368:22
+368:11-368:22
     Type
-Prelude.lc 368:15-368:16
+368:15-368:16
     _b
-Prelude.lc 368:17-368:22
+368:17-368:22
     Type
-Prelude.lc 369:11-369:14
+369:11-369:14
     Nat -> Type -> Type
-Prelude.lc 369:11-369:16
+369:11-369:16
     Type -> Type
-Prelude.lc 369:11-369:22
+369:11-369:22
     Type
-Prelude.lc 369:11-371:24
+369:11-371:24
     Type
-Prelude.lc 369:15-369:16
+369:15-369:16
     _b
-Prelude.lc 369:17-369:22
+369:17-369:22
     Type
-Prelude.lc 370:11-370:14
+370:11-370:14
     Nat -> Type -> Type
-Prelude.lc 370:11-370:16
+370:11-370:16
     Type -> Type
-Prelude.lc 370:11-370:22
+370:11-370:22
     Type
-Prelude.lc 370:11-371:24
+370:11-371:24
     Type
-Prelude.lc 370:15-370:16
+370:15-370:16
     _b
-Prelude.lc 370:17-370:22
+370:17-370:22
     Type
-Prelude.lc 371:11-371:14
+371:11-371:14
     Nat -> Nat -> Type -> Type
-Prelude.lc 371:11-371:16
+371:11-371:16
     Nat -> Type -> Type
-Prelude.lc 371:11-371:18
+371:11-371:18
     Type -> Type
-Prelude.lc 371:11-371:24
+371:11-371:24
     Type | Type
-Prelude.lc 371:15-371:16
+371:15-371:16
     _b
-Prelude.lc 371:17-371:18
+371:17-371:18
     _b
-Prelude.lc 371:19-371:24
+371:19-371:24
     Type
-Prelude.lc 372:1-372:7
+372:1-372:7
     Vec 3 Float -> Vec 3 Float -> Vec 3 Float -> Mat 4 4 Float
-Prelude.lc 372:24-372:25
+372:24-372:25
     Mat 4 4 Float
-Prelude.lc 372:24-372:29
+372:24-372:29
     Mat 4 _a Float -> Mat 4 _a Float
-Prelude.lc 372:24-372:56
+372:24-372:56
     Mat 4 4 Float
-Prelude.lc 372:26-372:29
+372:26-372:29
     forall (a :: Nat) (b :: Nat) c (d :: Nat) . Mat a b c -> Mat b d c -> Mat a d c
-Prelude.lc 372:30-372:46
+372:30-372:46
     Vec 3 Float -> Mat 4 4 Float
-Prelude.lc 372:30-372:56
+372:30-372:56
     Mat 4 4 Float
-Prelude.lc 372:48-372:51
+372:48-372:51
     forall a . Signed (MatVecScalarElem a) => a -> a
-Prelude.lc 372:48-372:55
+372:48-372:55
     VecS Float 3
-Prelude.lc 372:52-372:55
+372:52-372:55
     Vec 3 Float
-Prelude.lc 374:14-374:16
+374:14-374:16
     forall a . a -> a -> a -> a -> VecS a 4
-Prelude.lc 374:14-374:20
+374:14-374:20
     _b -> _b -> _b -> VecS _b 4
-Prelude.lc 374:14-374:24
+374:14-374:24
     _b -> _b -> VecS _b 4
-Prelude.lc 374:14-374:28
+374:14-374:28
     _b -> VecS _b 4
-Prelude.lc 374:14-374:30
+374:14-374:30
     VecS _c 4
-Prelude.lc 374:17-374:18
+374:17-374:18
     _e
-Prelude.lc 374:17-374:20
+374:17-374:20
     _b
-Prelude.lc 374:21-374:22
+374:21-374:22
     VecS _d _c
-Prelude.lc 374:21-374:24
+374:21-374:24
     _b
-Prelude.lc 374:25-374:26
+374:25-374:26
     VecS _d _c
-Prelude.lc 374:25-374:28
+374:25-374:28
     _b
-Prelude.lc 374:29-374:30
+374:29-374:30
     _b
-Prelude.lc 375:9-375:18
+375:9-375:18
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 375:9-375:20
+375:9-375:20
     VecScalar _a Float -> VecScalar _a Float
-Prelude.lc 375:9-375:33
+375:9-375:33
     VecScalar 3 Float
-Prelude.lc 375:19-375:20
+375:19-375:20
     forall a b . (a -> b) -> a -> b
-Prelude.lc 375:21-375:24
+375:21-375:24
     Vec 3 Float
-Prelude.lc 375:21-375:26
+375:21-375:26
     VecS Float 3 -> VecS Float 3
-Prelude.lc 375:21-375:33
+375:21-375:33
     VecS Float 3
-Prelude.lc 375:25-375:26
+375:25-375:26
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 375:27-375:33
+375:27-375:33
     Vec 3 Float
-Prelude.lc 376:9-376:18
+376:9-376:18
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-Prelude.lc 376:9-376:20
+376:9-376:20
     VecScalar _a Float -> VecScalar _a Float
-Prelude.lc 376:9-376:33
+376:9-376:33
     VecScalar 3 Float
-Prelude.lc 376:19-376:20
+376:19-376:20
     forall a b . (a -> b) -> a -> b
-Prelude.lc 376:21-376:23
+376:21-376:23
     Vec 3 Float
-Prelude.lc 376:21-376:31
+376:21-376:31
     VecS Float 3 -> VecS Float 3
-Prelude.lc 376:21-376:33
+376:21-376:33
     VecS Float 3
-Prelude.lc 376:24-376:31
+376:24-376:31
     forall a . (a ~ VecS Float 3) => a -> a -> a
-Prelude.lc 376:32-376:33
+376:32-376:33
     VecScalar 3 Float
-Prelude.lc 377:9-377:10
+377:9-377:10
     VecScalar 3 Float
-Prelude.lc 377:9-377:18
+377:9-377:18
     VecS Float 3 -> VecS Float 3
-Prelude.lc 377:9-377:20
+377:9-377:20
     VecS Float 3
-Prelude.lc 377:11-377:18
+377:11-377:18
     forall a . (a ~ VecS Float 3) => a -> a -> a
-Prelude.lc 377:19-377:20
+377:19-377:20
     VecScalar 3 Float
-Prelude.lc 378:9-378:18
+378:9-378:18
     forall (a :: Nat) (b :: Nat) c . Mat a b c -> Mat b a c
-Prelude.lc 378:9-378:20
+378:9-378:20
     Mat _c _b _a -> Mat _b _c _a
-Prelude.lc 378:9-378:65
+378:9-378:65
     Mat 4 4 Float
-Prelude.lc 378:19-378:20
+378:19-378:20
     forall a b . (a -> b) -> a -> b
-Prelude.lc 378:21-378:25
+378:21-378:25
     Vec 4 Float -> Vec 4 Float -> Vec 4 Float -> Vec 4 Float -> Mat 4 4 Float
-Prelude.lc 378:21-378:34
+378:21-378:34
     Vec 4 Float -> Vec 4 Float -> Vec 4 Float -> Mat 4 4 Float
-Prelude.lc 378:21-378:43
+378:21-378:43
     Vec 4 Float -> Vec 4 Float -> Mat 4 4 Float
-Prelude.lc 378:21-378:52
+378:21-378:52
     Vec 4 Float -> Mat 4 4 Float
-Prelude.lc 378:21-378:65
+378:21-378:65
     Mat 4 4 Float
-Prelude.lc 378:27-378:31
+378:27-378:31
     forall a (b :: Nat) . Num a => VecS a b -> VecS a 4
-Prelude.lc 378:27-378:33
+378:27-378:33
     VecS Float 4
-Prelude.lc 378:32-378:33
+378:32-378:33
     VecScalar 3 Float
-Prelude.lc 378:36-378:40
+378:36-378:40
     forall a (b :: Nat) . Num a => VecS a b -> VecS a 4
-Prelude.lc 378:36-378:42
+378:36-378:42
     VecS Float 4
-Prelude.lc 378:41-378:42
+378:41-378:42
     VecS Float 3
-Prelude.lc 378:45-378:49
+378:45-378:49
     forall a (b :: Nat) . Num a => VecS a b -> VecS a 4
-Prelude.lc 378:45-378:51
+378:45-378:51
     VecS Float 4
-Prelude.lc 378:50-378:51
+378:50-378:51
     VecScalar 3 Float
-Prelude.lc 378:54-378:56
+378:54-378:56
     forall a . a -> a -> a -> a -> VecS a 4
-Prelude.lc 378:54-378:58
+378:54-378:58
     _b -> _b -> _b -> VecS _b 4
-Prelude.lc 378:54-378:60
+378:54-378:60
     _c -> _c -> VecS _c 4
-Prelude.lc 378:54-378:62
+378:54-378:62
     _c -> VecS _c 4
-Prelude.lc 378:54-378:64
+378:54-378:64
     VecS Float 4
-Prelude.lc 378:57-378:58
+378:57-378:58
     _b
-Prelude.lc 378:59-378:60
+378:59-378:60
     _b
-Prelude.lc 378:61-378:62
+378:61-378:62
     _b
-Prelude.lc 378:63-378:64
+378:63-378:64
     _b
-Prelude.lc 380:1-380:6
+380:1-380:6
     Float -> VecS Float 4 -> VecS Float 4
-Prelude.lc 380:13-380:14
+380:13-380:14
     _d
-Prelude.lc 380:13-380:16
+380:13-380:16
     _c -> _c
-Prelude.lc 380:13-380:29
+380:13-380:29
     VecS Float 4
-Prelude.lc 380:15-380:16
+380:15-380:16
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 380:17-380:19
+380:17-380:19
     forall a . a -> a -> a -> a -> VecS a 4
-Prelude.lc 380:17-380:21
+380:17-380:21
     _e -> _e -> _e -> VecS _e 4
-Prelude.lc 380:17-380:23
+380:17-380:23
     _e -> _e -> VecS _e 4
-Prelude.lc 380:17-380:25
+380:17-380:25
     _e -> VecS _e 4
-Prelude.lc 380:17-380:29
+380:17-380:29
     VecS Float 4
-Prelude.lc 380:20-380:21
+380:20-380:21
     _f
-Prelude.lc 380:22-380:23
+380:22-380:23
     _e
-Prelude.lc 380:24-380:25
+380:24-380:25
     _e
-Prelude.lc 380:26-380:29
+380:26-380:29
     Float
-Prelude.lc 382:11-382:16
+382:11-382:16
     Type
-Prelude.lc 382:20-382:25
+382:20-382:25
     Type
-Prelude.lc 382:20-382:36
+382:20-382:36
     Type
-Prelude.lc 382:29-382:36
+382:29-382:36
     Type | Type
-Prelude.lc 382:30-382:35
+382:30-382:35
     Type
-Prelude.lc 383:1-383:7
+383:1-383:7
     Float -> Float -> [Float]
-Prelude.lc 384:7-384:8
+384:7-384:8
     Float
-Prelude.lc 384:7-384:10
+384:7-384:10
     VecScalar 1 Float -> VecScalar 1 Bool
-Prelude.lc 384:7-384:12
+384:7-384:12
     VecScalar 1 Bool
-Prelude.lc 384:7-385:38
+384:7-385:38
     [Float]
-Prelude.lc 384:9-384:10
+384:9-384:10
     forall (a :: Nat) b
       . Num b => VecScalar a b -> VecScalar a b -> VecScalar a Bool
-Prelude.lc 384:11-384:12
+384:11-384:12
     Float
-Prelude.lc 384:15-384:17
+384:15-384:17
     forall a . [a]
-Prelude.lc 384:15-385:38
+384:15-385:38
     Bool -> [Float]
-Prelude.lc 385:19-385:20
+385:19-385:20
     Float
-Prelude.lc 385:19-385:21
+385:19-385:21
     [Float] -> [Float]
-Prelude.lc 385:19-385:38
+385:19-385:38
     [Float]
-Prelude.lc 385:20-385:21
+385:20-385:21
     forall a . a -> [a] -> [a]
-Prelude.lc 385:22-385:28
+385:22-385:28
     Float -> Float -> [Float]
-Prelude.lc 385:22-385:36
+385:22-385:36
     Float -> [Float]
-Prelude.lc 385:22-385:38
+385:22-385:38
     [Float]
-Prelude.lc 385:30-385:31
+385:30-385:31
     Float
-Prelude.lc 385:30-385:33
+385:30-385:33
     Float -> Float
-Prelude.lc 385:30-385:35
+385:30-385:35
     Float
-Prelude.lc 385:32-385:33
+385:32-385:33
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 385:34-385:35
+385:34-385:35
     _b
-Prelude.lc 385:37-385:38
+385:37-385:38
     Float
-Prelude.lc 387:9-387:12
+387:9-387:12
     Type
-Prelude.lc 387:9-387:24
+387:9-387:24
     Type
-Prelude.lc 387:10-387:11
+387:10-387:11
     _b
-Prelude.lc 387:16-387:19
+387:16-387:19
     Type
-Prelude.lc 387:16-387:24
+387:16-387:24
     Type
-Prelude.lc 387:23-387:24
+387:23-387:24
     Type | Type
-Prelude.lc 388:10-388:12
+388:10-388:12
     forall a . [a] -> Int -> a
-Prelude.lc 388:19-388:20
+388:19-388:20
     _d
-Prelude.lc 388:19-389:30
+388:19-389:30
     Bool -> _d | _c | _c
-Prelude.lc 389:19-389:21
+389:19-389:21
     [_f]
-Prelude.lc 389:19-389:24
+389:19-389:24
     Int -> _e
-Prelude.lc 389:19-389:30
+389:19-389:30
     _d
-Prelude.lc 389:22-389:24
+389:22-389:24
     forall a . [a] -> Int -> a
-Prelude.lc 389:26-389:27
+389:26-389:27
     Int
-Prelude.lc 389:26-389:28
+389:26-389:28
     Int -> Int
-Prelude.lc 389:26-389:29
+389:26-389:29
     Int
-Prelude.lc 389:27-389:28
+389:27-389:28
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-Prelude.lc 389:28-389:29
+389:28-389:29
     _b
 ------------ warnings
-Uncovered pattern(s) at Prelude.lc:50:1:
+Uncovered pattern(s) at ./testdata/Prelude.lc:50:1:
 tail (_: xs) = xs
 ^^^^
 Missing case(s):
     tail []
-Uncovered pattern(s) at Prelude.lc:58:1:
+Uncovered pattern(s) at ./testdata/Prelude.lc:58:1:
 foldr1 f (x: xs) = foldr f x xs
 ^^^^^^
 Missing case(s):
     foldr1 _ []
-Uncovered pattern(s) at Prelude.lc:137:1:
+Uncovered pattern(s) at ./testdata/Prelude.lc:137:1:
 project @a @('RecItem s' a': xs) s @_ (RecordCons ts) | s == s' = fstTup (unsafeCoerce @_ @(HList '(a : map recItemType xs)) ts)
 project @a @('RecItem s' a': xs) s @_ (RecordCons ts) = project @a @xs s @(undefined @(CW (isKeyC s a xs))) (RecordCons (sndTup (unsafeCoerce @_ @(HList '(a : map recItemType xs)) ts)))
 Missing case(s):
     project _ [] _ _ _
-Uncovered pattern(s) at Prelude.lc:388:10:
+Uncovered pattern(s) at ./testdata/Prelude.lc:388:10:
 (x : _)  !! 0  =  x
 (_ : xs) !! n  =  xs !! (n-1)
 Missing case(s):
diff --git a/testdata/SampleMaterial.out b/testdata/SampleMaterial.out
index b1ea58f8..80acedee 100644
--- a/testdata/SampleMaterial.out
+++ b/testdata/SampleMaterial.out
@@ -3757,15 +3757,15 @@ sampleMaterial
         "Tex_3226210144"]
       False)]
 ------------ tooltips
-SampleMaterial.lc 3:1-3:15
+3:1-3:15
     [(String, CommonAttrs)]
-SampleMaterial.lc 4:3-2183:4
+4:3-2183:4
     [(String, CommonAttrs)]
-SampleMaterial.lc 4:5-46:6
+4:5-46:6
     (String, CommonAttrs)
-SampleMaterial.lc 4:7-4:40
+4:7-4:40
     String
-SampleMaterial.lc 5:7-5:18
+5:7-5:18
     ()
       -> ()
         -> Bool
@@ -3773,68 +3773,68 @@ SampleMaterial.lc 5:7-5:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 5:7-6:26
+5:7-6:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 5:7-7:26
+5:7-7:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 5:7-8:27
+5:7-8:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 5:7-9:21
+5:7-9:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 5:7-10:35
+5:7-10:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 5:7-11:28
+5:7-11:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 5:7-12:33
+5:7-12:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 5:7-13:32
+5:7-13:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 5:7-14:30
+5:7-14:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 5:7-15:34
+5:7-15:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 5:7-43:14
+5:7-43:14
     Bool -> CommonAttrs
-SampleMaterial.lc 5:7-45:10
+5:7-45:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 6:24-6:26
+6:24-6:26
     ()
-SampleMaterial.lc 7:24-7:26
+7:24-7:26
     ()
-SampleMaterial.lc 8:22-8:27
+8:22-8:27
     Bool
-SampleMaterial.lc 9:20-9:21
+9:20-9:21
     _b
-SampleMaterial.lc 10:30-10:35
+10:30-10:35
     Bool
-SampleMaterial.lc 11:23-11:28
+11:23-11:28
     Bool
-SampleMaterial.lc 12:20-12:33
+12:20-12:33
     CullType
-SampleMaterial.lc 13:30-13:32
+13:30-13:32
     forall a . [a]
-SampleMaterial.lc 14:25-14:30
+14:25-14:30
     Bool
-SampleMaterial.lc 15:29-15:34
+15:29-15:34
     Bool
-SampleMaterial.lc 17:13-43:14
+17:13-43:14
     [StageAttrs]
-SampleMaterial.lc 17:15-17:25
+17:15-17:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -3842,70 +3842,70 @@ SampleMaterial.lc 17:15-17:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 17:15-18:36
+17:15-18:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 17:15-19:50
+17:15-19:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 17:15-20:42
+17:15-20:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 17:15-21:36
+17:15-21:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 17:15-22:31
+17:15-22:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 17:15-23:71
+17:15-23:71
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 17:15-24:38
+17:15-24:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 17:15-25:41
+17:15-25:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 17:15-26:40
+17:15-26:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 17:15-27:46
+17:15-27:46
     String -> StageAttrs
-SampleMaterial.lc 17:15-29:18
+17:15-29:18
     StageAttrs
-SampleMaterial.lc 18:29-18:36
+18:29-18:36
     forall a . Maybe a
-SampleMaterial.lc 19:30-19:50
+19:30-19:50
     RGBGen
-SampleMaterial.lc 20:32-20:42
+20:32-20:42
     AlphaGen
-SampleMaterial.lc 21:29-21:36
+21:29-21:36
     TCGen
-SampleMaterial.lc 22:29-22:31
+22:29-22:31
     forall a . [a]
-SampleMaterial.lc 23:31-23:37
+23:31-23:37
     String -> StageTexture
-SampleMaterial.lc 23:31-23:71
+23:31-23:71
     StageTexture
-SampleMaterial.lc 23:38-23:71
+23:38-23:71
     String
-SampleMaterial.lc 24:34-24:38
+24:34-24:38
     Bool
-SampleMaterial.lc 25:33-25:41
+25:33-25:41
     DepthFunction
-SampleMaterial.lc 26:33-26:40
+26:33-26:40
     forall a . Maybe a
-SampleMaterial.lc 27:41-27:46
+27:41-27:46
     Bool
-SampleMaterial.lc 28:38-28:54
+28:38-28:54
     String
-SampleMaterial.lc 30:15-30:25
+30:15-30:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -3913,82 +3913,82 @@ SampleMaterial.lc 30:15-30:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 30:15-31:57
+30:15-31:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 30:15-32:50
+30:15-32:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 30:15-33:42
+30:15-33:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 30:15-34:40
+30:15-34:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 30:15-35:31
+30:15-35:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 30:15-36:42
+30:15-36:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 30:15-37:38
+30:15-37:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 30:15-38:41
+30:15-38:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 30:15-39:40
+30:15-39:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 30:15-40:46
+30:15-40:46
     String -> StageAttrs
-SampleMaterial.lc 30:15-42:18
+30:15-42:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 31:29-31:33
+31:29-31:33
     forall a . a -> Maybe a
-SampleMaterial.lc 31:29-31:57
+31:29-31:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 31:34-31:57
+31:34-31:57
     (Blending', Blending')
-SampleMaterial.lc 31:36-31:46
+31:36-31:46
     Blending'
-SampleMaterial.lc 31:49-31:55
+31:49-31:55
     Blending' | ((Blending'))
-SampleMaterial.lc 32:30-32:50
+32:30-32:50
     RGBGen
-SampleMaterial.lc 33:32-33:42
+33:32-33:42
     AlphaGen
-SampleMaterial.lc 34:29-34:40
+34:29-34:40
     TCGen
-SampleMaterial.lc 35:29-35:31
+35:29-35:31
     forall a . [a]
-SampleMaterial.lc 36:31-36:42
+36:31-36:42
     StageTexture
-SampleMaterial.lc 37:34-37:38
+37:34-37:38
     Bool
-SampleMaterial.lc 38:33-38:41
+38:33-38:41
     DepthFunction
-SampleMaterial.lc 39:33-39:40
+39:33-39:40
     forall a . Maybe a
-SampleMaterial.lc 40:41-40:46
+40:41-40:46
     Bool
-SampleMaterial.lc 41:38-41:54
+41:38-41:54
     String
-SampleMaterial.lc 44:21-44:26
+44:21-44:26
     Bool
-SampleMaterial.lc 47:5-89:6
+47:5-89:6
     (String, CommonAttrs)
-SampleMaterial.lc 47:5-2182:6
+47:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 47:7-47:39
+47:7-47:39
     String
-SampleMaterial.lc 48:7-48:18
+48:7-48:18
     ()
       -> ()
         -> Bool
@@ -3996,68 +3996,68 @@ SampleMaterial.lc 48:7-48:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 48:7-49:26
+48:7-49:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 48:7-50:26
+48:7-50:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 48:7-51:27
+48:7-51:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 48:7-52:21
+48:7-52:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 48:7-53:35
+48:7-53:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 48:7-54:28
+48:7-54:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 48:7-55:33
+48:7-55:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 48:7-56:32
+48:7-56:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 48:7-57:30
+48:7-57:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 48:7-58:34
+48:7-58:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 48:7-86:14
+48:7-86:14
     Bool -> CommonAttrs
-SampleMaterial.lc 48:7-88:10
+48:7-88:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 49:24-49:26
+49:24-49:26
     ()
-SampleMaterial.lc 50:24-50:26
+50:24-50:26
     ()
-SampleMaterial.lc 51:22-51:27
+51:22-51:27
     Bool
-SampleMaterial.lc 52:20-52:21
+52:20-52:21
     _b
-SampleMaterial.lc 53:30-53:35
+53:30-53:35
     Bool
-SampleMaterial.lc 54:23-54:28
+54:23-54:28
     Bool
-SampleMaterial.lc 55:20-55:33
+55:20-55:33
     CullType
-SampleMaterial.lc 56:30-56:32
+56:30-56:32
     forall a . [a]
-SampleMaterial.lc 57:25-57:30
+57:25-57:30
     Bool
-SampleMaterial.lc 58:29-58:34
+58:29-58:34
     Bool
-SampleMaterial.lc 60:13-86:14
+60:13-86:14
     [StageAttrs]
-SampleMaterial.lc 60:15-60:25
+60:15-60:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -4065,70 +4065,70 @@ SampleMaterial.lc 60:15-60:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 60:15-61:36
+60:15-61:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 60:15-62:50
+60:15-62:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 60:15-63:42
+60:15-63:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 60:15-64:36
+60:15-64:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 60:15-65:31
+60:15-65:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 60:15-66:70
+60:15-66:70
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 60:15-67:38
+60:15-67:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 60:15-68:41
+60:15-68:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 60:15-69:40
+60:15-69:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 60:15-70:46
+60:15-70:46
     String -> StageAttrs
-SampleMaterial.lc 60:15-72:18
+60:15-72:18
     StageAttrs
-SampleMaterial.lc 61:29-61:36
+61:29-61:36
     forall a . Maybe a
-SampleMaterial.lc 62:30-62:50
+62:30-62:50
     RGBGen
-SampleMaterial.lc 63:32-63:42
+63:32-63:42
     AlphaGen
-SampleMaterial.lc 64:29-64:36
+64:29-64:36
     TCGen
-SampleMaterial.lc 65:29-65:31
+65:29-65:31
     forall a . [a]
-SampleMaterial.lc 66:31-66:37
+66:31-66:37
     String -> StageTexture
-SampleMaterial.lc 66:31-66:70
+66:31-66:70
     StageTexture
-SampleMaterial.lc 66:38-66:70
+66:38-66:70
     String
-SampleMaterial.lc 67:34-67:38
+67:34-67:38
     Bool
-SampleMaterial.lc 68:33-68:41
+68:33-68:41
     DepthFunction
-SampleMaterial.lc 69:33-69:40
+69:33-69:40
     forall a . Maybe a
-SampleMaterial.lc 70:41-70:46
+70:41-70:46
     Bool
-SampleMaterial.lc 71:38-71:54
+71:38-71:54
     String
-SampleMaterial.lc 73:15-73:25
+73:15-73:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -4136,82 +4136,82 @@ SampleMaterial.lc 73:15-73:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 73:15-74:57
+73:15-74:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 73:15-75:50
+73:15-75:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 73:15-76:42
+73:15-76:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 73:15-77:40
+73:15-77:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 73:15-78:31
+73:15-78:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 73:15-79:42
+73:15-79:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 73:15-80:38
+73:15-80:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 73:15-81:41
+73:15-81:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 73:15-82:40
+73:15-82:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 73:15-83:46
+73:15-83:46
     String -> StageAttrs
-SampleMaterial.lc 73:15-85:18
+73:15-85:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 74:29-74:33
+74:29-74:33
     forall a . a -> Maybe a
-SampleMaterial.lc 74:29-74:57
+74:29-74:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 74:34-74:57
+74:34-74:57
     (Blending', Blending')
-SampleMaterial.lc 74:36-74:46
+74:36-74:46
     Blending'
-SampleMaterial.lc 74:49-74:55
+74:49-74:55
     Blending' | ((Blending'))
-SampleMaterial.lc 75:30-75:50
+75:30-75:50
     RGBGen
-SampleMaterial.lc 76:32-76:42
+76:32-76:42
     AlphaGen
-SampleMaterial.lc 77:29-77:40
+77:29-77:40
     TCGen
-SampleMaterial.lc 78:29-78:31
+78:29-78:31
     forall a . [a]
-SampleMaterial.lc 79:31-79:42
+79:31-79:42
     StageTexture
-SampleMaterial.lc 80:34-80:38
+80:34-80:38
     Bool
-SampleMaterial.lc 81:33-81:41
+81:33-81:41
     DepthFunction
-SampleMaterial.lc 82:33-82:40
+82:33-82:40
     forall a . Maybe a
-SampleMaterial.lc 83:41-83:46
+83:41-83:46
     Bool
-SampleMaterial.lc 84:38-84:54
+84:38-84:54
     String
-SampleMaterial.lc 87:21-87:26
+87:21-87:26
     Bool
-SampleMaterial.lc 90:5-132:6
+90:5-132:6
     (String, CommonAttrs)
-SampleMaterial.lc 90:5-2182:6
+90:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 90:7-90:40
+90:7-90:40
     String
-SampleMaterial.lc 91:7-91:18
+91:7-91:18
     ()
       -> ()
         -> Bool
@@ -4219,68 +4219,68 @@ SampleMaterial.lc 91:7-91:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 91:7-92:26
+91:7-92:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 91:7-93:26
+91:7-93:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 91:7-94:27
+91:7-94:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 91:7-95:21
+91:7-95:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 91:7-96:35
+91:7-96:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 91:7-97:28
+91:7-97:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 91:7-98:33
+91:7-98:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 91:7-99:32
+91:7-99:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 91:7-100:30
+91:7-100:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 91:7-101:34
+91:7-101:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 91:7-129:14
+91:7-129:14
     Bool -> CommonAttrs
-SampleMaterial.lc 91:7-131:10
+91:7-131:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 92:24-92:26
+92:24-92:26
     ()
-SampleMaterial.lc 93:24-93:26
+93:24-93:26
     ()
-SampleMaterial.lc 94:22-94:27
+94:22-94:27
     Bool
-SampleMaterial.lc 95:20-95:21
+95:20-95:21
     _b
-SampleMaterial.lc 96:30-96:35
+96:30-96:35
     Bool
-SampleMaterial.lc 97:23-97:28
+97:23-97:28
     Bool
-SampleMaterial.lc 98:20-98:33
+98:20-98:33
     CullType
-SampleMaterial.lc 99:30-99:32
+99:30-99:32
     forall a . [a]
-SampleMaterial.lc 100:25-100:30
+100:25-100:30
     Bool
-SampleMaterial.lc 101:29-101:34
+101:29-101:34
     Bool
-SampleMaterial.lc 103:13-129:14
+103:13-129:14
     [StageAttrs]
-SampleMaterial.lc 103:15-103:25
+103:15-103:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -4288,70 +4288,70 @@ SampleMaterial.lc 103:15-103:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 103:15-104:36
+103:15-104:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 103:15-105:50
+103:15-105:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 103:15-106:42
+103:15-106:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 103:15-107:36
+103:15-107:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 103:15-108:31
+103:15-108:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 103:15-109:71
+103:15-109:71
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 103:15-110:38
+103:15-110:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 103:15-111:41
+103:15-111:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 103:15-112:40
+103:15-112:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 103:15-113:46
+103:15-113:46
     String -> StageAttrs
-SampleMaterial.lc 103:15-115:18
+103:15-115:18
     StageAttrs
-SampleMaterial.lc 104:29-104:36
+104:29-104:36
     forall a . Maybe a
-SampleMaterial.lc 105:30-105:50
+105:30-105:50
     RGBGen
-SampleMaterial.lc 106:32-106:42
+106:32-106:42
     AlphaGen
-SampleMaterial.lc 107:29-107:36
+107:29-107:36
     TCGen
-SampleMaterial.lc 108:29-108:31
+108:29-108:31
     forall a . [a]
-SampleMaterial.lc 109:31-109:37
+109:31-109:37
     String -> StageTexture
-SampleMaterial.lc 109:31-109:71
+109:31-109:71
     StageTexture
-SampleMaterial.lc 109:38-109:71
+109:38-109:71
     String
-SampleMaterial.lc 110:34-110:38
+110:34-110:38
     Bool
-SampleMaterial.lc 111:33-111:41
+111:33-111:41
     DepthFunction
-SampleMaterial.lc 112:33-112:40
+112:33-112:40
     forall a . Maybe a
-SampleMaterial.lc 113:41-113:46
+113:41-113:46
     Bool
-SampleMaterial.lc 114:38-114:54
+114:38-114:54
     String
-SampleMaterial.lc 116:15-116:25
+116:15-116:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -4359,82 +4359,82 @@ SampleMaterial.lc 116:15-116:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 116:15-117:57
+116:15-117:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 116:15-118:50
+116:15-118:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 116:15-119:42
+116:15-119:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 116:15-120:40
+116:15-120:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 116:15-121:31
+116:15-121:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 116:15-122:42
+116:15-122:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 116:15-123:38
+116:15-123:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 116:15-124:41
+116:15-124:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 116:15-125:40
+116:15-125:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 116:15-126:46
+116:15-126:46
     String -> StageAttrs
-SampleMaterial.lc 116:15-128:18
+116:15-128:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 117:29-117:33
+117:29-117:33
     forall a . a -> Maybe a
-SampleMaterial.lc 117:29-117:57
+117:29-117:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 117:34-117:57
+117:34-117:57
     (Blending', Blending')
-SampleMaterial.lc 117:36-117:46
+117:36-117:46
     Blending'
-SampleMaterial.lc 117:49-117:55
+117:49-117:55
     Blending' | ((Blending'))
-SampleMaterial.lc 118:30-118:50
+118:30-118:50
     RGBGen
-SampleMaterial.lc 119:32-119:42
+119:32-119:42
     AlphaGen
-SampleMaterial.lc 120:29-120:40
+120:29-120:40
     TCGen
-SampleMaterial.lc 121:29-121:31
+121:29-121:31
     forall a . [a]
-SampleMaterial.lc 122:31-122:42
+122:31-122:42
     StageTexture
-SampleMaterial.lc 123:34-123:38
+123:34-123:38
     Bool
-SampleMaterial.lc 124:33-124:41
+124:33-124:41
     DepthFunction
-SampleMaterial.lc 125:33-125:40
+125:33-125:40
     forall a . Maybe a
-SampleMaterial.lc 126:41-126:46
+126:41-126:46
     Bool
-SampleMaterial.lc 127:38-127:54
+127:38-127:54
     String
-SampleMaterial.lc 130:21-130:26
+130:21-130:26
     Bool
-SampleMaterial.lc 133:5-175:6
+133:5-175:6
     (String, CommonAttrs)
-SampleMaterial.lc 133:5-2182:6
+133:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 133:7-133:42
+133:7-133:42
     String
-SampleMaterial.lc 134:7-134:18
+134:7-134:18
     ()
       -> ()
         -> Bool
@@ -4442,68 +4442,68 @@ SampleMaterial.lc 134:7-134:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 134:7-135:26
+134:7-135:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 134:7-136:26
+134:7-136:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 134:7-137:27
+134:7-137:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 134:7-138:21
+134:7-138:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 134:7-139:35
+134:7-139:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 134:7-140:28
+134:7-140:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 134:7-141:33
+134:7-141:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 134:7-142:32
+134:7-142:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 134:7-143:30
+134:7-143:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 134:7-144:34
+134:7-144:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 134:7-172:14
+134:7-172:14
     Bool -> CommonAttrs
-SampleMaterial.lc 134:7-174:10
+134:7-174:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 135:24-135:26
+135:24-135:26
     ()
-SampleMaterial.lc 136:24-136:26
+136:24-136:26
     ()
-SampleMaterial.lc 137:22-137:27
+137:22-137:27
     Bool
-SampleMaterial.lc 138:20-138:21
+138:20-138:21
     _b
-SampleMaterial.lc 139:30-139:35
+139:30-139:35
     Bool
-SampleMaterial.lc 140:23-140:28
+140:23-140:28
     Bool
-SampleMaterial.lc 141:20-141:33
+141:20-141:33
     CullType
-SampleMaterial.lc 142:30-142:32
+142:30-142:32
     forall a . [a]
-SampleMaterial.lc 143:25-143:30
+143:25-143:30
     Bool
-SampleMaterial.lc 144:29-144:34
+144:29-144:34
     Bool
-SampleMaterial.lc 146:13-172:14
+146:13-172:14
     [StageAttrs]
-SampleMaterial.lc 146:15-146:25
+146:15-146:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -4511,70 +4511,70 @@ SampleMaterial.lc 146:15-146:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 146:15-147:36
+146:15-147:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 146:15-148:50
+146:15-148:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 146:15-149:42
+146:15-149:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 146:15-150:36
+146:15-150:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 146:15-151:31
+146:15-151:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 146:15-152:73
+146:15-152:73
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 146:15-153:38
+146:15-153:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 146:15-154:41
+146:15-154:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 146:15-155:40
+146:15-155:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 146:15-156:46
+146:15-156:46
     String -> StageAttrs
-SampleMaterial.lc 146:15-158:18
+146:15-158:18
     StageAttrs
-SampleMaterial.lc 147:29-147:36
+147:29-147:36
     forall a . Maybe a
-SampleMaterial.lc 148:30-148:50
+148:30-148:50
     RGBGen
-SampleMaterial.lc 149:32-149:42
+149:32-149:42
     AlphaGen
-SampleMaterial.lc 150:29-150:36
+150:29-150:36
     TCGen
-SampleMaterial.lc 151:29-151:31
+151:29-151:31
     forall a . [a]
-SampleMaterial.lc 152:31-152:37
+152:31-152:37
     String -> StageTexture
-SampleMaterial.lc 152:31-152:73
+152:31-152:73
     StageTexture
-SampleMaterial.lc 152:38-152:73
+152:38-152:73
     String
-SampleMaterial.lc 153:34-153:38
+153:34-153:38
     Bool
-SampleMaterial.lc 154:33-154:41
+154:33-154:41
     DepthFunction
-SampleMaterial.lc 155:33-155:40
+155:33-155:40
     forall a . Maybe a
-SampleMaterial.lc 156:41-156:46
+156:41-156:46
     Bool
-SampleMaterial.lc 157:38-157:54
+157:38-157:54
     String
-SampleMaterial.lc 159:15-159:25
+159:15-159:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -4582,82 +4582,82 @@ SampleMaterial.lc 159:15-159:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 159:15-160:57
+159:15-160:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 159:15-161:50
+159:15-161:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 159:15-162:42
+159:15-162:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 159:15-163:40
+159:15-163:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 159:15-164:31
+159:15-164:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 159:15-165:42
+159:15-165:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 159:15-166:38
+159:15-166:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 159:15-167:41
+159:15-167:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 159:15-168:40
+159:15-168:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 159:15-169:46
+159:15-169:46
     String -> StageAttrs
-SampleMaterial.lc 159:15-171:18
+159:15-171:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 160:29-160:33
+160:29-160:33
     forall a . a -> Maybe a
-SampleMaterial.lc 160:29-160:57
+160:29-160:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 160:34-160:57
+160:34-160:57
     (Blending', Blending')
-SampleMaterial.lc 160:36-160:46
+160:36-160:46
     Blending'
-SampleMaterial.lc 160:49-160:55
+160:49-160:55
     Blending' | ((Blending'))
-SampleMaterial.lc 161:30-161:50
+161:30-161:50
     RGBGen
-SampleMaterial.lc 162:32-162:42
+162:32-162:42
     AlphaGen
-SampleMaterial.lc 163:29-163:40
+163:29-163:40
     TCGen
-SampleMaterial.lc 164:29-164:31
+164:29-164:31
     forall a . [a]
-SampleMaterial.lc 165:31-165:42
+165:31-165:42
     StageTexture
-SampleMaterial.lc 166:34-166:38
+166:34-166:38
     Bool
-SampleMaterial.lc 167:33-167:41
+167:33-167:41
     DepthFunction
-SampleMaterial.lc 168:33-168:40
+168:33-168:40
     forall a . Maybe a
-SampleMaterial.lc 169:41-169:46
+169:41-169:46
     Bool
-SampleMaterial.lc 170:38-170:54
+170:38-170:54
     String
-SampleMaterial.lc 173:21-173:26
+173:21-173:26
     Bool
-SampleMaterial.lc 176:5-232:6
+176:5-232:6
     (String, CommonAttrs)
-SampleMaterial.lc 176:5-2182:6
+176:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 176:7-176:46
+176:7-176:46
     String
-SampleMaterial.lc 177:7-177:18
+177:7-177:18
     ()
       -> ()
         -> Bool
@@ -4665,68 +4665,68 @@ SampleMaterial.lc 177:7-177:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 177:7-178:26
+177:7-178:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 177:7-179:26
+177:7-179:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 177:7-180:27
+177:7-180:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 177:7-181:21
+177:7-181:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 177:7-182:35
+177:7-182:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 177:7-183:28
+177:7-183:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 177:7-184:33
+177:7-184:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 177:7-185:32
+177:7-185:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 177:7-186:30
+177:7-186:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 177:7-187:34
+177:7-187:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 177:7-229:14
+177:7-229:14
     Bool -> CommonAttrs
-SampleMaterial.lc 177:7-231:10
+177:7-231:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 178:24-178:26
+178:24-178:26
     ()
-SampleMaterial.lc 179:24-179:26
+179:24-179:26
     ()
-SampleMaterial.lc 180:22-180:27
+180:22-180:27
     Bool
-SampleMaterial.lc 181:20-181:21
+181:20-181:21
     _b
-SampleMaterial.lc 182:30-182:35
+182:30-182:35
     Bool
-SampleMaterial.lc 183:23-183:28
+183:23-183:28
     Bool
-SampleMaterial.lc 184:20-184:33
+184:20-184:33
     CullType
-SampleMaterial.lc 185:30-185:32
+185:30-185:32
     forall a . [a]
-SampleMaterial.lc 186:25-186:30
+186:25-186:30
     Bool
-SampleMaterial.lc 187:29-187:34
+187:29-187:34
     Bool
-SampleMaterial.lc 189:13-229:14
+189:13-229:14
     [StageAttrs]
-SampleMaterial.lc 189:15-189:25
+189:15-189:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -4734,110 +4734,110 @@ SampleMaterial.lc 189:15-189:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 189:15-190:36
+189:15-190:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 189:15-191:42
+189:15-191:42
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 189:15-192:42
+189:15-192:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 189:15-193:36
+189:15-193:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 189:15-195:88
+189:15-195:88
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 189:15-196:66
+189:15-196:66
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 189:15-197:38
+189:15-197:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 189:15-198:41
+189:15-198:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 189:15-199:40
+189:15-199:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 189:15-200:46
+189:15-200:46
     String -> StageAttrs
-SampleMaterial.lc 189:15-202:18
+189:15-202:18
     StageAttrs
-SampleMaterial.lc 190:29-190:36
+190:29-190:36
     forall a . Maybe a
-SampleMaterial.lc 191:30-191:42
+191:30-191:42
     RGBGen
-SampleMaterial.lc 192:32-192:42
+192:32-192:42
     AlphaGen
-SampleMaterial.lc 193:29-193:36
+193:29-193:36
     TCGen
-SampleMaterial.lc 195:21-195:88
+195:21-195:88
     [TCMod]
-SampleMaterial.lc 195:23-195:32
+195:23-195:32
     Float -> Float -> TCMod
-SampleMaterial.lc 195:23-195:36
+195:23-195:36
     Float -> TCMod
-SampleMaterial.lc 195:23-195:40
+195:23-195:40
     TCMod
-SampleMaterial.lc 195:33-195:36
+195:33-195:36
     Float
-SampleMaterial.lc 195:37-195:40
+195:37-195:40
     Float
-SampleMaterial.lc 195:43-195:50
+195:43-195:50
     Float -> Float -> Float -> Float -> TCMod
-SampleMaterial.lc 195:43-195:54
+195:43-195:54
     Float -> Float -> Float -> TCMod
-SampleMaterial.lc 195:43-195:59
+195:43-195:59
     Float -> Float -> TCMod
-SampleMaterial.lc 195:43-195:63
+195:43-195:63
     Float -> TCMod
-SampleMaterial.lc 195:43-195:67
+195:43-195:67
     TCMod
-SampleMaterial.lc 195:43-195:86
+195:43-195:86
     [TCMod]
-SampleMaterial.lc 195:51-195:54
+195:51-195:54
     Float
-SampleMaterial.lc 195:55-195:59
+195:55-195:59
     Float
-SampleMaterial.lc 195:60-195:63
+195:60-195:63
     Float
-SampleMaterial.lc 195:64-195:67
+195:64-195:67
     Float
-SampleMaterial.lc 195:70-195:78
+195:70-195:78
     Float -> Float -> TCMod
-SampleMaterial.lc 195:70-195:82
+195:70-195:82
     Float -> TCMod
-SampleMaterial.lc 195:70-195:86
+195:70-195:86
     TCMod | [TCMod]
-SampleMaterial.lc 195:79-195:82
+195:79-195:82
     Float
-SampleMaterial.lc 195:83-195:86
+195:83-195:86
     Float
-SampleMaterial.lc 196:31-196:37
+196:31-196:37
     String -> StageTexture
-SampleMaterial.lc 196:31-196:66
+196:31-196:66
     StageTexture
-SampleMaterial.lc 196:38-196:66
+196:38-196:66
     String
-SampleMaterial.lc 197:34-197:38
+197:34-197:38
     Bool
-SampleMaterial.lc 198:33-198:41
+198:33-198:41
     DepthFunction
-SampleMaterial.lc 199:33-199:40
+199:33-199:40
     forall a . Maybe a
-SampleMaterial.lc 200:41-200:46
+200:41-200:46
     Bool
-SampleMaterial.lc 201:38-201:52
+201:38-201:52
     String
-SampleMaterial.lc 203:15-203:25
+203:15-203:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -4845,80 +4845,80 @@ SampleMaterial.lc 203:15-203:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 203:15-204:69
+203:15-204:69
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 203:15-205:42
+203:15-205:42
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 203:15-206:42
+203:15-206:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 203:15-207:36
+203:15-207:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 203:15-208:31
+203:15-208:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 203:15-209:81
+203:15-209:81
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 203:15-210:39
+203:15-210:39
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 203:15-211:41
+203:15-211:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 203:15-212:40
+203:15-212:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 203:15-213:46
+203:15-213:46
     String -> StageAttrs
-SampleMaterial.lc 203:15-215:18
+203:15-215:18
     StageAttrs
-SampleMaterial.lc 203:15-228:18
+203:15-228:18
     [StageAttrs]
-SampleMaterial.lc 204:29-204:33
+204:29-204:33
     forall a . a -> Maybe a
-SampleMaterial.lc 204:29-204:69
+204:29-204:69
     Maybe (Blending', Blending')
-SampleMaterial.lc 204:34-204:69
+204:34-204:69
     (Blending', Blending')
-SampleMaterial.lc 204:36-204:46
+204:36-204:46
     Blending'
-SampleMaterial.lc 204:49-204:67
+204:49-204:67
     Blending' | ((Blending'))
-SampleMaterial.lc 205:30-205:42
+205:30-205:42
     RGBGen
-SampleMaterial.lc 206:32-206:42
+206:32-206:42
     AlphaGen
-SampleMaterial.lc 207:29-207:36
+207:29-207:36
     TCGen
-SampleMaterial.lc 208:29-208:31
+208:29-208:31
     forall a . [a]
-SampleMaterial.lc 209:31-209:37
+209:31-209:37
     String -> StageTexture
-SampleMaterial.lc 209:31-209:81
+209:31-209:81
     StageTexture
-SampleMaterial.lc 209:38-209:81
+209:38-209:81
     String
-SampleMaterial.lc 210:34-210:39
+210:34-210:39
     Bool
-SampleMaterial.lc 211:33-211:41
+211:33-211:41
     DepthFunction
-SampleMaterial.lc 212:33-212:40
+212:33-212:40
     forall a . Maybe a
-SampleMaterial.lc 213:41-213:46
+213:41-213:46
     Bool
-SampleMaterial.lc 214:38-214:54
+214:38-214:54
     String
-SampleMaterial.lc 216:15-216:25
+216:15-216:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -4926,82 +4926,82 @@ SampleMaterial.lc 216:15-216:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 216:15-217:69
+216:15-217:69
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 216:15-218:42
+216:15-218:42
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 216:15-219:42
+216:15-219:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 216:15-220:40
+216:15-220:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 216:15-221:31
+216:15-221:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 216:15-222:42
+216:15-222:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 216:15-223:39
+216:15-223:39
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 216:15-224:41
+216:15-224:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 216:15-225:40
+216:15-225:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 216:15-226:46
+216:15-226:46
     String -> StageAttrs
-SampleMaterial.lc 216:15-228:18
+216:15-228:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 217:29-217:33
+217:29-217:33
     forall a . a -> Maybe a
-SampleMaterial.lc 217:29-217:69
+217:29-217:69
     Maybe (Blending', Blending')
-SampleMaterial.lc 217:34-217:69
+217:34-217:69
     (Blending', Blending')
-SampleMaterial.lc 217:36-217:46
+217:36-217:46
     Blending'
-SampleMaterial.lc 217:49-217:67
+217:49-217:67
     Blending' | ((Blending'))
-SampleMaterial.lc 218:30-218:42
+218:30-218:42
     RGBGen
-SampleMaterial.lc 219:32-219:42
+219:32-219:42
     AlphaGen
-SampleMaterial.lc 220:29-220:40
+220:29-220:40
     TCGen
-SampleMaterial.lc 221:29-221:31
+221:29-221:31
     forall a . [a]
-SampleMaterial.lc 222:31-222:42
+222:31-222:42
     StageTexture
-SampleMaterial.lc 223:34-223:39
+223:34-223:39
     Bool
-SampleMaterial.lc 224:33-224:41
+224:33-224:41
     DepthFunction
-SampleMaterial.lc 225:33-225:40
+225:33-225:40
     forall a . Maybe a
-SampleMaterial.lc 226:41-226:46
+226:41-226:46
     Bool
-SampleMaterial.lc 227:38-227:54
+227:38-227:54
     String
-SampleMaterial.lc 230:21-230:26
+230:21-230:26
     Bool
-SampleMaterial.lc 233:5-275:6
+233:5-275:6
     (String, CommonAttrs)
-SampleMaterial.lc 233:5-2182:6
+233:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 233:7-233:40
+233:7-233:40
     String
-SampleMaterial.lc 234:7-234:18
+234:7-234:18
     ()
       -> ()
         -> Bool
@@ -5009,68 +5009,68 @@ SampleMaterial.lc 234:7-234:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 234:7-235:26
+234:7-235:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 234:7-236:26
+234:7-236:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 234:7-237:27
+234:7-237:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 234:7-238:21
+234:7-238:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 234:7-239:35
+234:7-239:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 234:7-240:28
+234:7-240:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 234:7-241:33
+234:7-241:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 234:7-242:32
+234:7-242:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 234:7-243:30
+234:7-243:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 234:7-244:34
+234:7-244:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 234:7-272:14
+234:7-272:14
     Bool -> CommonAttrs
-SampleMaterial.lc 234:7-274:10
+234:7-274:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 235:24-235:26
+235:24-235:26
     ()
-SampleMaterial.lc 236:24-236:26
+236:24-236:26
     ()
-SampleMaterial.lc 237:22-237:27
+237:22-237:27
     Bool
-SampleMaterial.lc 238:20-238:21
+238:20-238:21
     _b
-SampleMaterial.lc 239:30-239:35
+239:30-239:35
     Bool
-SampleMaterial.lc 240:23-240:28
+240:23-240:28
     Bool
-SampleMaterial.lc 241:20-241:33
+241:20-241:33
     CullType
-SampleMaterial.lc 242:30-242:32
+242:30-242:32
     forall a . [a]
-SampleMaterial.lc 243:25-243:30
+243:25-243:30
     Bool
-SampleMaterial.lc 244:29-244:34
+244:29-244:34
     Bool
-SampleMaterial.lc 246:13-272:14
+246:13-272:14
     [StageAttrs]
-SampleMaterial.lc 246:15-246:25
+246:15-246:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -5078,70 +5078,70 @@ SampleMaterial.lc 246:15-246:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 246:15-247:36
+246:15-247:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 246:15-248:50
+246:15-248:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 246:15-249:42
+246:15-249:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 246:15-250:36
+246:15-250:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 246:15-251:31
+246:15-251:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 246:15-252:71
+246:15-252:71
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 246:15-253:38
+246:15-253:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 246:15-254:41
+246:15-254:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 246:15-255:40
+246:15-255:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 246:15-256:46
+246:15-256:46
     String -> StageAttrs
-SampleMaterial.lc 246:15-258:18
+246:15-258:18
     StageAttrs
-SampleMaterial.lc 247:29-247:36
+247:29-247:36
     forall a . Maybe a
-SampleMaterial.lc 248:30-248:50
+248:30-248:50
     RGBGen
-SampleMaterial.lc 249:32-249:42
+249:32-249:42
     AlphaGen
-SampleMaterial.lc 250:29-250:36
+250:29-250:36
     TCGen
-SampleMaterial.lc 251:29-251:31
+251:29-251:31
     forall a . [a]
-SampleMaterial.lc 252:31-252:37
+252:31-252:37
     String -> StageTexture
-SampleMaterial.lc 252:31-252:71
+252:31-252:71
     StageTexture
-SampleMaterial.lc 252:38-252:71
+252:38-252:71
     String
-SampleMaterial.lc 253:34-253:38
+253:34-253:38
     Bool
-SampleMaterial.lc 254:33-254:41
+254:33-254:41
     DepthFunction
-SampleMaterial.lc 255:33-255:40
+255:33-255:40
     forall a . Maybe a
-SampleMaterial.lc 256:41-256:46
+256:41-256:46
     Bool
-SampleMaterial.lc 257:38-257:54
+257:38-257:54
     String
-SampleMaterial.lc 259:15-259:25
+259:15-259:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -5149,82 +5149,82 @@ SampleMaterial.lc 259:15-259:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 259:15-260:57
+259:15-260:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 259:15-261:50
+259:15-261:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 259:15-262:42
+259:15-262:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 259:15-263:40
+259:15-263:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 259:15-264:31
+259:15-264:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 259:15-265:42
+259:15-265:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 259:15-266:38
+259:15-266:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 259:15-267:41
+259:15-267:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 259:15-268:40
+259:15-268:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 259:15-269:46
+259:15-269:46
     String -> StageAttrs
-SampleMaterial.lc 259:15-271:18
+259:15-271:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 260:29-260:33
+260:29-260:33
     forall a . a -> Maybe a
-SampleMaterial.lc 260:29-260:57
+260:29-260:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 260:34-260:57
+260:34-260:57
     (Blending', Blending')
-SampleMaterial.lc 260:36-260:46
+260:36-260:46
     Blending'
-SampleMaterial.lc 260:49-260:55
+260:49-260:55
     Blending' | ((Blending'))
-SampleMaterial.lc 261:30-261:50
+261:30-261:50
     RGBGen
-SampleMaterial.lc 262:32-262:42
+262:32-262:42
     AlphaGen
-SampleMaterial.lc 263:29-263:40
+263:29-263:40
     TCGen
-SampleMaterial.lc 264:29-264:31
+264:29-264:31
     forall a . [a]
-SampleMaterial.lc 265:31-265:42
+265:31-265:42
     StageTexture
-SampleMaterial.lc 266:34-266:38
+266:34-266:38
     Bool
-SampleMaterial.lc 267:33-267:41
+267:33-267:41
     DepthFunction
-SampleMaterial.lc 268:33-268:40
+268:33-268:40
     forall a . Maybe a
-SampleMaterial.lc 269:41-269:46
+269:41-269:46
     Bool
-SampleMaterial.lc 270:38-270:54
+270:38-270:54
     String
-SampleMaterial.lc 273:21-273:26
+273:21-273:26
     Bool
-SampleMaterial.lc 276:5-318:6
+276:5-318:6
     (String, CommonAttrs)
-SampleMaterial.lc 276:5-2182:6
+276:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 276:7-276:42
+276:7-276:42
     String
-SampleMaterial.lc 277:7-277:18
+277:7-277:18
     ()
       -> ()
         -> Bool
@@ -5232,68 +5232,68 @@ SampleMaterial.lc 277:7-277:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 277:7-278:26
+277:7-278:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 277:7-279:26
+277:7-279:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 277:7-280:27
+277:7-280:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 277:7-281:21
+277:7-281:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 277:7-282:35
+277:7-282:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 277:7-283:28
+277:7-283:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 277:7-284:33
+277:7-284:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 277:7-285:32
+277:7-285:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 277:7-286:30
+277:7-286:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 277:7-287:34
+277:7-287:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 277:7-315:14
+277:7-315:14
     Bool -> CommonAttrs
-SampleMaterial.lc 277:7-317:10
+277:7-317:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 278:24-278:26
+278:24-278:26
     ()
-SampleMaterial.lc 279:24-279:26
+279:24-279:26
     ()
-SampleMaterial.lc 280:22-280:27
+280:22-280:27
     Bool
-SampleMaterial.lc 281:20-281:21
+281:20-281:21
     _b
-SampleMaterial.lc 282:30-282:35
+282:30-282:35
     Bool
-SampleMaterial.lc 283:23-283:28
+283:23-283:28
     Bool
-SampleMaterial.lc 284:20-284:33
+284:20-284:33
     CullType
-SampleMaterial.lc 285:30-285:32
+285:30-285:32
     forall a . [a]
-SampleMaterial.lc 286:25-286:30
+286:25-286:30
     Bool
-SampleMaterial.lc 287:29-287:34
+287:29-287:34
     Bool
-SampleMaterial.lc 289:13-315:14
+289:13-315:14
     [StageAttrs]
-SampleMaterial.lc 289:15-289:25
+289:15-289:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -5301,70 +5301,70 @@ SampleMaterial.lc 289:15-289:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 289:15-290:36
+289:15-290:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 289:15-291:50
+289:15-291:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 289:15-292:42
+289:15-292:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 289:15-293:36
+289:15-293:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 289:15-294:31
+289:15-294:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 289:15-295:73
+289:15-295:73
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 289:15-296:38
+289:15-296:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 289:15-297:41
+289:15-297:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 289:15-298:40
+289:15-298:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 289:15-299:46
+289:15-299:46
     String -> StageAttrs
-SampleMaterial.lc 289:15-301:18
+289:15-301:18
     StageAttrs
-SampleMaterial.lc 290:29-290:36
+290:29-290:36
     forall a . Maybe a
-SampleMaterial.lc 291:30-291:50
+291:30-291:50
     RGBGen
-SampleMaterial.lc 292:32-292:42
+292:32-292:42
     AlphaGen
-SampleMaterial.lc 293:29-293:36
+293:29-293:36
     TCGen
-SampleMaterial.lc 294:29-294:31
+294:29-294:31
     forall a . [a]
-SampleMaterial.lc 295:31-295:37
+295:31-295:37
     String -> StageTexture
-SampleMaterial.lc 295:31-295:73
+295:31-295:73
     StageTexture
-SampleMaterial.lc 295:38-295:73
+295:38-295:73
     String
-SampleMaterial.lc 296:34-296:38
+296:34-296:38
     Bool
-SampleMaterial.lc 297:33-297:41
+297:33-297:41
     DepthFunction
-SampleMaterial.lc 298:33-298:40
+298:33-298:40
     forall a . Maybe a
-SampleMaterial.lc 299:41-299:46
+299:41-299:46
     Bool
-SampleMaterial.lc 300:38-300:53
+300:38-300:53
     String
-SampleMaterial.lc 302:15-302:25
+302:15-302:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -5372,82 +5372,82 @@ SampleMaterial.lc 302:15-302:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 302:15-303:57
+302:15-303:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 302:15-304:50
+302:15-304:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 302:15-305:42
+302:15-305:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 302:15-306:40
+302:15-306:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 302:15-307:31
+302:15-307:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 302:15-308:42
+302:15-308:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 302:15-309:38
+302:15-309:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 302:15-310:41
+302:15-310:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 302:15-311:40
+302:15-311:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 302:15-312:46
+302:15-312:46
     String -> StageAttrs
-SampleMaterial.lc 302:15-314:18
+302:15-314:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 303:29-303:33
+303:29-303:33
     forall a . a -> Maybe a
-SampleMaterial.lc 303:29-303:57
+303:29-303:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 303:34-303:57
+303:34-303:57
     (Blending', Blending')
-SampleMaterial.lc 303:36-303:46
+303:36-303:46
     Blending'
-SampleMaterial.lc 303:49-303:55
+303:49-303:55
     Blending' | ((Blending'))
-SampleMaterial.lc 304:30-304:50
+304:30-304:50
     RGBGen
-SampleMaterial.lc 305:32-305:42
+305:32-305:42
     AlphaGen
-SampleMaterial.lc 306:29-306:40
+306:29-306:40
     TCGen
-SampleMaterial.lc 307:29-307:31
+307:29-307:31
     forall a . [a]
-SampleMaterial.lc 308:31-308:42
+308:31-308:42
     StageTexture
-SampleMaterial.lc 309:34-309:38
+309:34-309:38
     Bool
-SampleMaterial.lc 310:33-310:41
+310:33-310:41
     DepthFunction
-SampleMaterial.lc 311:33-311:40
+311:33-311:40
     forall a . Maybe a
-SampleMaterial.lc 312:41-312:46
+312:41-312:46
     Bool
-SampleMaterial.lc 313:38-313:54
+313:38-313:54
     String
-SampleMaterial.lc 316:21-316:26
+316:21-316:26
     Bool
-SampleMaterial.lc 319:5-361:6
+319:5-361:6
     (String, CommonAttrs)
-SampleMaterial.lc 319:5-2182:6
+319:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 319:7-319:43
+319:7-319:43
     String
-SampleMaterial.lc 320:7-320:18
+320:7-320:18
     ()
       -> ()
         -> Bool
@@ -5455,68 +5455,68 @@ SampleMaterial.lc 320:7-320:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 320:7-321:26
+320:7-321:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 320:7-322:26
+320:7-322:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 320:7-323:27
+320:7-323:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 320:7-324:21
+320:7-324:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 320:7-325:35
+320:7-325:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 320:7-326:28
+320:7-326:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 320:7-327:33
+320:7-327:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 320:7-328:32
+320:7-328:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 320:7-329:30
+320:7-329:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 320:7-330:34
+320:7-330:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 320:7-358:14
+320:7-358:14
     Bool -> CommonAttrs
-SampleMaterial.lc 320:7-360:10
+320:7-360:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 321:24-321:26
+321:24-321:26
     ()
-SampleMaterial.lc 322:24-322:26
+322:24-322:26
     ()
-SampleMaterial.lc 323:22-323:27
+323:22-323:27
     Bool
-SampleMaterial.lc 324:20-324:21
+324:20-324:21
     _b
-SampleMaterial.lc 325:30-325:35
+325:30-325:35
     Bool
-SampleMaterial.lc 326:23-326:28
+326:23-326:28
     Bool
-SampleMaterial.lc 327:20-327:33
+327:20-327:33
     CullType
-SampleMaterial.lc 328:30-328:32
+328:30-328:32
     forall a . [a]
-SampleMaterial.lc 329:25-329:30
+329:25-329:30
     Bool
-SampleMaterial.lc 330:29-330:34
+330:29-330:34
     Bool
-SampleMaterial.lc 332:13-358:14
+332:13-358:14
     [StageAttrs]
-SampleMaterial.lc 332:15-332:25
+332:15-332:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -5524,70 +5524,70 @@ SampleMaterial.lc 332:15-332:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 332:15-333:36
+332:15-333:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 332:15-334:50
+332:15-334:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 332:15-335:42
+332:15-335:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 332:15-336:36
+332:15-336:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 332:15-337:31
+332:15-337:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 332:15-338:74
+332:15-338:74
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 332:15-339:38
+332:15-339:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 332:15-340:41
+332:15-340:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 332:15-341:40
+332:15-341:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 332:15-342:46
+332:15-342:46
     String -> StageAttrs
-SampleMaterial.lc 332:15-344:18
+332:15-344:18
     StageAttrs
-SampleMaterial.lc 333:29-333:36
+333:29-333:36
     forall a . Maybe a
-SampleMaterial.lc 334:30-334:50
+334:30-334:50
     RGBGen
-SampleMaterial.lc 335:32-335:42
+335:32-335:42
     AlphaGen
-SampleMaterial.lc 336:29-336:36
+336:29-336:36
     TCGen
-SampleMaterial.lc 337:29-337:31
+337:29-337:31
     forall a . [a]
-SampleMaterial.lc 338:31-338:37
+338:31-338:37
     String -> StageTexture
-SampleMaterial.lc 338:31-338:74
+338:31-338:74
     StageTexture
-SampleMaterial.lc 338:38-338:74
+338:38-338:74
     String
-SampleMaterial.lc 339:34-339:38
+339:34-339:38
     Bool
-SampleMaterial.lc 340:33-340:41
+340:33-340:41
     DepthFunction
-SampleMaterial.lc 341:33-341:40
+341:33-341:40
     forall a . Maybe a
-SampleMaterial.lc 342:41-342:46
+342:41-342:46
     Bool
-SampleMaterial.lc 343:38-343:54
+343:38-343:54
     String
-SampleMaterial.lc 345:15-345:25
+345:15-345:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -5595,82 +5595,82 @@ SampleMaterial.lc 345:15-345:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 345:15-346:57
+345:15-346:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 345:15-347:50
+345:15-347:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 345:15-348:42
+345:15-348:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 345:15-349:40
+345:15-349:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 345:15-350:31
+345:15-350:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 345:15-351:42
+345:15-351:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 345:15-352:38
+345:15-352:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 345:15-353:41
+345:15-353:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 345:15-354:40
+345:15-354:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 345:15-355:46
+345:15-355:46
     String -> StageAttrs
-SampleMaterial.lc 345:15-357:18
+345:15-357:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 346:29-346:33
+346:29-346:33
     forall a . a -> Maybe a
-SampleMaterial.lc 346:29-346:57
+346:29-346:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 346:34-346:57
+346:34-346:57
     (Blending', Blending')
-SampleMaterial.lc 346:36-346:46
+346:36-346:46
     Blending'
-SampleMaterial.lc 346:49-346:55
+346:49-346:55
     Blending' | ((Blending'))
-SampleMaterial.lc 347:30-347:50
+347:30-347:50
     RGBGen
-SampleMaterial.lc 348:32-348:42
+348:32-348:42
     AlphaGen
-SampleMaterial.lc 349:29-349:40
+349:29-349:40
     TCGen
-SampleMaterial.lc 350:29-350:31
+350:29-350:31
     forall a . [a]
-SampleMaterial.lc 351:31-351:42
+351:31-351:42
     StageTexture
-SampleMaterial.lc 352:34-352:38
+352:34-352:38
     Bool
-SampleMaterial.lc 353:33-353:41
+353:33-353:41
     DepthFunction
-SampleMaterial.lc 354:33-354:40
+354:33-354:40
     forall a . Maybe a
-SampleMaterial.lc 355:41-355:46
+355:41-355:46
     Bool
-SampleMaterial.lc 356:38-356:54
+356:38-356:54
     String
-SampleMaterial.lc 359:21-359:26
+359:21-359:26
     Bool
-SampleMaterial.lc 362:5-404:6
+362:5-404:6
     (String, CommonAttrs)
-SampleMaterial.lc 362:5-2182:6
+362:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 362:7-362:53
+362:7-362:53
     String
-SampleMaterial.lc 363:7-363:18
+363:7-363:18
     ()
       -> ()
         -> Bool
@@ -5678,68 +5678,68 @@ SampleMaterial.lc 363:7-363:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 363:7-364:26
+363:7-364:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 363:7-365:26
+363:7-365:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 363:7-366:27
+363:7-366:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 363:7-367:21
+363:7-367:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 363:7-368:35
+363:7-368:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 363:7-369:28
+363:7-369:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 363:7-370:33
+363:7-370:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 363:7-371:32
+363:7-371:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 363:7-372:30
+363:7-372:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 363:7-373:34
+363:7-373:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 363:7-401:14
+363:7-401:14
     Bool -> CommonAttrs
-SampleMaterial.lc 363:7-403:10
+363:7-403:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 364:24-364:26
+364:24-364:26
     ()
-SampleMaterial.lc 365:24-365:26
+365:24-365:26
     ()
-SampleMaterial.lc 366:22-366:27
+366:22-366:27
     Bool
-SampleMaterial.lc 367:20-367:21
+367:20-367:21
     _b
-SampleMaterial.lc 368:30-368:35
+368:30-368:35
     Bool
-SampleMaterial.lc 369:23-369:28
+369:23-369:28
     Bool
-SampleMaterial.lc 370:20-370:33
+370:20-370:33
     CullType
-SampleMaterial.lc 371:30-371:32
+371:30-371:32
     forall a . [a]
-SampleMaterial.lc 372:25-372:30
+372:25-372:30
     Bool
-SampleMaterial.lc 373:29-373:34
+373:29-373:34
     Bool
-SampleMaterial.lc 375:13-401:14
+375:13-401:14
     [StageAttrs]
-SampleMaterial.lc 375:15-375:25
+375:15-375:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -5747,70 +5747,70 @@ SampleMaterial.lc 375:15-375:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 375:15-376:36
+375:15-376:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 375:15-377:50
+375:15-377:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 375:15-378:42
+375:15-378:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 375:15-379:36
+375:15-379:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 375:15-380:31
+375:15-380:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 375:15-381:84
+375:15-381:84
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 375:15-382:38
+375:15-382:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 375:15-383:41
+375:15-383:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 375:15-384:40
+375:15-384:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 375:15-385:46
+375:15-385:46
     String -> StageAttrs
-SampleMaterial.lc 375:15-387:18
+375:15-387:18
     StageAttrs
-SampleMaterial.lc 376:29-376:36
+376:29-376:36
     forall a . Maybe a
-SampleMaterial.lc 377:30-377:50
+377:30-377:50
     RGBGen
-SampleMaterial.lc 378:32-378:42
+378:32-378:42
     AlphaGen
-SampleMaterial.lc 379:29-379:36
+379:29-379:36
     TCGen
-SampleMaterial.lc 380:29-380:31
+380:29-380:31
     forall a . [a]
-SampleMaterial.lc 381:31-381:37
+381:31-381:37
     String -> StageTexture
-SampleMaterial.lc 381:31-381:84
+381:31-381:84
     StageTexture
-SampleMaterial.lc 381:38-381:84
+381:38-381:84
     String
-SampleMaterial.lc 382:34-382:38
+382:34-382:38
     Bool
-SampleMaterial.lc 383:33-383:41
+383:33-383:41
     DepthFunction
-SampleMaterial.lc 384:33-384:40
+384:33-384:40
     forall a . Maybe a
-SampleMaterial.lc 385:41-385:46
+385:41-385:46
     Bool
-SampleMaterial.lc 386:38-386:54
+386:38-386:54
     String
-SampleMaterial.lc 388:15-388:25
+388:15-388:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -5818,82 +5818,82 @@ SampleMaterial.lc 388:15-388:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 388:15-389:57
+388:15-389:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 388:15-390:50
+388:15-390:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 388:15-391:42
+388:15-391:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 388:15-392:40
+388:15-392:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 388:15-393:31
+388:15-393:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 388:15-394:42
+388:15-394:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 388:15-395:38
+388:15-395:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 388:15-396:41
+388:15-396:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 388:15-397:40
+388:15-397:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 388:15-398:46
+388:15-398:46
     String -> StageAttrs
-SampleMaterial.lc 388:15-400:18
+388:15-400:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 389:29-389:33
+389:29-389:33
     forall a . a -> Maybe a
-SampleMaterial.lc 389:29-389:57
+389:29-389:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 389:34-389:57
+389:34-389:57
     (Blending', Blending')
-SampleMaterial.lc 389:36-389:46
+389:36-389:46
     Blending'
-SampleMaterial.lc 389:49-389:55
+389:49-389:55
     Blending' | ((Blending'))
-SampleMaterial.lc 390:30-390:50
+390:30-390:50
     RGBGen
-SampleMaterial.lc 391:32-391:42
+391:32-391:42
     AlphaGen
-SampleMaterial.lc 392:29-392:40
+392:29-392:40
     TCGen
-SampleMaterial.lc 393:29-393:31
+393:29-393:31
     forall a . [a]
-SampleMaterial.lc 394:31-394:42
+394:31-394:42
     StageTexture
-SampleMaterial.lc 395:34-395:38
+395:34-395:38
     Bool
-SampleMaterial.lc 396:33-396:41
+396:33-396:41
     DepthFunction
-SampleMaterial.lc 397:33-397:40
+397:33-397:40
     forall a . Maybe a
-SampleMaterial.lc 398:41-398:46
+398:41-398:46
     Bool
-SampleMaterial.lc 399:38-399:54
+399:38-399:54
     String
-SampleMaterial.lc 402:21-402:26
+402:21-402:26
     Bool
-SampleMaterial.lc 405:5-447:6
+405:5-447:6
     (String, CommonAttrs)
-SampleMaterial.lc 405:5-2182:6
+405:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 405:7-405:53
+405:7-405:53
     String
-SampleMaterial.lc 406:7-406:18
+406:7-406:18
     ()
       -> ()
         -> Bool
@@ -5901,68 +5901,68 @@ SampleMaterial.lc 406:7-406:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 406:7-407:26
+406:7-407:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 406:7-408:26
+406:7-408:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 406:7-409:27
+406:7-409:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 406:7-410:21
+406:7-410:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 406:7-411:35
+406:7-411:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 406:7-412:28
+406:7-412:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 406:7-413:33
+406:7-413:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 406:7-414:32
+406:7-414:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 406:7-415:30
+406:7-415:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 406:7-416:34
+406:7-416:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 406:7-444:14
+406:7-444:14
     Bool -> CommonAttrs
-SampleMaterial.lc 406:7-446:10
+406:7-446:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 407:24-407:26
+407:24-407:26
     ()
-SampleMaterial.lc 408:24-408:26
+408:24-408:26
     ()
-SampleMaterial.lc 409:22-409:27
+409:22-409:27
     Bool
-SampleMaterial.lc 410:20-410:21
+410:20-410:21
     _b
-SampleMaterial.lc 411:30-411:35
+411:30-411:35
     Bool
-SampleMaterial.lc 412:23-412:28
+412:23-412:28
     Bool
-SampleMaterial.lc 413:20-413:33
+413:20-413:33
     CullType
-SampleMaterial.lc 414:30-414:32
+414:30-414:32
     forall a . [a]
-SampleMaterial.lc 415:25-415:30
+415:25-415:30
     Bool
-SampleMaterial.lc 416:29-416:34
+416:29-416:34
     Bool
-SampleMaterial.lc 418:13-444:14
+418:13-444:14
     [StageAttrs]
-SampleMaterial.lc 418:15-418:25
+418:15-418:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -5970,70 +5970,70 @@ SampleMaterial.lc 418:15-418:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 418:15-419:36
+418:15-419:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 418:15-420:50
+418:15-420:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 418:15-421:42
+418:15-421:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 418:15-422:36
+418:15-422:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 418:15-423:31
+418:15-423:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 418:15-424:84
+418:15-424:84
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 418:15-425:38
+418:15-425:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 418:15-426:41
+418:15-426:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 418:15-427:40
+418:15-427:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 418:15-428:46
+418:15-428:46
     String -> StageAttrs
-SampleMaterial.lc 418:15-430:18
+418:15-430:18
     StageAttrs
-SampleMaterial.lc 419:29-419:36
+419:29-419:36
     forall a . Maybe a
-SampleMaterial.lc 420:30-420:50
+420:30-420:50
     RGBGen
-SampleMaterial.lc 421:32-421:42
+421:32-421:42
     AlphaGen
-SampleMaterial.lc 422:29-422:36
+422:29-422:36
     TCGen
-SampleMaterial.lc 423:29-423:31
+423:29-423:31
     forall a . [a]
-SampleMaterial.lc 424:31-424:37
+424:31-424:37
     String -> StageTexture
-SampleMaterial.lc 424:31-424:84
+424:31-424:84
     StageTexture
-SampleMaterial.lc 424:38-424:84
+424:38-424:84
     String
-SampleMaterial.lc 425:34-425:38
+425:34-425:38
     Bool
-SampleMaterial.lc 426:33-426:41
+426:33-426:41
     DepthFunction
-SampleMaterial.lc 427:33-427:40
+427:33-427:40
     forall a . Maybe a
-SampleMaterial.lc 428:41-428:46
+428:41-428:46
     Bool
-SampleMaterial.lc 429:38-429:54
+429:38-429:54
     String
-SampleMaterial.lc 431:15-431:25
+431:15-431:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -6041,82 +6041,82 @@ SampleMaterial.lc 431:15-431:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 431:15-432:57
+431:15-432:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 431:15-433:50
+431:15-433:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 431:15-434:42
+431:15-434:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 431:15-435:40
+431:15-435:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 431:15-436:31
+431:15-436:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 431:15-437:42
+431:15-437:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 431:15-438:38
+431:15-438:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 431:15-439:41
+431:15-439:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 431:15-440:40
+431:15-440:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 431:15-441:46
+431:15-441:46
     String -> StageAttrs
-SampleMaterial.lc 431:15-443:18
+431:15-443:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 432:29-432:33
+432:29-432:33
     forall a . a -> Maybe a
-SampleMaterial.lc 432:29-432:57
+432:29-432:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 432:34-432:57
+432:34-432:57
     (Blending', Blending')
-SampleMaterial.lc 432:36-432:46
+432:36-432:46
     Blending'
-SampleMaterial.lc 432:49-432:55
+432:49-432:55
     Blending' | ((Blending'))
-SampleMaterial.lc 433:30-433:50
+433:30-433:50
     RGBGen
-SampleMaterial.lc 434:32-434:42
+434:32-434:42
     AlphaGen
-SampleMaterial.lc 435:29-435:40
+435:29-435:40
     TCGen
-SampleMaterial.lc 436:29-436:31
+436:29-436:31
     forall a . [a]
-SampleMaterial.lc 437:31-437:42
+437:31-437:42
     StageTexture
-SampleMaterial.lc 438:34-438:38
+438:34-438:38
     Bool
-SampleMaterial.lc 439:33-439:41
+439:33-439:41
     DepthFunction
-SampleMaterial.lc 440:33-440:40
+440:33-440:40
     forall a . Maybe a
-SampleMaterial.lc 441:41-441:46
+441:41-441:46
     Bool
-SampleMaterial.lc 442:38-442:54
+442:38-442:54
     String
-SampleMaterial.lc 445:21-445:26
+445:21-445:26
     Bool
-SampleMaterial.lc 448:5-490:6
+448:5-490:6
     (String, CommonAttrs)
-SampleMaterial.lc 448:5-2182:6
+448:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 448:7-448:53
+448:7-448:53
     String
-SampleMaterial.lc 449:7-449:18
+449:7-449:18
     ()
       -> ()
         -> Bool
@@ -6124,68 +6124,68 @@ SampleMaterial.lc 449:7-449:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 449:7-450:26
+449:7-450:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 449:7-451:26
+449:7-451:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 449:7-452:27
+449:7-452:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 449:7-453:21
+449:7-453:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 449:7-454:35
+449:7-454:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 449:7-455:28
+449:7-455:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 449:7-456:33
+449:7-456:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 449:7-457:32
+449:7-457:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 449:7-458:30
+449:7-458:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 449:7-459:34
+449:7-459:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 449:7-487:14
+449:7-487:14
     Bool -> CommonAttrs
-SampleMaterial.lc 449:7-489:10
+449:7-489:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 450:24-450:26
+450:24-450:26
     ()
-SampleMaterial.lc 451:24-451:26
+451:24-451:26
     ()
-SampleMaterial.lc 452:22-452:27
+452:22-452:27
     Bool
-SampleMaterial.lc 453:20-453:21
+453:20-453:21
     _b
-SampleMaterial.lc 454:30-454:35
+454:30-454:35
     Bool
-SampleMaterial.lc 455:23-455:28
+455:23-455:28
     Bool
-SampleMaterial.lc 456:20-456:33
+456:20-456:33
     CullType
-SampleMaterial.lc 457:30-457:32
+457:30-457:32
     forall a . [a]
-SampleMaterial.lc 458:25-458:30
+458:25-458:30
     Bool
-SampleMaterial.lc 459:29-459:34
+459:29-459:34
     Bool
-SampleMaterial.lc 461:13-487:14
+461:13-487:14
     [StageAttrs]
-SampleMaterial.lc 461:15-461:25
+461:15-461:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -6193,70 +6193,70 @@ SampleMaterial.lc 461:15-461:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 461:15-462:36
+461:15-462:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 461:15-463:50
+461:15-463:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 461:15-464:42
+461:15-464:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 461:15-465:36
+461:15-465:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 461:15-466:31
+461:15-466:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 461:15-467:84
+461:15-467:84
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 461:15-468:38
+461:15-468:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 461:15-469:41
+461:15-469:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 461:15-470:40
+461:15-470:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 461:15-471:46
+461:15-471:46
     String -> StageAttrs
-SampleMaterial.lc 461:15-473:18
+461:15-473:18
     StageAttrs
-SampleMaterial.lc 462:29-462:36
+462:29-462:36
     forall a . Maybe a
-SampleMaterial.lc 463:30-463:50
+463:30-463:50
     RGBGen
-SampleMaterial.lc 464:32-464:42
+464:32-464:42
     AlphaGen
-SampleMaterial.lc 465:29-465:36
+465:29-465:36
     TCGen
-SampleMaterial.lc 466:29-466:31
+466:29-466:31
     forall a . [a]
-SampleMaterial.lc 467:31-467:37
+467:31-467:37
     String -> StageTexture
-SampleMaterial.lc 467:31-467:84
+467:31-467:84
     StageTexture
-SampleMaterial.lc 467:38-467:84
+467:38-467:84
     String
-SampleMaterial.lc 468:34-468:38
+468:34-468:38
     Bool
-SampleMaterial.lc 469:33-469:41
+469:33-469:41
     DepthFunction
-SampleMaterial.lc 470:33-470:40
+470:33-470:40
     forall a . Maybe a
-SampleMaterial.lc 471:41-471:46
+471:41-471:46
     Bool
-SampleMaterial.lc 472:38-472:54
+472:38-472:54
     String
-SampleMaterial.lc 474:15-474:25
+474:15-474:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -6264,82 +6264,82 @@ SampleMaterial.lc 474:15-474:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 474:15-475:57
+474:15-475:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 474:15-476:50
+474:15-476:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 474:15-477:42
+474:15-477:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 474:15-478:40
+474:15-478:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 474:15-479:31
+474:15-479:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 474:15-480:42
+474:15-480:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 474:15-481:38
+474:15-481:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 474:15-482:41
+474:15-482:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 474:15-483:40
+474:15-483:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 474:15-484:46
+474:15-484:46
     String -> StageAttrs
-SampleMaterial.lc 474:15-486:18
+474:15-486:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 475:29-475:33
+475:29-475:33
     forall a . a -> Maybe a
-SampleMaterial.lc 475:29-475:57
+475:29-475:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 475:34-475:57
+475:34-475:57
     (Blending', Blending')
-SampleMaterial.lc 475:36-475:46
+475:36-475:46
     Blending'
-SampleMaterial.lc 475:49-475:55
+475:49-475:55
     Blending' | ((Blending'))
-SampleMaterial.lc 476:30-476:50
+476:30-476:50
     RGBGen
-SampleMaterial.lc 477:32-477:42
+477:32-477:42
     AlphaGen
-SampleMaterial.lc 478:29-478:40
+478:29-478:40
     TCGen
-SampleMaterial.lc 479:29-479:31
+479:29-479:31
     forall a . [a]
-SampleMaterial.lc 480:31-480:42
+480:31-480:42
     StageTexture
-SampleMaterial.lc 481:34-481:38
+481:34-481:38
     Bool
-SampleMaterial.lc 482:33-482:41
+482:33-482:41
     DepthFunction
-SampleMaterial.lc 483:33-483:40
+483:33-483:40
     forall a . Maybe a
-SampleMaterial.lc 484:41-484:46
+484:41-484:46
     Bool
-SampleMaterial.lc 485:38-485:54
+485:38-485:54
     String
-SampleMaterial.lc 488:21-488:26
+488:21-488:26
     Bool
-SampleMaterial.lc 491:5-533:6
+491:5-533:6
     (String, CommonAttrs)
-SampleMaterial.lc 491:5-2182:6
+491:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 491:7-491:53
+491:7-491:53
     String
-SampleMaterial.lc 492:7-492:18
+492:7-492:18
     ()
       -> ()
         -> Bool
@@ -6347,68 +6347,68 @@ SampleMaterial.lc 492:7-492:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 492:7-493:26
+492:7-493:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 492:7-494:26
+492:7-494:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 492:7-495:27
+492:7-495:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 492:7-496:21
+492:7-496:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 492:7-497:35
+492:7-497:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 492:7-498:28
+492:7-498:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 492:7-499:33
+492:7-499:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 492:7-500:32
+492:7-500:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 492:7-501:30
+492:7-501:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 492:7-502:34
+492:7-502:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 492:7-530:14
+492:7-530:14
     Bool -> CommonAttrs
-SampleMaterial.lc 492:7-532:10
+492:7-532:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 493:24-493:26
+493:24-493:26
     ()
-SampleMaterial.lc 494:24-494:26
+494:24-494:26
     ()
-SampleMaterial.lc 495:22-495:27
+495:22-495:27
     Bool
-SampleMaterial.lc 496:20-496:21
+496:20-496:21
     _b
-SampleMaterial.lc 497:30-497:35
+497:30-497:35
     Bool
-SampleMaterial.lc 498:23-498:28
+498:23-498:28
     Bool
-SampleMaterial.lc 499:20-499:33
+499:20-499:33
     CullType
-SampleMaterial.lc 500:30-500:32
+500:30-500:32
     forall a . [a]
-SampleMaterial.lc 501:25-501:30
+501:25-501:30
     Bool
-SampleMaterial.lc 502:29-502:34
+502:29-502:34
     Bool
-SampleMaterial.lc 504:13-530:14
+504:13-530:14
     [StageAttrs]
-SampleMaterial.lc 504:15-504:25
+504:15-504:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -6416,70 +6416,70 @@ SampleMaterial.lc 504:15-504:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 504:15-505:36
+504:15-505:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 504:15-506:50
+504:15-506:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 504:15-507:42
+504:15-507:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 504:15-508:36
+504:15-508:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 504:15-509:31
+504:15-509:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 504:15-510:84
+504:15-510:84
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 504:15-511:38
+504:15-511:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 504:15-512:41
+504:15-512:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 504:15-513:40
+504:15-513:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 504:15-514:46
+504:15-514:46
     String -> StageAttrs
-SampleMaterial.lc 504:15-516:18
+504:15-516:18
     StageAttrs
-SampleMaterial.lc 505:29-505:36
+505:29-505:36
     forall a . Maybe a
-SampleMaterial.lc 506:30-506:50
+506:30-506:50
     RGBGen
-SampleMaterial.lc 507:32-507:42
+507:32-507:42
     AlphaGen
-SampleMaterial.lc 508:29-508:36
+508:29-508:36
     TCGen
-SampleMaterial.lc 509:29-509:31
+509:29-509:31
     forall a . [a]
-SampleMaterial.lc 510:31-510:37
+510:31-510:37
     String -> StageTexture
-SampleMaterial.lc 510:31-510:84
+510:31-510:84
     StageTexture
-SampleMaterial.lc 510:38-510:84
+510:38-510:84
     String
-SampleMaterial.lc 511:34-511:38
+511:34-511:38
     Bool
-SampleMaterial.lc 512:33-512:41
+512:33-512:41
     DepthFunction
-SampleMaterial.lc 513:33-513:40
+513:33-513:40
     forall a . Maybe a
-SampleMaterial.lc 514:41-514:46
+514:41-514:46
     Bool
-SampleMaterial.lc 515:38-515:54
+515:38-515:54
     String
-SampleMaterial.lc 517:15-517:25
+517:15-517:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -6487,82 +6487,82 @@ SampleMaterial.lc 517:15-517:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 517:15-518:57
+517:15-518:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 517:15-519:50
+517:15-519:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 517:15-520:42
+517:15-520:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 517:15-521:40
+517:15-521:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 517:15-522:31
+517:15-522:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 517:15-523:42
+517:15-523:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 517:15-524:38
+517:15-524:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 517:15-525:41
+517:15-525:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 517:15-526:40
+517:15-526:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 517:15-527:46
+517:15-527:46
     String -> StageAttrs
-SampleMaterial.lc 517:15-529:18
+517:15-529:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 518:29-518:33
+518:29-518:33
     forall a . a -> Maybe a
-SampleMaterial.lc 518:29-518:57
+518:29-518:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 518:34-518:57
+518:34-518:57
     (Blending', Blending')
-SampleMaterial.lc 518:36-518:46
+518:36-518:46
     Blending'
-SampleMaterial.lc 518:49-518:55
+518:49-518:55
     Blending' | ((Blending'))
-SampleMaterial.lc 519:30-519:50
+519:30-519:50
     RGBGen
-SampleMaterial.lc 520:32-520:42
+520:32-520:42
     AlphaGen
-SampleMaterial.lc 521:29-521:40
+521:29-521:40
     TCGen
-SampleMaterial.lc 522:29-522:31
+522:29-522:31
     forall a . [a]
-SampleMaterial.lc 523:31-523:42
+523:31-523:42
     StageTexture
-SampleMaterial.lc 524:34-524:38
+524:34-524:38
     Bool
-SampleMaterial.lc 525:33-525:41
+525:33-525:41
     DepthFunction
-SampleMaterial.lc 526:33-526:40
+526:33-526:40
     forall a . Maybe a
-SampleMaterial.lc 527:41-527:46
+527:41-527:46
     Bool
-SampleMaterial.lc 528:38-528:54
+528:38-528:54
     String
-SampleMaterial.lc 531:21-531:26
+531:21-531:26
     Bool
-SampleMaterial.lc 534:5-576:6
+534:5-576:6
     (String, CommonAttrs)
-SampleMaterial.lc 534:5-2182:6
+534:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 534:7-534:42
+534:7-534:42
     String
-SampleMaterial.lc 535:7-535:18
+535:7-535:18
     ()
       -> ()
         -> Bool
@@ -6570,68 +6570,68 @@ SampleMaterial.lc 535:7-535:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 535:7-536:26
+535:7-536:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 535:7-537:26
+535:7-537:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 535:7-538:27
+535:7-538:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 535:7-539:21
+535:7-539:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 535:7-540:35
+535:7-540:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 535:7-541:28
+535:7-541:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 535:7-542:33
+535:7-542:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 535:7-543:32
+535:7-543:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 535:7-544:30
+535:7-544:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 535:7-545:34
+535:7-545:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 535:7-573:14
+535:7-573:14
     Bool -> CommonAttrs
-SampleMaterial.lc 535:7-575:10
+535:7-575:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 536:24-536:26
+536:24-536:26
     ()
-SampleMaterial.lc 537:24-537:26
+537:24-537:26
     ()
-SampleMaterial.lc 538:22-538:27
+538:22-538:27
     Bool
-SampleMaterial.lc 539:20-539:21
+539:20-539:21
     _b
-SampleMaterial.lc 540:30-540:35
+540:30-540:35
     Bool
-SampleMaterial.lc 541:23-541:28
+541:23-541:28
     Bool
-SampleMaterial.lc 542:20-542:33
+542:20-542:33
     CullType
-SampleMaterial.lc 543:30-543:32
+543:30-543:32
     forall a . [a]
-SampleMaterial.lc 544:25-544:30
+544:25-544:30
     Bool
-SampleMaterial.lc 545:29-545:34
+545:29-545:34
     Bool
-SampleMaterial.lc 547:13-573:14
+547:13-573:14
     [StageAttrs]
-SampleMaterial.lc 547:15-547:25
+547:15-547:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -6639,70 +6639,70 @@ SampleMaterial.lc 547:15-547:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 547:15-548:36
+547:15-548:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 547:15-549:50
+547:15-549:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 547:15-550:42
+547:15-550:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 547:15-551:36
+547:15-551:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 547:15-552:31
+547:15-552:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 547:15-553:73
+547:15-553:73
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 547:15-554:38
+547:15-554:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 547:15-555:41
+547:15-555:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 547:15-556:40
+547:15-556:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 547:15-557:46
+547:15-557:46
     String -> StageAttrs
-SampleMaterial.lc 547:15-559:18
+547:15-559:18
     StageAttrs
-SampleMaterial.lc 548:29-548:36
+548:29-548:36
     forall a . Maybe a
-SampleMaterial.lc 549:30-549:50
+549:30-549:50
     RGBGen
-SampleMaterial.lc 550:32-550:42
+550:32-550:42
     AlphaGen
-SampleMaterial.lc 551:29-551:36
+551:29-551:36
     TCGen
-SampleMaterial.lc 552:29-552:31
+552:29-552:31
     forall a . [a]
-SampleMaterial.lc 553:31-553:37
+553:31-553:37
     String -> StageTexture
-SampleMaterial.lc 553:31-553:73
+553:31-553:73
     StageTexture
-SampleMaterial.lc 553:38-553:73
+553:38-553:73
     String
-SampleMaterial.lc 554:34-554:38
+554:34-554:38
     Bool
-SampleMaterial.lc 555:33-555:41
+555:33-555:41
     DepthFunction
-SampleMaterial.lc 556:33-556:40
+556:33-556:40
     forall a . Maybe a
-SampleMaterial.lc 557:41-557:46
+557:41-557:46
     Bool
-SampleMaterial.lc 558:38-558:54
+558:38-558:54
     String
-SampleMaterial.lc 560:15-560:25
+560:15-560:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -6710,82 +6710,82 @@ SampleMaterial.lc 560:15-560:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 560:15-561:57
+560:15-561:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 560:15-562:50
+560:15-562:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 560:15-563:42
+560:15-563:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 560:15-564:40
+560:15-564:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 560:15-565:31
+560:15-565:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 560:15-566:42
+560:15-566:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 560:15-567:38
+560:15-567:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 560:15-568:41
+560:15-568:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 560:15-569:40
+560:15-569:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 560:15-570:46
+560:15-570:46
     String -> StageAttrs
-SampleMaterial.lc 560:15-572:18
+560:15-572:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 561:29-561:33
+561:29-561:33
     forall a . a -> Maybe a
-SampleMaterial.lc 561:29-561:57
+561:29-561:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 561:34-561:57
+561:34-561:57
     (Blending', Blending')
-SampleMaterial.lc 561:36-561:46
+561:36-561:46
     Blending'
-SampleMaterial.lc 561:49-561:55
+561:49-561:55
     Blending' | ((Blending'))
-SampleMaterial.lc 562:30-562:50
+562:30-562:50
     RGBGen
-SampleMaterial.lc 563:32-563:42
+563:32-563:42
     AlphaGen
-SampleMaterial.lc 564:29-564:40
+564:29-564:40
     TCGen
-SampleMaterial.lc 565:29-565:31
+565:29-565:31
     forall a . [a]
-SampleMaterial.lc 566:31-566:42
+566:31-566:42
     StageTexture
-SampleMaterial.lc 567:34-567:38
+567:34-567:38
     Bool
-SampleMaterial.lc 568:33-568:41
+568:33-568:41
     DepthFunction
-SampleMaterial.lc 569:33-569:40
+569:33-569:40
     forall a . Maybe a
-SampleMaterial.lc 570:41-570:46
+570:41-570:46
     Bool
-SampleMaterial.lc 571:38-571:54
+571:38-571:54
     String
-SampleMaterial.lc 574:21-574:26
+574:21-574:26
     Bool
-SampleMaterial.lc 577:5-619:6
+577:5-619:6
     (String, CommonAttrs)
-SampleMaterial.lc 577:5-2182:6
+577:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 577:7-577:42
+577:7-577:42
     String
-SampleMaterial.lc 578:7-578:18
+578:7-578:18
     ()
       -> ()
         -> Bool
@@ -6793,68 +6793,68 @@ SampleMaterial.lc 578:7-578:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 578:7-579:26
+578:7-579:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 578:7-580:26
+578:7-580:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 578:7-581:27
+578:7-581:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 578:7-582:21
+578:7-582:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 578:7-583:35
+578:7-583:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 578:7-584:28
+578:7-584:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 578:7-585:33
+578:7-585:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 578:7-586:32
+578:7-586:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 578:7-587:30
+578:7-587:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 578:7-588:34
+578:7-588:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 578:7-616:14
+578:7-616:14
     Bool -> CommonAttrs
-SampleMaterial.lc 578:7-618:10
+578:7-618:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 579:24-579:26
+579:24-579:26
     ()
-SampleMaterial.lc 580:24-580:26
+580:24-580:26
     ()
-SampleMaterial.lc 581:22-581:27
+581:22-581:27
     Bool
-SampleMaterial.lc 582:20-582:21
+582:20-582:21
     _b
-SampleMaterial.lc 583:30-583:35
+583:30-583:35
     Bool
-SampleMaterial.lc 584:23-584:28
+584:23-584:28
     Bool
-SampleMaterial.lc 585:20-585:33
+585:20-585:33
     CullType
-SampleMaterial.lc 586:30-586:32
+586:30-586:32
     forall a . [a]
-SampleMaterial.lc 587:25-587:30
+587:25-587:30
     Bool
-SampleMaterial.lc 588:29-588:34
+588:29-588:34
     Bool
-SampleMaterial.lc 590:13-616:14
+590:13-616:14
     [StageAttrs]
-SampleMaterial.lc 590:15-590:25
+590:15-590:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -6862,70 +6862,70 @@ SampleMaterial.lc 590:15-590:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 590:15-591:36
+590:15-591:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 590:15-592:50
+590:15-592:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 590:15-593:42
+590:15-593:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 590:15-594:36
+590:15-594:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 590:15-595:31
+590:15-595:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 590:15-596:73
+590:15-596:73
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 590:15-597:38
+590:15-597:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 590:15-598:41
+590:15-598:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 590:15-599:40
+590:15-599:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 590:15-600:46
+590:15-600:46
     String -> StageAttrs
-SampleMaterial.lc 590:15-602:18
+590:15-602:18
     StageAttrs
-SampleMaterial.lc 591:29-591:36
+591:29-591:36
     forall a . Maybe a
-SampleMaterial.lc 592:30-592:50
+592:30-592:50
     RGBGen
-SampleMaterial.lc 593:32-593:42
+593:32-593:42
     AlphaGen
-SampleMaterial.lc 594:29-594:36
+594:29-594:36
     TCGen
-SampleMaterial.lc 595:29-595:31
+595:29-595:31
     forall a . [a]
-SampleMaterial.lc 596:31-596:37
+596:31-596:37
     String -> StageTexture
-SampleMaterial.lc 596:31-596:73
+596:31-596:73
     StageTexture
-SampleMaterial.lc 596:38-596:73
+596:38-596:73
     String
-SampleMaterial.lc 597:34-597:38
+597:34-597:38
     Bool
-SampleMaterial.lc 598:33-598:41
+598:33-598:41
     DepthFunction
-SampleMaterial.lc 599:33-599:40
+599:33-599:40
     forall a . Maybe a
-SampleMaterial.lc 600:41-600:46
+600:41-600:46
     Bool
-SampleMaterial.lc 601:38-601:54
+601:38-601:54
     String
-SampleMaterial.lc 603:15-603:25
+603:15-603:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -6933,82 +6933,82 @@ SampleMaterial.lc 603:15-603:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 603:15-604:57
+603:15-604:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 603:15-605:50
+603:15-605:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 603:15-606:42
+603:15-606:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 603:15-607:40
+603:15-607:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 603:15-608:31
+603:15-608:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 603:15-609:42
+603:15-609:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 603:15-610:38
+603:15-610:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 603:15-611:41
+603:15-611:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 603:15-612:40
+603:15-612:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 603:15-613:46
+603:15-613:46
     String -> StageAttrs
-SampleMaterial.lc 603:15-615:18
+603:15-615:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 604:29-604:33
+604:29-604:33
     forall a . a -> Maybe a
-SampleMaterial.lc 604:29-604:57
+604:29-604:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 604:34-604:57
+604:34-604:57
     (Blending', Blending')
-SampleMaterial.lc 604:36-604:46
+604:36-604:46
     Blending'
-SampleMaterial.lc 604:49-604:55
+604:49-604:55
     Blending' | ((Blending'))
-SampleMaterial.lc 605:30-605:50
+605:30-605:50
     RGBGen
-SampleMaterial.lc 606:32-606:42
+606:32-606:42
     AlphaGen
-SampleMaterial.lc 607:29-607:40
+607:29-607:40
     TCGen
-SampleMaterial.lc 608:29-608:31
+608:29-608:31
     forall a . [a]
-SampleMaterial.lc 609:31-609:42
+609:31-609:42
     StageTexture
-SampleMaterial.lc 610:34-610:38
+610:34-610:38
     Bool
-SampleMaterial.lc 611:33-611:41
+611:33-611:41
     DepthFunction
-SampleMaterial.lc 612:33-612:40
+612:33-612:40
     forall a . Maybe a
-SampleMaterial.lc 613:41-613:46
+613:41-613:46
     Bool
-SampleMaterial.lc 614:38-614:54
+614:38-614:54
     String
-SampleMaterial.lc 617:21-617:26
+617:21-617:26
     Bool
-SampleMaterial.lc 620:5-662:6
+620:5-662:6
     (String, CommonAttrs)
-SampleMaterial.lc 620:5-2182:6
+620:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 620:7-620:42
+620:7-620:42
     String
-SampleMaterial.lc 621:7-621:18
+621:7-621:18
     ()
       -> ()
         -> Bool
@@ -7016,68 +7016,68 @@ SampleMaterial.lc 621:7-621:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 621:7-622:26
+621:7-622:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 621:7-623:26
+621:7-623:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 621:7-624:27
+621:7-624:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 621:7-625:21
+621:7-625:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 621:7-626:35
+621:7-626:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 621:7-627:28
+621:7-627:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 621:7-628:33
+621:7-628:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 621:7-629:32
+621:7-629:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 621:7-630:30
+621:7-630:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 621:7-631:34
+621:7-631:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 621:7-659:14
+621:7-659:14
     Bool -> CommonAttrs
-SampleMaterial.lc 621:7-661:10
+621:7-661:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 622:24-622:26
+622:24-622:26
     ()
-SampleMaterial.lc 623:24-623:26
+623:24-623:26
     ()
-SampleMaterial.lc 624:22-624:27
+624:22-624:27
     Bool
-SampleMaterial.lc 625:20-625:21
+625:20-625:21
     _b
-SampleMaterial.lc 626:30-626:35
+626:30-626:35
     Bool
-SampleMaterial.lc 627:23-627:28
+627:23-627:28
     Bool
-SampleMaterial.lc 628:20-628:33
+628:20-628:33
     CullType
-SampleMaterial.lc 629:30-629:32
+629:30-629:32
     forall a . [a]
-SampleMaterial.lc 630:25-630:30
+630:25-630:30
     Bool
-SampleMaterial.lc 631:29-631:34
+631:29-631:34
     Bool
-SampleMaterial.lc 633:13-659:14
+633:13-659:14
     [StageAttrs]
-SampleMaterial.lc 633:15-633:25
+633:15-633:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -7085,70 +7085,70 @@ SampleMaterial.lc 633:15-633:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 633:15-634:36
+633:15-634:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 633:15-635:50
+633:15-635:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 633:15-636:42
+633:15-636:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 633:15-637:36
+633:15-637:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 633:15-638:31
+633:15-638:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 633:15-639:73
+633:15-639:73
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 633:15-640:38
+633:15-640:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 633:15-641:41
+633:15-641:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 633:15-642:40
+633:15-642:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 633:15-643:46
+633:15-643:46
     String -> StageAttrs
-SampleMaterial.lc 633:15-645:18
+633:15-645:18
     StageAttrs
-SampleMaterial.lc 634:29-634:36
+634:29-634:36
     forall a . Maybe a
-SampleMaterial.lc 635:30-635:50
+635:30-635:50
     RGBGen
-SampleMaterial.lc 636:32-636:42
+636:32-636:42
     AlphaGen
-SampleMaterial.lc 637:29-637:36
+637:29-637:36
     TCGen
-SampleMaterial.lc 638:29-638:31
+638:29-638:31
     forall a . [a]
-SampleMaterial.lc 639:31-639:37
+639:31-639:37
     String -> StageTexture
-SampleMaterial.lc 639:31-639:73
+639:31-639:73
     StageTexture
-SampleMaterial.lc 639:38-639:73
+639:38-639:73
     String
-SampleMaterial.lc 640:34-640:38
+640:34-640:38
     Bool
-SampleMaterial.lc 641:33-641:41
+641:33-641:41
     DepthFunction
-SampleMaterial.lc 642:33-642:40
+642:33-642:40
     forall a . Maybe a
-SampleMaterial.lc 643:41-643:46
+643:41-643:46
     Bool
-SampleMaterial.lc 644:38-644:54
+644:38-644:54
     String
-SampleMaterial.lc 646:15-646:25
+646:15-646:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -7156,82 +7156,82 @@ SampleMaterial.lc 646:15-646:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 646:15-647:57
+646:15-647:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 646:15-648:50
+646:15-648:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 646:15-649:42
+646:15-649:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 646:15-650:40
+646:15-650:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 646:15-651:31
+646:15-651:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 646:15-652:42
+646:15-652:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 646:15-653:38
+646:15-653:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 646:15-654:41
+646:15-654:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 646:15-655:40
+646:15-655:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 646:15-656:46
+646:15-656:46
     String -> StageAttrs
-SampleMaterial.lc 646:15-658:18
+646:15-658:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 647:29-647:33
+647:29-647:33
     forall a . a -> Maybe a
-SampleMaterial.lc 647:29-647:57
+647:29-647:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 647:34-647:57
+647:34-647:57
     (Blending', Blending')
-SampleMaterial.lc 647:36-647:46
+647:36-647:46
     Blending'
-SampleMaterial.lc 647:49-647:55
+647:49-647:55
     Blending' | ((Blending'))
-SampleMaterial.lc 648:30-648:50
+648:30-648:50
     RGBGen
-SampleMaterial.lc 649:32-649:42
+649:32-649:42
     AlphaGen
-SampleMaterial.lc 650:29-650:40
+650:29-650:40
     TCGen
-SampleMaterial.lc 651:29-651:31
+651:29-651:31
     forall a . [a]
-SampleMaterial.lc 652:31-652:42
+652:31-652:42
     StageTexture
-SampleMaterial.lc 653:34-653:38
+653:34-653:38
     Bool
-SampleMaterial.lc 654:33-654:41
+654:33-654:41
     DepthFunction
-SampleMaterial.lc 655:33-655:40
+655:33-655:40
     forall a . Maybe a
-SampleMaterial.lc 656:41-656:46
+656:41-656:46
     Bool
-SampleMaterial.lc 657:38-657:54
+657:38-657:54
     String
-SampleMaterial.lc 660:21-660:26
+660:21-660:26
     Bool
-SampleMaterial.lc 663:5-705:6
+663:5-705:6
     (String, CommonAttrs)
-SampleMaterial.lc 663:5-2182:6
+663:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 663:7-663:42
+663:7-663:42
     String
-SampleMaterial.lc 664:7-664:18
+664:7-664:18
     ()
       -> ()
         -> Bool
@@ -7239,68 +7239,68 @@ SampleMaterial.lc 664:7-664:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 664:7-665:26
+664:7-665:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 664:7-666:26
+664:7-666:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 664:7-667:27
+664:7-667:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 664:7-668:21
+664:7-668:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 664:7-669:35
+664:7-669:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 664:7-670:28
+664:7-670:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 664:7-671:33
+664:7-671:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 664:7-672:32
+664:7-672:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 664:7-673:30
+664:7-673:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 664:7-674:34
+664:7-674:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 664:7-702:14
+664:7-702:14
     Bool -> CommonAttrs
-SampleMaterial.lc 664:7-704:10
+664:7-704:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 665:24-665:26
+665:24-665:26
     ()
-SampleMaterial.lc 666:24-666:26
+666:24-666:26
     ()
-SampleMaterial.lc 667:22-667:27
+667:22-667:27
     Bool
-SampleMaterial.lc 668:20-668:21
+668:20-668:21
     _b
-SampleMaterial.lc 669:30-669:35
+669:30-669:35
     Bool
-SampleMaterial.lc 670:23-670:28
+670:23-670:28
     Bool
-SampleMaterial.lc 671:20-671:33
+671:20-671:33
     CullType
-SampleMaterial.lc 672:30-672:32
+672:30-672:32
     forall a . [a]
-SampleMaterial.lc 673:25-673:30
+673:25-673:30
     Bool
-SampleMaterial.lc 674:29-674:34
+674:29-674:34
     Bool
-SampleMaterial.lc 676:13-702:14
+676:13-702:14
     [StageAttrs]
-SampleMaterial.lc 676:15-676:25
+676:15-676:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -7308,70 +7308,70 @@ SampleMaterial.lc 676:15-676:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 676:15-677:36
+676:15-677:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 676:15-678:50
+676:15-678:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 676:15-679:42
+676:15-679:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 676:15-680:36
+676:15-680:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 676:15-681:31
+676:15-681:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 676:15-682:73
+676:15-682:73
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 676:15-683:38
+676:15-683:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 676:15-684:41
+676:15-684:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 676:15-685:40
+676:15-685:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 676:15-686:46
+676:15-686:46
     String -> StageAttrs
-SampleMaterial.lc 676:15-688:18
+676:15-688:18
     StageAttrs
-SampleMaterial.lc 677:29-677:36
+677:29-677:36
     forall a . Maybe a
-SampleMaterial.lc 678:30-678:50
+678:30-678:50
     RGBGen
-SampleMaterial.lc 679:32-679:42
+679:32-679:42
     AlphaGen
-SampleMaterial.lc 680:29-680:36
+680:29-680:36
     TCGen
-SampleMaterial.lc 681:29-681:31
+681:29-681:31
     forall a . [a]
-SampleMaterial.lc 682:31-682:37
+682:31-682:37
     String -> StageTexture
-SampleMaterial.lc 682:31-682:73
+682:31-682:73
     StageTexture
-SampleMaterial.lc 682:38-682:73
+682:38-682:73
     String
-SampleMaterial.lc 683:34-683:38
+683:34-683:38
     Bool
-SampleMaterial.lc 684:33-684:41
+684:33-684:41
     DepthFunction
-SampleMaterial.lc 685:33-685:40
+685:33-685:40
     forall a . Maybe a
-SampleMaterial.lc 686:41-686:46
+686:41-686:46
     Bool
-SampleMaterial.lc 687:38-687:54
+687:38-687:54
     String
-SampleMaterial.lc 689:15-689:25
+689:15-689:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -7379,82 +7379,82 @@ SampleMaterial.lc 689:15-689:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 689:15-690:57
+689:15-690:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 689:15-691:50
+689:15-691:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 689:15-692:42
+689:15-692:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 689:15-693:40
+689:15-693:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 689:15-694:31
+689:15-694:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 689:15-695:42
+689:15-695:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 689:15-696:38
+689:15-696:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 689:15-697:41
+689:15-697:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 689:15-698:40
+689:15-698:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 689:15-699:46
+689:15-699:46
     String -> StageAttrs
-SampleMaterial.lc 689:15-701:18
+689:15-701:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 690:29-690:33
+690:29-690:33
     forall a . a -> Maybe a
-SampleMaterial.lc 690:29-690:57
+690:29-690:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 690:34-690:57
+690:34-690:57
     (Blending', Blending')
-SampleMaterial.lc 690:36-690:46
+690:36-690:46
     Blending'
-SampleMaterial.lc 690:49-690:55
+690:49-690:55
     Blending' | ((Blending'))
-SampleMaterial.lc 691:30-691:50
+691:30-691:50
     RGBGen
-SampleMaterial.lc 692:32-692:42
+692:32-692:42
     AlphaGen
-SampleMaterial.lc 693:29-693:40
+693:29-693:40
     TCGen
-SampleMaterial.lc 694:29-694:31
+694:29-694:31
     forall a . [a]
-SampleMaterial.lc 695:31-695:42
+695:31-695:42
     StageTexture
-SampleMaterial.lc 696:34-696:38
+696:34-696:38
     Bool
-SampleMaterial.lc 697:33-697:41
+697:33-697:41
     DepthFunction
-SampleMaterial.lc 698:33-698:40
+698:33-698:40
     forall a . Maybe a
-SampleMaterial.lc 699:41-699:46
+699:41-699:46
     Bool
-SampleMaterial.lc 700:38-700:54
+700:38-700:54
     String
-SampleMaterial.lc 703:21-703:26
+703:21-703:26
     Bool
-SampleMaterial.lc 706:5-748:6
+706:5-748:6
     (String, CommonAttrs)
-SampleMaterial.lc 706:5-2182:6
+706:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 706:7-706:42
+706:7-706:42
     String
-SampleMaterial.lc 707:7-707:18
+707:7-707:18
     ()
       -> ()
         -> Bool
@@ -7462,68 +7462,68 @@ SampleMaterial.lc 707:7-707:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 707:7-708:26
+707:7-708:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 707:7-709:26
+707:7-709:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 707:7-710:27
+707:7-710:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 707:7-711:21
+707:7-711:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 707:7-712:35
+707:7-712:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 707:7-713:28
+707:7-713:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 707:7-714:33
+707:7-714:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 707:7-715:32
+707:7-715:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 707:7-716:30
+707:7-716:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 707:7-717:34
+707:7-717:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 707:7-745:14
+707:7-745:14
     Bool -> CommonAttrs
-SampleMaterial.lc 707:7-747:10
+707:7-747:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 708:24-708:26
+708:24-708:26
     ()
-SampleMaterial.lc 709:24-709:26
+709:24-709:26
     ()
-SampleMaterial.lc 710:22-710:27
+710:22-710:27
     Bool
-SampleMaterial.lc 711:20-711:21
+711:20-711:21
     _b
-SampleMaterial.lc 712:30-712:35
+712:30-712:35
     Bool
-SampleMaterial.lc 713:23-713:28
+713:23-713:28
     Bool
-SampleMaterial.lc 714:20-714:33
+714:20-714:33
     CullType
-SampleMaterial.lc 715:30-715:32
+715:30-715:32
     forall a . [a]
-SampleMaterial.lc 716:25-716:30
+716:25-716:30
     Bool
-SampleMaterial.lc 717:29-717:34
+717:29-717:34
     Bool
-SampleMaterial.lc 719:13-745:14
+719:13-745:14
     [StageAttrs]
-SampleMaterial.lc 719:15-719:25
+719:15-719:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -7531,70 +7531,70 @@ SampleMaterial.lc 719:15-719:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 719:15-720:36
+719:15-720:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 719:15-721:50
+719:15-721:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 719:15-722:42
+719:15-722:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 719:15-723:36
+719:15-723:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 719:15-724:31
+719:15-724:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 719:15-725:73
+719:15-725:73
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 719:15-726:38
+719:15-726:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 719:15-727:41
+719:15-727:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 719:15-728:40
+719:15-728:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 719:15-729:46
+719:15-729:46
     String -> StageAttrs
-SampleMaterial.lc 719:15-731:18
+719:15-731:18
     StageAttrs
-SampleMaterial.lc 720:29-720:36
+720:29-720:36
     forall a . Maybe a
-SampleMaterial.lc 721:30-721:50
+721:30-721:50
     RGBGen
-SampleMaterial.lc 722:32-722:42
+722:32-722:42
     AlphaGen
-SampleMaterial.lc 723:29-723:36
+723:29-723:36
     TCGen
-SampleMaterial.lc 724:29-724:31
+724:29-724:31
     forall a . [a]
-SampleMaterial.lc 725:31-725:37
+725:31-725:37
     String -> StageTexture
-SampleMaterial.lc 725:31-725:73
+725:31-725:73
     StageTexture
-SampleMaterial.lc 725:38-725:73
+725:38-725:73
     String
-SampleMaterial.lc 726:34-726:38
+726:34-726:38
     Bool
-SampleMaterial.lc 727:33-727:41
+727:33-727:41
     DepthFunction
-SampleMaterial.lc 728:33-728:40
+728:33-728:40
     forall a . Maybe a
-SampleMaterial.lc 729:41-729:46
+729:41-729:46
     Bool
-SampleMaterial.lc 730:38-730:54
+730:38-730:54
     String
-SampleMaterial.lc 732:15-732:25
+732:15-732:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -7602,82 +7602,82 @@ SampleMaterial.lc 732:15-732:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 732:15-733:57
+732:15-733:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 732:15-734:50
+732:15-734:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 732:15-735:42
+732:15-735:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 732:15-736:40
+732:15-736:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 732:15-737:31
+732:15-737:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 732:15-738:42
+732:15-738:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 732:15-739:38
+732:15-739:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 732:15-740:41
+732:15-740:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 732:15-741:40
+732:15-741:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 732:15-742:46
+732:15-742:46
     String -> StageAttrs
-SampleMaterial.lc 732:15-744:18
+732:15-744:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 733:29-733:33
+733:29-733:33
     forall a . a -> Maybe a
-SampleMaterial.lc 733:29-733:57
+733:29-733:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 733:34-733:57
+733:34-733:57
     (Blending', Blending')
-SampleMaterial.lc 733:36-733:46
+733:36-733:46
     Blending'
-SampleMaterial.lc 733:49-733:55
+733:49-733:55
     Blending' | ((Blending'))
-SampleMaterial.lc 734:30-734:50
+734:30-734:50
     RGBGen
-SampleMaterial.lc 735:32-735:42
+735:32-735:42
     AlphaGen
-SampleMaterial.lc 736:29-736:40
+736:29-736:40
     TCGen
-SampleMaterial.lc 737:29-737:31
+737:29-737:31
     forall a . [a]
-SampleMaterial.lc 738:31-738:42
+738:31-738:42
     StageTexture
-SampleMaterial.lc 739:34-739:38
+739:34-739:38
     Bool
-SampleMaterial.lc 740:33-740:41
+740:33-740:41
     DepthFunction
-SampleMaterial.lc 741:33-741:40
+741:33-741:40
     forall a . Maybe a
-SampleMaterial.lc 742:41-742:46
+742:41-742:46
     Bool
-SampleMaterial.lc 743:38-743:54
+743:38-743:54
     String
-SampleMaterial.lc 746:21-746:26
+746:21-746:26
     Bool
-SampleMaterial.lc 749:5-791:6
+749:5-791:6
     (String, CommonAttrs)
-SampleMaterial.lc 749:5-2182:6
+749:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 749:7-749:42
+749:7-749:42
     String
-SampleMaterial.lc 750:7-750:18
+750:7-750:18
     ()
       -> ()
         -> Bool
@@ -7685,68 +7685,68 @@ SampleMaterial.lc 750:7-750:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 750:7-751:26
+750:7-751:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 750:7-752:26
+750:7-752:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 750:7-753:27
+750:7-753:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 750:7-754:21
+750:7-754:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 750:7-755:35
+750:7-755:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 750:7-756:28
+750:7-756:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 750:7-757:33
+750:7-757:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 750:7-758:32
+750:7-758:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 750:7-759:30
+750:7-759:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 750:7-760:34
+750:7-760:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 750:7-788:14
+750:7-788:14
     Bool -> CommonAttrs
-SampleMaterial.lc 750:7-790:10
+750:7-790:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 751:24-751:26
+751:24-751:26
     ()
-SampleMaterial.lc 752:24-752:26
+752:24-752:26
     ()
-SampleMaterial.lc 753:22-753:27
+753:22-753:27
     Bool
-SampleMaterial.lc 754:20-754:21
+754:20-754:21
     _b
-SampleMaterial.lc 755:30-755:35
+755:30-755:35
     Bool
-SampleMaterial.lc 756:23-756:28
+756:23-756:28
     Bool
-SampleMaterial.lc 757:20-757:33
+757:20-757:33
     CullType
-SampleMaterial.lc 758:30-758:32
+758:30-758:32
     forall a . [a]
-SampleMaterial.lc 759:25-759:30
+759:25-759:30
     Bool
-SampleMaterial.lc 760:29-760:34
+760:29-760:34
     Bool
-SampleMaterial.lc 762:13-788:14
+762:13-788:14
     [StageAttrs]
-SampleMaterial.lc 762:15-762:25
+762:15-762:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -7754,70 +7754,70 @@ SampleMaterial.lc 762:15-762:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 762:15-763:36
+762:15-763:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 762:15-764:50
+762:15-764:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 762:15-765:42
+762:15-765:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 762:15-766:36
+762:15-766:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 762:15-767:31
+762:15-767:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 762:15-768:73
+762:15-768:73
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 762:15-769:38
+762:15-769:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 762:15-770:41
+762:15-770:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 762:15-771:40
+762:15-771:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 762:15-772:46
+762:15-772:46
     String -> StageAttrs
-SampleMaterial.lc 762:15-774:18
+762:15-774:18
     StageAttrs
-SampleMaterial.lc 763:29-763:36
+763:29-763:36
     forall a . Maybe a
-SampleMaterial.lc 764:30-764:50
+764:30-764:50
     RGBGen
-SampleMaterial.lc 765:32-765:42
+765:32-765:42
     AlphaGen
-SampleMaterial.lc 766:29-766:36
+766:29-766:36
     TCGen
-SampleMaterial.lc 767:29-767:31
+767:29-767:31
     forall a . [a]
-SampleMaterial.lc 768:31-768:37
+768:31-768:37
     String -> StageTexture
-SampleMaterial.lc 768:31-768:73
+768:31-768:73
     StageTexture
-SampleMaterial.lc 768:38-768:73
+768:38-768:73
     String
-SampleMaterial.lc 769:34-769:38
+769:34-769:38
     Bool
-SampleMaterial.lc 770:33-770:41
+770:33-770:41
     DepthFunction
-SampleMaterial.lc 771:33-771:40
+771:33-771:40
     forall a . Maybe a
-SampleMaterial.lc 772:41-772:46
+772:41-772:46
     Bool
-SampleMaterial.lc 773:38-773:54
+773:38-773:54
     String
-SampleMaterial.lc 775:15-775:25
+775:15-775:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -7825,82 +7825,82 @@ SampleMaterial.lc 775:15-775:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 775:15-776:57
+775:15-776:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 775:15-777:50
+775:15-777:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 775:15-778:42
+775:15-778:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 775:15-779:40
+775:15-779:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 775:15-780:31
+775:15-780:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 775:15-781:42
+775:15-781:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 775:15-782:38
+775:15-782:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 775:15-783:41
+775:15-783:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 775:15-784:40
+775:15-784:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 775:15-785:46
+775:15-785:46
     String -> StageAttrs
-SampleMaterial.lc 775:15-787:18
+775:15-787:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 776:29-776:33
+776:29-776:33
     forall a . a -> Maybe a
-SampleMaterial.lc 776:29-776:57
+776:29-776:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 776:34-776:57
+776:34-776:57
     (Blending', Blending')
-SampleMaterial.lc 776:36-776:46
+776:36-776:46
     Blending'
-SampleMaterial.lc 776:49-776:55
+776:49-776:55
     Blending' | ((Blending'))
-SampleMaterial.lc 777:30-777:50
+777:30-777:50
     RGBGen
-SampleMaterial.lc 778:32-778:42
+778:32-778:42
     AlphaGen
-SampleMaterial.lc 779:29-779:40
+779:29-779:40
     TCGen
-SampleMaterial.lc 780:29-780:31
+780:29-780:31
     forall a . [a]
-SampleMaterial.lc 781:31-781:42
+781:31-781:42
     StageTexture
-SampleMaterial.lc 782:34-782:38
+782:34-782:38
     Bool
-SampleMaterial.lc 783:33-783:41
+783:33-783:41
     DepthFunction
-SampleMaterial.lc 784:33-784:40
+784:33-784:40
     forall a . Maybe a
-SampleMaterial.lc 785:41-785:46
+785:41-785:46
     Bool
-SampleMaterial.lc 786:38-786:54
+786:38-786:54
     String
-SampleMaterial.lc 789:21-789:26
+789:21-789:26
     Bool
-SampleMaterial.lc 792:5-834:6
+792:5-834:6
     (String, CommonAttrs)
-SampleMaterial.lc 792:5-2182:6
+792:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 792:7-792:41
+792:7-792:41
     String
-SampleMaterial.lc 793:7-793:18
+793:7-793:18
     ()
       -> ()
         -> Bool
@@ -7908,68 +7908,68 @@ SampleMaterial.lc 793:7-793:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 793:7-794:26
+793:7-794:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 793:7-795:26
+793:7-795:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 793:7-796:27
+793:7-796:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 793:7-797:21
+793:7-797:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 793:7-798:35
+793:7-798:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 793:7-799:28
+793:7-799:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 793:7-800:33
+793:7-800:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 793:7-801:32
+793:7-801:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 793:7-802:30
+793:7-802:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 793:7-803:34
+793:7-803:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 793:7-831:14
+793:7-831:14
     Bool -> CommonAttrs
-SampleMaterial.lc 793:7-833:10
+793:7-833:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 794:24-794:26
+794:24-794:26
     ()
-SampleMaterial.lc 795:24-795:26
+795:24-795:26
     ()
-SampleMaterial.lc 796:22-796:27
+796:22-796:27
     Bool
-SampleMaterial.lc 797:20-797:21
+797:20-797:21
     _b
-SampleMaterial.lc 798:30-798:35
+798:30-798:35
     Bool
-SampleMaterial.lc 799:23-799:28
+799:23-799:28
     Bool
-SampleMaterial.lc 800:20-800:33
+800:20-800:33
     CullType
-SampleMaterial.lc 801:30-801:32
+801:30-801:32
     forall a . [a]
-SampleMaterial.lc 802:25-802:30
+802:25-802:30
     Bool
-SampleMaterial.lc 803:29-803:34
+803:29-803:34
     Bool
-SampleMaterial.lc 805:13-831:14
+805:13-831:14
     [StageAttrs]
-SampleMaterial.lc 805:15-805:25
+805:15-805:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -7977,70 +7977,70 @@ SampleMaterial.lc 805:15-805:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 805:15-806:36
+805:15-806:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 805:15-807:50
+805:15-807:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 805:15-808:42
+805:15-808:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 805:15-809:36
+805:15-809:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 805:15-810:31
+805:15-810:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 805:15-811:72
+805:15-811:72
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 805:15-812:38
+805:15-812:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 805:15-813:41
+805:15-813:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 805:15-814:40
+805:15-814:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 805:15-815:46
+805:15-815:46
     String -> StageAttrs
-SampleMaterial.lc 805:15-817:18
+805:15-817:18
     StageAttrs
-SampleMaterial.lc 806:29-806:36
+806:29-806:36
     forall a . Maybe a
-SampleMaterial.lc 807:30-807:50
+807:30-807:50
     RGBGen
-SampleMaterial.lc 808:32-808:42
+808:32-808:42
     AlphaGen
-SampleMaterial.lc 809:29-809:36
+809:29-809:36
     TCGen
-SampleMaterial.lc 810:29-810:31
+810:29-810:31
     forall a . [a]
-SampleMaterial.lc 811:31-811:37
+811:31-811:37
     String -> StageTexture
-SampleMaterial.lc 811:31-811:72
+811:31-811:72
     StageTexture
-SampleMaterial.lc 811:38-811:72
+811:38-811:72
     String
-SampleMaterial.lc 812:34-812:38
+812:34-812:38
     Bool
-SampleMaterial.lc 813:33-813:41
+813:33-813:41
     DepthFunction
-SampleMaterial.lc 814:33-814:40
+814:33-814:40
     forall a . Maybe a
-SampleMaterial.lc 815:41-815:46
+815:41-815:46
     Bool
-SampleMaterial.lc 816:38-816:54
+816:38-816:54
     String
-SampleMaterial.lc 818:15-818:25
+818:15-818:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -8048,82 +8048,82 @@ SampleMaterial.lc 818:15-818:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 818:15-819:57
+818:15-819:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 818:15-820:50
+818:15-820:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 818:15-821:42
+818:15-821:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 818:15-822:40
+818:15-822:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 818:15-823:31
+818:15-823:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 818:15-824:42
+818:15-824:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 818:15-825:38
+818:15-825:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 818:15-826:41
+818:15-826:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 818:15-827:40
+818:15-827:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 818:15-828:46
+818:15-828:46
     String -> StageAttrs
-SampleMaterial.lc 818:15-830:18
+818:15-830:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 819:29-819:33
+819:29-819:33
     forall a . a -> Maybe a
-SampleMaterial.lc 819:29-819:57
+819:29-819:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 819:34-819:57
+819:34-819:57
     (Blending', Blending')
-SampleMaterial.lc 819:36-819:46
+819:36-819:46
     Blending'
-SampleMaterial.lc 819:49-819:55
+819:49-819:55
     Blending' | ((Blending'))
-SampleMaterial.lc 820:30-820:50
+820:30-820:50
     RGBGen
-SampleMaterial.lc 821:32-821:42
+821:32-821:42
     AlphaGen
-SampleMaterial.lc 822:29-822:40
+822:29-822:40
     TCGen
-SampleMaterial.lc 823:29-823:31
+823:29-823:31
     forall a . [a]
-SampleMaterial.lc 824:31-824:42
+824:31-824:42
     StageTexture
-SampleMaterial.lc 825:34-825:38
+825:34-825:38
     Bool
-SampleMaterial.lc 826:33-826:41
+826:33-826:41
     DepthFunction
-SampleMaterial.lc 827:33-827:40
+827:33-827:40
     forall a . Maybe a
-SampleMaterial.lc 828:41-828:46
+828:41-828:46
     Bool
-SampleMaterial.lc 829:38-829:54
+829:38-829:54
     String
-SampleMaterial.lc 832:21-832:26
+832:21-832:26
     Bool
-SampleMaterial.lc 835:5-891:6
+835:5-891:6
     (String, CommonAttrs)
-SampleMaterial.lc 835:5-2182:6
+835:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 835:7-835:41
+835:7-835:41
     String
-SampleMaterial.lc 836:7-836:18
+836:7-836:18
     ()
       -> ()
         -> Bool
@@ -8131,68 +8131,68 @@ SampleMaterial.lc 836:7-836:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 836:7-837:26
+836:7-837:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 836:7-838:26
+836:7-838:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 836:7-839:27
+836:7-839:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 836:7-840:21
+836:7-840:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 836:7-841:35
+836:7-841:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 836:7-842:28
+836:7-842:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 836:7-843:33
+836:7-843:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 836:7-844:32
+836:7-844:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 836:7-845:30
+836:7-845:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 836:7-846:34
+836:7-846:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 836:7-888:14
+836:7-888:14
     Bool -> CommonAttrs
-SampleMaterial.lc 836:7-890:10
+836:7-890:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 837:24-837:26
+837:24-837:26
     ()
-SampleMaterial.lc 838:24-838:26
+838:24-838:26
     ()
-SampleMaterial.lc 839:22-839:27
+839:22-839:27
     Bool
-SampleMaterial.lc 840:20-840:21
+840:20-840:21
     _b
-SampleMaterial.lc 841:30-841:35
+841:30-841:35
     Bool
-SampleMaterial.lc 842:23-842:28
+842:23-842:28
     Bool
-SampleMaterial.lc 843:20-843:33
+843:20-843:33
     CullType
-SampleMaterial.lc 844:30-844:32
+844:30-844:32
     forall a . [a]
-SampleMaterial.lc 845:25-845:30
+845:25-845:30
     Bool
-SampleMaterial.lc 846:29-846:34
+846:29-846:34
     Bool
-SampleMaterial.lc 848:13-888:14
+848:13-888:14
     [StageAttrs]
-SampleMaterial.lc 848:15-848:25
+848:15-848:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -8200,110 +8200,110 @@ SampleMaterial.lc 848:15-848:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 848:15-849:36
+848:15-849:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 848:15-850:42
+848:15-850:42
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 848:15-851:42
+848:15-851:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 848:15-852:36
+848:15-852:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 848:15-854:88
+848:15-854:88
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 848:15-855:66
+848:15-855:66
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 848:15-856:38
+848:15-856:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 848:15-857:41
+848:15-857:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 848:15-858:40
+848:15-858:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 848:15-859:46
+848:15-859:46
     String -> StageAttrs
-SampleMaterial.lc 848:15-861:18
+848:15-861:18
     StageAttrs
-SampleMaterial.lc 849:29-849:36
+849:29-849:36
     forall a . Maybe a
-SampleMaterial.lc 850:30-850:42
+850:30-850:42
     RGBGen
-SampleMaterial.lc 851:32-851:42
+851:32-851:42
     AlphaGen
-SampleMaterial.lc 852:29-852:36
+852:29-852:36
     TCGen
-SampleMaterial.lc 854:21-854:88
+854:21-854:88
     [TCMod]
-SampleMaterial.lc 854:23-854:32
+854:23-854:32
     Float -> Float -> TCMod
-SampleMaterial.lc 854:23-854:36
+854:23-854:36
     Float -> TCMod
-SampleMaterial.lc 854:23-854:40
+854:23-854:40
     TCMod
-SampleMaterial.lc 854:33-854:36
+854:33-854:36
     Float
-SampleMaterial.lc 854:37-854:40
+854:37-854:40
     Float
-SampleMaterial.lc 854:43-854:50
+854:43-854:50
     Float -> Float -> Float -> Float -> TCMod
-SampleMaterial.lc 854:43-854:54
+854:43-854:54
     Float -> Float -> Float -> TCMod
-SampleMaterial.lc 854:43-854:59
+854:43-854:59
     Float -> Float -> TCMod
-SampleMaterial.lc 854:43-854:63
+854:43-854:63
     Float -> TCMod
-SampleMaterial.lc 854:43-854:67
+854:43-854:67
     TCMod
-SampleMaterial.lc 854:43-854:86
+854:43-854:86
     [TCMod]
-SampleMaterial.lc 854:51-854:54
+854:51-854:54
     Float
-SampleMaterial.lc 854:55-854:59
+854:55-854:59
     Float
-SampleMaterial.lc 854:60-854:63
+854:60-854:63
     Float
-SampleMaterial.lc 854:64-854:67
+854:64-854:67
     Float
-SampleMaterial.lc 854:70-854:78
+854:70-854:78
     Float -> Float -> TCMod
-SampleMaterial.lc 854:70-854:82
+854:70-854:82
     Float -> TCMod
-SampleMaterial.lc 854:70-854:86
+854:70-854:86
     TCMod | [TCMod]
-SampleMaterial.lc 854:79-854:82
+854:79-854:82
     Float
-SampleMaterial.lc 854:83-854:86
+854:83-854:86
     Float
-SampleMaterial.lc 855:31-855:37
+855:31-855:37
     String -> StageTexture
-SampleMaterial.lc 855:31-855:66
+855:31-855:66
     StageTexture
-SampleMaterial.lc 855:38-855:66
+855:38-855:66
     String
-SampleMaterial.lc 856:34-856:38
+856:34-856:38
     Bool
-SampleMaterial.lc 857:33-857:41
+857:33-857:41
     DepthFunction
-SampleMaterial.lc 858:33-858:40
+858:33-858:40
     forall a . Maybe a
-SampleMaterial.lc 859:41-859:46
+859:41-859:46
     Bool
-SampleMaterial.lc 860:38-860:54
+860:38-860:54
     String
-SampleMaterial.lc 862:15-862:25
+862:15-862:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -8311,80 +8311,80 @@ SampleMaterial.lc 862:15-862:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 862:15-863:69
+862:15-863:69
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 862:15-864:42
+862:15-864:42
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 862:15-865:42
+862:15-865:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 862:15-866:36
+862:15-866:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 862:15-867:31
+862:15-867:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 862:15-868:76
+862:15-868:76
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 862:15-869:39
+862:15-869:39
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 862:15-870:41
+862:15-870:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 862:15-871:40
+862:15-871:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 862:15-872:46
+862:15-872:46
     String -> StageAttrs
-SampleMaterial.lc 862:15-874:18
+862:15-874:18
     StageAttrs
-SampleMaterial.lc 862:15-887:18
+862:15-887:18
     [StageAttrs]
-SampleMaterial.lc 863:29-863:33
+863:29-863:33
     forall a . a -> Maybe a
-SampleMaterial.lc 863:29-863:69
+863:29-863:69
     Maybe (Blending', Blending')
-SampleMaterial.lc 863:34-863:69
+863:34-863:69
     (Blending', Blending')
-SampleMaterial.lc 863:36-863:46
+863:36-863:46
     Blending'
-SampleMaterial.lc 863:49-863:67
+863:49-863:67
     Blending' | ((Blending'))
-SampleMaterial.lc 864:30-864:42
+864:30-864:42
     RGBGen
-SampleMaterial.lc 865:32-865:42
+865:32-865:42
     AlphaGen
-SampleMaterial.lc 866:29-866:36
+866:29-866:36
     TCGen
-SampleMaterial.lc 867:29-867:31
+867:29-867:31
     forall a . [a]
-SampleMaterial.lc 868:31-868:37
+868:31-868:37
     String -> StageTexture
-SampleMaterial.lc 868:31-868:76
+868:31-868:76
     StageTexture
-SampleMaterial.lc 868:38-868:76
+868:38-868:76
     String
-SampleMaterial.lc 869:34-869:39
+869:34-869:39
     Bool
-SampleMaterial.lc 870:33-870:41
+870:33-870:41
     DepthFunction
-SampleMaterial.lc 871:33-871:40
+871:33-871:40
     forall a . Maybe a
-SampleMaterial.lc 872:41-872:46
+872:41-872:46
     Bool
-SampleMaterial.lc 873:38-873:54
+873:38-873:54
     String
-SampleMaterial.lc 875:15-875:25
+875:15-875:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -8392,82 +8392,82 @@ SampleMaterial.lc 875:15-875:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 875:15-876:57
+875:15-876:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 875:15-877:42
+875:15-877:42
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 875:15-878:42
+875:15-878:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 875:15-879:40
+875:15-879:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 875:15-880:31
+875:15-880:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 875:15-881:42
+875:15-881:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 875:15-882:39
+875:15-882:39
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 875:15-883:41
+875:15-883:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 875:15-884:40
+875:15-884:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 875:15-885:46
+875:15-885:46
     String -> StageAttrs
-SampleMaterial.lc 875:15-887:18
+875:15-887:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 876:29-876:33
+876:29-876:33
     forall a . a -> Maybe a
-SampleMaterial.lc 876:29-876:57
+876:29-876:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 876:34-876:57
+876:34-876:57
     (Blending', Blending')
-SampleMaterial.lc 876:36-876:46
+876:36-876:46
     Blending'
-SampleMaterial.lc 876:49-876:55
+876:49-876:55
     Blending' | ((Blending'))
-SampleMaterial.lc 877:30-877:42
+877:30-877:42
     RGBGen
-SampleMaterial.lc 878:32-878:42
+878:32-878:42
     AlphaGen
-SampleMaterial.lc 879:29-879:40
+879:29-879:40
     TCGen
-SampleMaterial.lc 880:29-880:31
+880:29-880:31
     forall a . [a]
-SampleMaterial.lc 881:31-881:42
+881:31-881:42
     StageTexture
-SampleMaterial.lc 882:34-882:39
+882:34-882:39
     Bool
-SampleMaterial.lc 883:33-883:41
+883:33-883:41
     DepthFunction
-SampleMaterial.lc 884:33-884:40
+884:33-884:40
     forall a . Maybe a
-SampleMaterial.lc 885:41-885:46
+885:41-885:46
     Bool
-SampleMaterial.lc 886:38-886:54
+886:38-886:54
     String
-SampleMaterial.lc 889:21-889:26
+889:21-889:26
     Bool
-SampleMaterial.lc 892:5-934:6
+892:5-934:6
     (String, CommonAttrs)
-SampleMaterial.lc 892:5-2182:6
+892:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 892:7-892:41
+892:7-892:41
     String
-SampleMaterial.lc 893:7-893:18
+893:7-893:18
     ()
       -> ()
         -> Bool
@@ -8475,68 +8475,68 @@ SampleMaterial.lc 893:7-893:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 893:7-894:26
+893:7-894:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 893:7-895:26
+893:7-895:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 893:7-896:27
+893:7-896:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 893:7-897:21
+893:7-897:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 893:7-898:35
+893:7-898:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 893:7-899:28
+893:7-899:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 893:7-900:33
+893:7-900:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 893:7-901:32
+893:7-901:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 893:7-902:30
+893:7-902:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 893:7-903:34
+893:7-903:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 893:7-931:14
+893:7-931:14
     Bool -> CommonAttrs
-SampleMaterial.lc 893:7-933:10
+893:7-933:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 894:24-894:26
+894:24-894:26
     ()
-SampleMaterial.lc 895:24-895:26
+895:24-895:26
     ()
-SampleMaterial.lc 896:22-896:27
+896:22-896:27
     Bool
-SampleMaterial.lc 897:20-897:21
+897:20-897:21
     _b
-SampleMaterial.lc 898:30-898:35
+898:30-898:35
     Bool
-SampleMaterial.lc 899:23-899:28
+899:23-899:28
     Bool
-SampleMaterial.lc 900:20-900:33
+900:20-900:33
     CullType
-SampleMaterial.lc 901:30-901:32
+901:30-901:32
     forall a . [a]
-SampleMaterial.lc 902:25-902:30
+902:25-902:30
     Bool
-SampleMaterial.lc 903:29-903:34
+903:29-903:34
     Bool
-SampleMaterial.lc 905:13-931:14
+905:13-931:14
     [StageAttrs]
-SampleMaterial.lc 905:15-905:25
+905:15-905:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -8544,70 +8544,70 @@ SampleMaterial.lc 905:15-905:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 905:15-906:36
+905:15-906:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 905:15-907:50
+905:15-907:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 905:15-908:42
+905:15-908:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 905:15-909:36
+905:15-909:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 905:15-910:31
+905:15-910:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 905:15-911:72
+905:15-911:72
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 905:15-912:38
+905:15-912:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 905:15-913:41
+905:15-913:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 905:15-914:40
+905:15-914:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 905:15-915:46
+905:15-915:46
     String -> StageAttrs
-SampleMaterial.lc 905:15-917:18
+905:15-917:18
     StageAttrs
-SampleMaterial.lc 906:29-906:36
+906:29-906:36
     forall a . Maybe a
-SampleMaterial.lc 907:30-907:50
+907:30-907:50
     RGBGen
-SampleMaterial.lc 908:32-908:42
+908:32-908:42
     AlphaGen
-SampleMaterial.lc 909:29-909:36
+909:29-909:36
     TCGen
-SampleMaterial.lc 910:29-910:31
+910:29-910:31
     forall a . [a]
-SampleMaterial.lc 911:31-911:37
+911:31-911:37
     String -> StageTexture
-SampleMaterial.lc 911:31-911:72
+911:31-911:72
     StageTexture
-SampleMaterial.lc 911:38-911:72
+911:38-911:72
     String
-SampleMaterial.lc 912:34-912:38
+912:34-912:38
     Bool
-SampleMaterial.lc 913:33-913:41
+913:33-913:41
     DepthFunction
-SampleMaterial.lc 914:33-914:40
+914:33-914:40
     forall a . Maybe a
-SampleMaterial.lc 915:41-915:46
+915:41-915:46
     Bool
-SampleMaterial.lc 916:38-916:54
+916:38-916:54
     String
-SampleMaterial.lc 918:15-918:25
+918:15-918:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -8615,82 +8615,82 @@ SampleMaterial.lc 918:15-918:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 918:15-919:57
+918:15-919:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 918:15-920:50
+918:15-920:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 918:15-921:42
+918:15-921:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 918:15-922:40
+918:15-922:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 918:15-923:31
+918:15-923:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 918:15-924:42
+918:15-924:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 918:15-925:38
+918:15-925:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 918:15-926:41
+918:15-926:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 918:15-927:40
+918:15-927:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 918:15-928:46
+918:15-928:46
     String -> StageAttrs
-SampleMaterial.lc 918:15-930:18
+918:15-930:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 919:29-919:33
+919:29-919:33
     forall a . a -> Maybe a
-SampleMaterial.lc 919:29-919:57
+919:29-919:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 919:34-919:57
+919:34-919:57
     (Blending', Blending')
-SampleMaterial.lc 919:36-919:46
+919:36-919:46
     Blending'
-SampleMaterial.lc 919:49-919:55
+919:49-919:55
     Blending' | ((Blending'))
-SampleMaterial.lc 920:30-920:50
+920:30-920:50
     RGBGen
-SampleMaterial.lc 921:32-921:42
+921:32-921:42
     AlphaGen
-SampleMaterial.lc 922:29-922:40
+922:29-922:40
     TCGen
-SampleMaterial.lc 923:29-923:31
+923:29-923:31
     forall a . [a]
-SampleMaterial.lc 924:31-924:42
+924:31-924:42
     StageTexture
-SampleMaterial.lc 925:34-925:38
+925:34-925:38
     Bool
-SampleMaterial.lc 926:33-926:41
+926:33-926:41
     DepthFunction
-SampleMaterial.lc 927:33-927:40
+927:33-927:40
     forall a . Maybe a
-SampleMaterial.lc 928:41-928:46
+928:41-928:46
     Bool
-SampleMaterial.lc 929:38-929:54
+929:38-929:54
     String
-SampleMaterial.lc 932:21-932:26
+932:21-932:26
     Bool
-SampleMaterial.lc 935:5-978:6
+935:5-978:6
     (String, CommonAttrs)
-SampleMaterial.lc 935:5-2182:6
+935:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 935:7-935:54
+935:7-935:54
     String
-SampleMaterial.lc 936:7-936:18
+936:7-936:18
     ()
       -> ()
         -> Bool
@@ -8698,68 +8698,68 @@ SampleMaterial.lc 936:7-936:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 936:7-937:26
+936:7-937:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 936:7-938:26
+936:7-938:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 936:7-939:27
+936:7-939:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 936:7-940:21
+936:7-940:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 936:7-941:35
+936:7-941:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 936:7-942:28
+936:7-942:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 936:7-943:33
+936:7-943:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 936:7-944:32
+936:7-944:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 936:7-945:30
+936:7-945:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 936:7-946:34
+936:7-946:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 936:7-975:14
+936:7-975:14
     Bool -> CommonAttrs
-SampleMaterial.lc 936:7-977:10
+936:7-977:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 937:24-937:26
+937:24-937:26
     ()
-SampleMaterial.lc 938:24-938:26
+938:24-938:26
     ()
-SampleMaterial.lc 939:22-939:27
+939:22-939:27
     Bool
-SampleMaterial.lc 940:20-940:21
+940:20-940:21
     _b
-SampleMaterial.lc 941:30-941:35
+941:30-941:35
     Bool
-SampleMaterial.lc 942:23-942:28
+942:23-942:28
     Bool
-SampleMaterial.lc 943:20-943:33
+943:20-943:33
     CullType
-SampleMaterial.lc 944:30-944:32
+944:30-944:32
     forall a . [a]
-SampleMaterial.lc 945:25-945:30
+945:25-945:30
     Bool
-SampleMaterial.lc 946:29-946:34
+946:29-946:34
     Bool
-SampleMaterial.lc 948:13-975:14
+948:13-975:14
     [StageAttrs]
-SampleMaterial.lc 948:15-948:25
+948:15-948:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -8767,70 +8767,70 @@ SampleMaterial.lc 948:15-948:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 948:15-949:36
+948:15-949:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 948:15-950:50
+948:15-950:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 948:15-951:42
+948:15-951:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 948:15-952:36
+948:15-952:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 948:15-953:31
+948:15-953:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 948:15-955:75
+948:15-955:75
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 948:15-956:38
+948:15-956:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 948:15-957:41
+948:15-957:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 948:15-958:40
+948:15-958:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 948:15-959:46
+948:15-959:46
     String -> StageAttrs
-SampleMaterial.lc 948:15-961:18
+948:15-961:18
     StageAttrs
-SampleMaterial.lc 949:29-949:36
+949:29-949:36
     forall a . Maybe a
-SampleMaterial.lc 950:30-950:50
+950:30-950:50
     RGBGen
-SampleMaterial.lc 951:32-951:42
+951:32-951:42
     AlphaGen
-SampleMaterial.lc 952:29-952:36
+952:29-952:36
     TCGen
-SampleMaterial.lc 953:29-953:31
+953:29-953:31
     forall a . [a]
-SampleMaterial.lc 955:21-955:27
+955:21-955:27
     String -> StageTexture
-SampleMaterial.lc 955:21-955:75
+955:21-955:75
     StageTexture
-SampleMaterial.lc 955:28-955:75
+955:28-955:75
     String
-SampleMaterial.lc 956:34-956:38
+956:34-956:38
     Bool
-SampleMaterial.lc 957:33-957:41
+957:33-957:41
     DepthFunction
-SampleMaterial.lc 958:33-958:40
+958:33-958:40
     forall a . Maybe a
-SampleMaterial.lc 959:41-959:46
+959:41-959:46
     Bool
-SampleMaterial.lc 960:38-960:54
+960:38-960:54
     String
-SampleMaterial.lc 962:15-962:25
+962:15-962:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -8838,82 +8838,82 @@ SampleMaterial.lc 962:15-962:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 962:15-963:57
+962:15-963:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 962:15-964:50
+962:15-964:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 962:15-965:42
+962:15-965:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 962:15-966:40
+962:15-966:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 962:15-967:31
+962:15-967:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 962:15-968:42
+962:15-968:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 962:15-969:38
+962:15-969:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 962:15-970:41
+962:15-970:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 962:15-971:40
+962:15-971:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 962:15-972:46
+962:15-972:46
     String -> StageAttrs
-SampleMaterial.lc 962:15-974:18
+962:15-974:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 963:29-963:33
+963:29-963:33
     forall a . a -> Maybe a
-SampleMaterial.lc 963:29-963:57
+963:29-963:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 963:34-963:57
+963:34-963:57
     (Blending', Blending')
-SampleMaterial.lc 963:36-963:46
+963:36-963:46
     Blending'
-SampleMaterial.lc 963:49-963:55
+963:49-963:55
     Blending' | ((Blending'))
-SampleMaterial.lc 964:30-964:50
+964:30-964:50
     RGBGen
-SampleMaterial.lc 965:32-965:42
+965:32-965:42
     AlphaGen
-SampleMaterial.lc 966:29-966:40
+966:29-966:40
     TCGen
-SampleMaterial.lc 967:29-967:31
+967:29-967:31
     forall a . [a]
-SampleMaterial.lc 968:31-968:42
+968:31-968:42
     StageTexture
-SampleMaterial.lc 969:34-969:38
+969:34-969:38
     Bool
-SampleMaterial.lc 970:33-970:41
+970:33-970:41
     DepthFunction
-SampleMaterial.lc 971:33-971:40
+971:33-971:40
     forall a . Maybe a
-SampleMaterial.lc 972:41-972:46
+972:41-972:46
     Bool
-SampleMaterial.lc 973:38-973:54
+973:38-973:54
     String
-SampleMaterial.lc 976:21-976:26
+976:21-976:26
     Bool
-SampleMaterial.lc 979:5-1021:6
+979:5-1021:6
     (String, CommonAttrs)
-SampleMaterial.lc 979:5-2182:6
+979:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 979:7-979:45
+979:7-979:45
     String
-SampleMaterial.lc 980:7-980:18
+980:7-980:18
     ()
       -> ()
         -> Bool
@@ -8921,68 +8921,68 @@ SampleMaterial.lc 980:7-980:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 980:7-981:26
+980:7-981:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 980:7-982:26
+980:7-982:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 980:7-983:27
+980:7-983:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 980:7-984:21
+980:7-984:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 980:7-985:35
+980:7-985:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 980:7-986:28
+980:7-986:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 980:7-987:33
+980:7-987:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 980:7-988:32
+980:7-988:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 980:7-989:30
+980:7-989:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 980:7-990:34
+980:7-990:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 980:7-1018:14
+980:7-1018:14
     Bool -> CommonAttrs
-SampleMaterial.lc 980:7-1020:10
+980:7-1020:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 981:24-981:26
+981:24-981:26
     ()
-SampleMaterial.lc 982:24-982:26
+982:24-982:26
     ()
-SampleMaterial.lc 983:22-983:27
+983:22-983:27
     Bool
-SampleMaterial.lc 984:20-984:21
+984:20-984:21
     _b
-SampleMaterial.lc 985:30-985:35
+985:30-985:35
     Bool
-SampleMaterial.lc 986:23-986:28
+986:23-986:28
     Bool
-SampleMaterial.lc 987:20-987:33
+987:20-987:33
     CullType
-SampleMaterial.lc 988:30-988:32
+988:30-988:32
     forall a . [a]
-SampleMaterial.lc 989:25-989:30
+989:25-989:30
     Bool
-SampleMaterial.lc 990:29-990:34
+990:29-990:34
     Bool
-SampleMaterial.lc 992:13-1018:14
+992:13-1018:14
     [StageAttrs]
-SampleMaterial.lc 992:15-992:25
+992:15-992:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -8990,70 +8990,70 @@ SampleMaterial.lc 992:15-992:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 992:15-993:36
+992:15-993:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 992:15-994:50
+992:15-994:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 992:15-995:42
+992:15-995:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 992:15-996:36
+992:15-996:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 992:15-997:31
+992:15-997:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 992:15-998:76
+992:15-998:76
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 992:15-999:38
+992:15-999:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 992:15-1000:41
+992:15-1000:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 992:15-1001:40
+992:15-1001:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 992:15-1002:46
+992:15-1002:46
     String -> StageAttrs
-SampleMaterial.lc 992:15-1004:18
+992:15-1004:18
     StageAttrs
-SampleMaterial.lc 993:29-993:36
+993:29-993:36
     forall a . Maybe a
-SampleMaterial.lc 994:30-994:50
+994:30-994:50
     RGBGen
-SampleMaterial.lc 995:32-995:42
+995:32-995:42
     AlphaGen
-SampleMaterial.lc 996:29-996:36
+996:29-996:36
     TCGen
-SampleMaterial.lc 997:29-997:31
+997:29-997:31
     forall a . [a]
-SampleMaterial.lc 998:31-998:37
+998:31-998:37
     String -> StageTexture
-SampleMaterial.lc 998:31-998:76
+998:31-998:76
     StageTexture
-SampleMaterial.lc 998:38-998:76
+998:38-998:76
     String
-SampleMaterial.lc 999:34-999:38
+999:34-999:38
     Bool
-SampleMaterial.lc 1000:33-1000:41
+1000:33-1000:41
     DepthFunction
-SampleMaterial.lc 1001:33-1001:40
+1001:33-1001:40
     forall a . Maybe a
-SampleMaterial.lc 1002:41-1002:46
+1002:41-1002:46
     Bool
-SampleMaterial.lc 1003:38-1003:54
+1003:38-1003:54
     String
-SampleMaterial.lc 1005:15-1005:25
+1005:15-1005:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -9061,82 +9061,82 @@ SampleMaterial.lc 1005:15-1005:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1005:15-1006:57
+1005:15-1006:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1005:15-1007:50
+1005:15-1007:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1005:15-1008:42
+1005:15-1008:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1005:15-1009:40
+1005:15-1009:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1005:15-1010:31
+1005:15-1010:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1005:15-1011:42
+1005:15-1011:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1005:15-1012:38
+1005:15-1012:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1005:15-1013:41
+1005:15-1013:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1005:15-1014:40
+1005:15-1014:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1005:15-1015:46
+1005:15-1015:46
     String -> StageAttrs
-SampleMaterial.lc 1005:15-1017:18
+1005:15-1017:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1006:29-1006:33
+1006:29-1006:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1006:29-1006:57
+1006:29-1006:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1006:34-1006:57
+1006:34-1006:57
     (Blending', Blending')
-SampleMaterial.lc 1006:36-1006:46
+1006:36-1006:46
     Blending'
-SampleMaterial.lc 1006:49-1006:55
+1006:49-1006:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1007:30-1007:50
+1007:30-1007:50
     RGBGen
-SampleMaterial.lc 1008:32-1008:42
+1008:32-1008:42
     AlphaGen
-SampleMaterial.lc 1009:29-1009:40
+1009:29-1009:40
     TCGen
-SampleMaterial.lc 1010:29-1010:31
+1010:29-1010:31
     forall a . [a]
-SampleMaterial.lc 1011:31-1011:42
+1011:31-1011:42
     StageTexture
-SampleMaterial.lc 1012:34-1012:38
+1012:34-1012:38
     Bool
-SampleMaterial.lc 1013:33-1013:41
+1013:33-1013:41
     DepthFunction
-SampleMaterial.lc 1014:33-1014:40
+1014:33-1014:40
     forall a . Maybe a
-SampleMaterial.lc 1015:41-1015:46
+1015:41-1015:46
     Bool
-SampleMaterial.lc 1016:38-1016:54
+1016:38-1016:54
     String
-SampleMaterial.lc 1019:21-1019:26
+1019:21-1019:26
     Bool
-SampleMaterial.lc 1022:5-1064:6
+1022:5-1064:6
     (String, CommonAttrs)
-SampleMaterial.lc 1022:5-2182:6
+1022:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1022:7-1022:44
+1022:7-1022:44
     String
-SampleMaterial.lc 1023:7-1023:18
+1023:7-1023:18
     ()
       -> ()
         -> Bool
@@ -9144,68 +9144,68 @@ SampleMaterial.lc 1023:7-1023:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1023:7-1024:26
+1023:7-1024:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1023:7-1025:26
+1023:7-1025:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1023:7-1026:27
+1023:7-1026:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1023:7-1027:21
+1023:7-1027:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1023:7-1028:35
+1023:7-1028:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1023:7-1029:28
+1023:7-1029:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1023:7-1030:33
+1023:7-1030:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1023:7-1031:32
+1023:7-1031:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1023:7-1032:30
+1023:7-1032:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1023:7-1033:34
+1023:7-1033:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1023:7-1061:14
+1023:7-1061:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1023:7-1063:10
+1023:7-1063:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1024:24-1024:26
+1024:24-1024:26
     ()
-SampleMaterial.lc 1025:24-1025:26
+1025:24-1025:26
     ()
-SampleMaterial.lc 1026:22-1026:27
+1026:22-1026:27
     Bool
-SampleMaterial.lc 1027:20-1027:21
+1027:20-1027:21
     _b
-SampleMaterial.lc 1028:30-1028:35
+1028:30-1028:35
     Bool
-SampleMaterial.lc 1029:23-1029:28
+1029:23-1029:28
     Bool
-SampleMaterial.lc 1030:20-1030:33
+1030:20-1030:33
     CullType
-SampleMaterial.lc 1031:30-1031:32
+1031:30-1031:32
     forall a . [a]
-SampleMaterial.lc 1032:25-1032:30
+1032:25-1032:30
     Bool
-SampleMaterial.lc 1033:29-1033:34
+1033:29-1033:34
     Bool
-SampleMaterial.lc 1035:13-1061:14
+1035:13-1061:14
     [StageAttrs]
-SampleMaterial.lc 1035:15-1035:25
+1035:15-1035:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -9213,70 +9213,70 @@ SampleMaterial.lc 1035:15-1035:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1035:15-1036:36
+1035:15-1036:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1035:15-1037:50
+1035:15-1037:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1035:15-1038:42
+1035:15-1038:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1035:15-1039:36
+1035:15-1039:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1035:15-1040:31
+1035:15-1040:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1035:15-1041:75
+1035:15-1041:75
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1035:15-1042:38
+1035:15-1042:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1035:15-1043:41
+1035:15-1043:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1035:15-1044:40
+1035:15-1044:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1035:15-1045:46
+1035:15-1045:46
     String -> StageAttrs
-SampleMaterial.lc 1035:15-1047:18
+1035:15-1047:18
     StageAttrs
-SampleMaterial.lc 1036:29-1036:36
+1036:29-1036:36
     forall a . Maybe a
-SampleMaterial.lc 1037:30-1037:50
+1037:30-1037:50
     RGBGen
-SampleMaterial.lc 1038:32-1038:42
+1038:32-1038:42
     AlphaGen
-SampleMaterial.lc 1039:29-1039:36
+1039:29-1039:36
     TCGen
-SampleMaterial.lc 1040:29-1040:31
+1040:29-1040:31
     forall a . [a]
-SampleMaterial.lc 1041:31-1041:37
+1041:31-1041:37
     String -> StageTexture
-SampleMaterial.lc 1041:31-1041:75
+1041:31-1041:75
     StageTexture
-SampleMaterial.lc 1041:38-1041:75
+1041:38-1041:75
     String
-SampleMaterial.lc 1042:34-1042:38
+1042:34-1042:38
     Bool
-SampleMaterial.lc 1043:33-1043:41
+1043:33-1043:41
     DepthFunction
-SampleMaterial.lc 1044:33-1044:40
+1044:33-1044:40
     forall a . Maybe a
-SampleMaterial.lc 1045:41-1045:46
+1045:41-1045:46
     Bool
-SampleMaterial.lc 1046:38-1046:54
+1046:38-1046:54
     String
-SampleMaterial.lc 1048:15-1048:25
+1048:15-1048:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -9284,82 +9284,82 @@ SampleMaterial.lc 1048:15-1048:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1048:15-1049:57
+1048:15-1049:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1048:15-1050:50
+1048:15-1050:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1048:15-1051:42
+1048:15-1051:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1048:15-1052:40
+1048:15-1052:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1048:15-1053:31
+1048:15-1053:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1048:15-1054:42
+1048:15-1054:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1048:15-1055:38
+1048:15-1055:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1048:15-1056:41
+1048:15-1056:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1048:15-1057:40
+1048:15-1057:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1048:15-1058:46
+1048:15-1058:46
     String -> StageAttrs
-SampleMaterial.lc 1048:15-1060:18
+1048:15-1060:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1049:29-1049:33
+1049:29-1049:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1049:29-1049:57
+1049:29-1049:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1049:34-1049:57
+1049:34-1049:57
     (Blending', Blending')
-SampleMaterial.lc 1049:36-1049:46
+1049:36-1049:46
     Blending'
-SampleMaterial.lc 1049:49-1049:55
+1049:49-1049:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1050:30-1050:50
+1050:30-1050:50
     RGBGen
-SampleMaterial.lc 1051:32-1051:42
+1051:32-1051:42
     AlphaGen
-SampleMaterial.lc 1052:29-1052:40
+1052:29-1052:40
     TCGen
-SampleMaterial.lc 1053:29-1053:31
+1053:29-1053:31
     forall a . [a]
-SampleMaterial.lc 1054:31-1054:42
+1054:31-1054:42
     StageTexture
-SampleMaterial.lc 1055:34-1055:38
+1055:34-1055:38
     Bool
-SampleMaterial.lc 1056:33-1056:41
+1056:33-1056:41
     DepthFunction
-SampleMaterial.lc 1057:33-1057:40
+1057:33-1057:40
     forall a . Maybe a
-SampleMaterial.lc 1058:41-1058:46
+1058:41-1058:46
     Bool
-SampleMaterial.lc 1059:38-1059:54
+1059:38-1059:54
     String
-SampleMaterial.lc 1062:21-1062:26
+1062:21-1062:26
     Bool
-SampleMaterial.lc 1065:5-1107:6
+1065:5-1107:6
     (String, CommonAttrs)
-SampleMaterial.lc 1065:5-2182:6
+1065:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1065:7-1065:44
+1065:7-1065:44
     String
-SampleMaterial.lc 1066:7-1066:18
+1066:7-1066:18
     ()
       -> ()
         -> Bool
@@ -9367,68 +9367,68 @@ SampleMaterial.lc 1066:7-1066:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1066:7-1067:26
+1066:7-1067:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1066:7-1068:26
+1066:7-1068:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1066:7-1069:27
+1066:7-1069:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1066:7-1070:21
+1066:7-1070:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1066:7-1071:35
+1066:7-1071:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1066:7-1072:28
+1066:7-1072:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1066:7-1073:33
+1066:7-1073:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1066:7-1074:32
+1066:7-1074:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1066:7-1075:30
+1066:7-1075:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1066:7-1076:34
+1066:7-1076:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1066:7-1104:14
+1066:7-1104:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1066:7-1106:10
+1066:7-1106:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1067:24-1067:26
+1067:24-1067:26
     ()
-SampleMaterial.lc 1068:24-1068:26
+1068:24-1068:26
     ()
-SampleMaterial.lc 1069:22-1069:27
+1069:22-1069:27
     Bool
-SampleMaterial.lc 1070:20-1070:21
+1070:20-1070:21
     _b
-SampleMaterial.lc 1071:30-1071:35
+1071:30-1071:35
     Bool
-SampleMaterial.lc 1072:23-1072:28
+1072:23-1072:28
     Bool
-SampleMaterial.lc 1073:20-1073:33
+1073:20-1073:33
     CullType
-SampleMaterial.lc 1074:30-1074:32
+1074:30-1074:32
     forall a . [a]
-SampleMaterial.lc 1075:25-1075:30
+1075:25-1075:30
     Bool
-SampleMaterial.lc 1076:29-1076:34
+1076:29-1076:34
     Bool
-SampleMaterial.lc 1078:13-1104:14
+1078:13-1104:14
     [StageAttrs]
-SampleMaterial.lc 1078:15-1078:25
+1078:15-1078:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -9436,70 +9436,70 @@ SampleMaterial.lc 1078:15-1078:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1078:15-1079:36
+1078:15-1079:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1078:15-1080:50
+1078:15-1080:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1078:15-1081:42
+1078:15-1081:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1078:15-1082:36
+1078:15-1082:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1078:15-1083:31
+1078:15-1083:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1078:15-1084:75
+1078:15-1084:75
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1078:15-1085:38
+1078:15-1085:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1078:15-1086:41
+1078:15-1086:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1078:15-1087:40
+1078:15-1087:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1078:15-1088:46
+1078:15-1088:46
     String -> StageAttrs
-SampleMaterial.lc 1078:15-1090:18
+1078:15-1090:18
     StageAttrs
-SampleMaterial.lc 1079:29-1079:36
+1079:29-1079:36
     forall a . Maybe a
-SampleMaterial.lc 1080:30-1080:50
+1080:30-1080:50
     RGBGen
-SampleMaterial.lc 1081:32-1081:42
+1081:32-1081:42
     AlphaGen
-SampleMaterial.lc 1082:29-1082:36
+1082:29-1082:36
     TCGen
-SampleMaterial.lc 1083:29-1083:31
+1083:29-1083:31
     forall a . [a]
-SampleMaterial.lc 1084:31-1084:37
+1084:31-1084:37
     String -> StageTexture
-SampleMaterial.lc 1084:31-1084:75
+1084:31-1084:75
     StageTexture
-SampleMaterial.lc 1084:38-1084:75
+1084:38-1084:75
     String
-SampleMaterial.lc 1085:34-1085:38
+1085:34-1085:38
     Bool
-SampleMaterial.lc 1086:33-1086:41
+1086:33-1086:41
     DepthFunction
-SampleMaterial.lc 1087:33-1087:40
+1087:33-1087:40
     forall a . Maybe a
-SampleMaterial.lc 1088:41-1088:46
+1088:41-1088:46
     Bool
-SampleMaterial.lc 1089:38-1089:54
+1089:38-1089:54
     String
-SampleMaterial.lc 1091:15-1091:25
+1091:15-1091:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -9507,82 +9507,82 @@ SampleMaterial.lc 1091:15-1091:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1091:15-1092:57
+1091:15-1092:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1091:15-1093:50
+1091:15-1093:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1091:15-1094:42
+1091:15-1094:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1091:15-1095:40
+1091:15-1095:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1091:15-1096:31
+1091:15-1096:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1091:15-1097:42
+1091:15-1097:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1091:15-1098:38
+1091:15-1098:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1091:15-1099:41
+1091:15-1099:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1091:15-1100:40
+1091:15-1100:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1091:15-1101:46
+1091:15-1101:46
     String -> StageAttrs
-SampleMaterial.lc 1091:15-1103:18
+1091:15-1103:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1092:29-1092:33
+1092:29-1092:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1092:29-1092:57
+1092:29-1092:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1092:34-1092:57
+1092:34-1092:57
     (Blending', Blending')
-SampleMaterial.lc 1092:36-1092:46
+1092:36-1092:46
     Blending'
-SampleMaterial.lc 1092:49-1092:55
+1092:49-1092:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1093:30-1093:50
+1093:30-1093:50
     RGBGen
-SampleMaterial.lc 1094:32-1094:42
+1094:32-1094:42
     AlphaGen
-SampleMaterial.lc 1095:29-1095:40
+1095:29-1095:40
     TCGen
-SampleMaterial.lc 1096:29-1096:31
+1096:29-1096:31
     forall a . [a]
-SampleMaterial.lc 1097:31-1097:42
+1097:31-1097:42
     StageTexture
-SampleMaterial.lc 1098:34-1098:38
+1098:34-1098:38
     Bool
-SampleMaterial.lc 1099:33-1099:41
+1099:33-1099:41
     DepthFunction
-SampleMaterial.lc 1100:33-1100:40
+1100:33-1100:40
     forall a . Maybe a
-SampleMaterial.lc 1101:41-1101:46
+1101:41-1101:46
     Bool
-SampleMaterial.lc 1102:38-1102:54
+1102:38-1102:54
     String
-SampleMaterial.lc 1105:21-1105:26
+1105:21-1105:26
     Bool
-SampleMaterial.lc 1108:5-1150:6
+1108:5-1150:6
     (String, CommonAttrs)
-SampleMaterial.lc 1108:5-2182:6
+1108:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1108:7-1108:49
+1108:7-1108:49
     String
-SampleMaterial.lc 1109:7-1109:18
+1109:7-1109:18
     ()
       -> ()
         -> Bool
@@ -9590,68 +9590,68 @@ SampleMaterial.lc 1109:7-1109:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1109:7-1110:26
+1109:7-1110:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1109:7-1111:26
+1109:7-1111:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1109:7-1112:27
+1109:7-1112:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1109:7-1113:21
+1109:7-1113:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1109:7-1114:35
+1109:7-1114:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1109:7-1115:28
+1109:7-1115:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1109:7-1116:33
+1109:7-1116:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1109:7-1117:32
+1109:7-1117:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1109:7-1118:30
+1109:7-1118:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1109:7-1119:34
+1109:7-1119:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1109:7-1147:14
+1109:7-1147:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1109:7-1149:10
+1109:7-1149:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1110:24-1110:26
+1110:24-1110:26
     ()
-SampleMaterial.lc 1111:24-1111:26
+1111:24-1111:26
     ()
-SampleMaterial.lc 1112:22-1112:27
+1112:22-1112:27
     Bool
-SampleMaterial.lc 1113:20-1113:21
+1113:20-1113:21
     _b
-SampleMaterial.lc 1114:30-1114:35
+1114:30-1114:35
     Bool
-SampleMaterial.lc 1115:23-1115:28
+1115:23-1115:28
     Bool
-SampleMaterial.lc 1116:20-1116:33
+1116:20-1116:33
     CullType
-SampleMaterial.lc 1117:30-1117:32
+1117:30-1117:32
     forall a . [a]
-SampleMaterial.lc 1118:25-1118:30
+1118:25-1118:30
     Bool
-SampleMaterial.lc 1119:29-1119:34
+1119:29-1119:34
     Bool
-SampleMaterial.lc 1121:13-1147:14
+1121:13-1147:14
     [StageAttrs]
-SampleMaterial.lc 1121:15-1121:25
+1121:15-1121:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -9659,70 +9659,70 @@ SampleMaterial.lc 1121:15-1121:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1121:15-1122:36
+1121:15-1122:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1121:15-1123:50
+1121:15-1123:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1121:15-1124:42
+1121:15-1124:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1121:15-1125:36
+1121:15-1125:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1121:15-1126:31
+1121:15-1126:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1121:15-1127:80
+1121:15-1127:80
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1121:15-1128:38
+1121:15-1128:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1121:15-1129:41
+1121:15-1129:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1121:15-1130:40
+1121:15-1130:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1121:15-1131:46
+1121:15-1131:46
     String -> StageAttrs
-SampleMaterial.lc 1121:15-1133:18
+1121:15-1133:18
     StageAttrs
-SampleMaterial.lc 1122:29-1122:36
+1122:29-1122:36
     forall a . Maybe a
-SampleMaterial.lc 1123:30-1123:50
+1123:30-1123:50
     RGBGen
-SampleMaterial.lc 1124:32-1124:42
+1124:32-1124:42
     AlphaGen
-SampleMaterial.lc 1125:29-1125:36
+1125:29-1125:36
     TCGen
-SampleMaterial.lc 1126:29-1126:31
+1126:29-1126:31
     forall a . [a]
-SampleMaterial.lc 1127:31-1127:37
+1127:31-1127:37
     String -> StageTexture
-SampleMaterial.lc 1127:31-1127:80
+1127:31-1127:80
     StageTexture
-SampleMaterial.lc 1127:38-1127:80
+1127:38-1127:80
     String
-SampleMaterial.lc 1128:34-1128:38
+1128:34-1128:38
     Bool
-SampleMaterial.lc 1129:33-1129:41
+1129:33-1129:41
     DepthFunction
-SampleMaterial.lc 1130:33-1130:40
+1130:33-1130:40
     forall a . Maybe a
-SampleMaterial.lc 1131:41-1131:46
+1131:41-1131:46
     Bool
-SampleMaterial.lc 1132:38-1132:54
+1132:38-1132:54
     String
-SampleMaterial.lc 1134:15-1134:25
+1134:15-1134:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -9730,82 +9730,82 @@ SampleMaterial.lc 1134:15-1134:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1134:15-1135:57
+1134:15-1135:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1134:15-1136:50
+1134:15-1136:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1134:15-1137:42
+1134:15-1137:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1134:15-1138:40
+1134:15-1138:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1134:15-1139:31
+1134:15-1139:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1134:15-1140:42
+1134:15-1140:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1134:15-1141:38
+1134:15-1141:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1134:15-1142:41
+1134:15-1142:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1134:15-1143:40
+1134:15-1143:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1134:15-1144:46
+1134:15-1144:46
     String -> StageAttrs
-SampleMaterial.lc 1134:15-1146:18
+1134:15-1146:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1135:29-1135:33
+1135:29-1135:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1135:29-1135:57
+1135:29-1135:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1135:34-1135:57
+1135:34-1135:57
     (Blending', Blending')
-SampleMaterial.lc 1135:36-1135:46
+1135:36-1135:46
     Blending'
-SampleMaterial.lc 1135:49-1135:55
+1135:49-1135:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1136:30-1136:50
+1136:30-1136:50
     RGBGen
-SampleMaterial.lc 1137:32-1137:42
+1137:32-1137:42
     AlphaGen
-SampleMaterial.lc 1138:29-1138:40
+1138:29-1138:40
     TCGen
-SampleMaterial.lc 1139:29-1139:31
+1139:29-1139:31
     forall a . [a]
-SampleMaterial.lc 1140:31-1140:42
+1140:31-1140:42
     StageTexture
-SampleMaterial.lc 1141:34-1141:38
+1141:34-1141:38
     Bool
-SampleMaterial.lc 1142:33-1142:41
+1142:33-1142:41
     DepthFunction
-SampleMaterial.lc 1143:33-1143:40
+1143:33-1143:40
     forall a . Maybe a
-SampleMaterial.lc 1144:41-1144:46
+1144:41-1144:46
     Bool
-SampleMaterial.lc 1145:38-1145:54
+1145:38-1145:54
     String
-SampleMaterial.lc 1148:21-1148:26
+1148:21-1148:26
     Bool
-SampleMaterial.lc 1151:5-1193:6
+1151:5-1193:6
     (String, CommonAttrs)
-SampleMaterial.lc 1151:5-2182:6
+1151:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1151:7-1151:41
+1151:7-1151:41
     String
-SampleMaterial.lc 1152:7-1152:18
+1152:7-1152:18
     ()
       -> ()
         -> Bool
@@ -9813,68 +9813,68 @@ SampleMaterial.lc 1152:7-1152:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1152:7-1153:26
+1152:7-1153:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1152:7-1154:26
+1152:7-1154:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1152:7-1155:27
+1152:7-1155:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1152:7-1156:21
+1152:7-1156:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1152:7-1157:35
+1152:7-1157:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1152:7-1158:28
+1152:7-1158:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1152:7-1159:33
+1152:7-1159:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1152:7-1160:32
+1152:7-1160:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1152:7-1161:30
+1152:7-1161:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1152:7-1162:34
+1152:7-1162:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1152:7-1190:14
+1152:7-1190:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1152:7-1192:10
+1152:7-1192:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1153:24-1153:26
+1153:24-1153:26
     ()
-SampleMaterial.lc 1154:24-1154:26
+1154:24-1154:26
     ()
-SampleMaterial.lc 1155:22-1155:27
+1155:22-1155:27
     Bool
-SampleMaterial.lc 1156:20-1156:21
+1156:20-1156:21
     _b
-SampleMaterial.lc 1157:30-1157:35
+1157:30-1157:35
     Bool
-SampleMaterial.lc 1158:23-1158:28
+1158:23-1158:28
     Bool
-SampleMaterial.lc 1159:20-1159:33
+1159:20-1159:33
     CullType
-SampleMaterial.lc 1160:30-1160:32
+1160:30-1160:32
     forall a . [a]
-SampleMaterial.lc 1161:25-1161:30
+1161:25-1161:30
     Bool
-SampleMaterial.lc 1162:29-1162:34
+1162:29-1162:34
     Bool
-SampleMaterial.lc 1164:13-1190:14
+1164:13-1190:14
     [StageAttrs]
-SampleMaterial.lc 1164:15-1164:25
+1164:15-1164:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -9882,70 +9882,70 @@ SampleMaterial.lc 1164:15-1164:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1164:15-1165:36
+1164:15-1165:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1164:15-1166:50
+1164:15-1166:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1164:15-1167:42
+1164:15-1167:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1164:15-1168:36
+1164:15-1168:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1164:15-1169:31
+1164:15-1169:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1164:15-1170:72
+1164:15-1170:72
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1164:15-1171:38
+1164:15-1171:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1164:15-1172:41
+1164:15-1172:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1164:15-1173:40
+1164:15-1173:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1164:15-1174:46
+1164:15-1174:46
     String -> StageAttrs
-SampleMaterial.lc 1164:15-1176:18
+1164:15-1176:18
     StageAttrs
-SampleMaterial.lc 1165:29-1165:36
+1165:29-1165:36
     forall a . Maybe a
-SampleMaterial.lc 1166:30-1166:50
+1166:30-1166:50
     RGBGen
-SampleMaterial.lc 1167:32-1167:42
+1167:32-1167:42
     AlphaGen
-SampleMaterial.lc 1168:29-1168:36
+1168:29-1168:36
     TCGen
-SampleMaterial.lc 1169:29-1169:31
+1169:29-1169:31
     forall a . [a]
-SampleMaterial.lc 1170:31-1170:37
+1170:31-1170:37
     String -> StageTexture
-SampleMaterial.lc 1170:31-1170:72
+1170:31-1170:72
     StageTexture
-SampleMaterial.lc 1170:38-1170:72
+1170:38-1170:72
     String
-SampleMaterial.lc 1171:34-1171:38
+1171:34-1171:38
     Bool
-SampleMaterial.lc 1172:33-1172:41
+1172:33-1172:41
     DepthFunction
-SampleMaterial.lc 1173:33-1173:40
+1173:33-1173:40
     forall a . Maybe a
-SampleMaterial.lc 1174:41-1174:46
+1174:41-1174:46
     Bool
-SampleMaterial.lc 1175:38-1175:54
+1175:38-1175:54
     String
-SampleMaterial.lc 1177:15-1177:25
+1177:15-1177:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -9953,82 +9953,82 @@ SampleMaterial.lc 1177:15-1177:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1177:15-1178:57
+1177:15-1178:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1177:15-1179:50
+1177:15-1179:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1177:15-1180:42
+1177:15-1180:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1177:15-1181:40
+1177:15-1181:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1177:15-1182:31
+1177:15-1182:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1177:15-1183:42
+1177:15-1183:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1177:15-1184:38
+1177:15-1184:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1177:15-1185:41
+1177:15-1185:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1177:15-1186:40
+1177:15-1186:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1177:15-1187:46
+1177:15-1187:46
     String -> StageAttrs
-SampleMaterial.lc 1177:15-1189:18
+1177:15-1189:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1178:29-1178:33
+1178:29-1178:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1178:29-1178:57
+1178:29-1178:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1178:34-1178:57
+1178:34-1178:57
     (Blending', Blending')
-SampleMaterial.lc 1178:36-1178:46
+1178:36-1178:46
     Blending'
-SampleMaterial.lc 1178:49-1178:55
+1178:49-1178:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1179:30-1179:50
+1179:30-1179:50
     RGBGen
-SampleMaterial.lc 1180:32-1180:42
+1180:32-1180:42
     AlphaGen
-SampleMaterial.lc 1181:29-1181:40
+1181:29-1181:40
     TCGen
-SampleMaterial.lc 1182:29-1182:31
+1182:29-1182:31
     forall a . [a]
-SampleMaterial.lc 1183:31-1183:42
+1183:31-1183:42
     StageTexture
-SampleMaterial.lc 1184:34-1184:38
+1184:34-1184:38
     Bool
-SampleMaterial.lc 1185:33-1185:41
+1185:33-1185:41
     DepthFunction
-SampleMaterial.lc 1186:33-1186:40
+1186:33-1186:40
     forall a . Maybe a
-SampleMaterial.lc 1187:41-1187:46
+1187:41-1187:46
     Bool
-SampleMaterial.lc 1188:38-1188:54
+1188:38-1188:54
     String
-SampleMaterial.lc 1191:21-1191:26
+1191:21-1191:26
     Bool
-SampleMaterial.lc 1194:5-1236:6
+1194:5-1236:6
     (String, CommonAttrs)
-SampleMaterial.lc 1194:5-2182:6
+1194:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1194:7-1194:43
+1194:7-1194:43
     String
-SampleMaterial.lc 1195:7-1195:18
+1195:7-1195:18
     ()
       -> ()
         -> Bool
@@ -10036,68 +10036,68 @@ SampleMaterial.lc 1195:7-1195:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1195:7-1196:26
+1195:7-1196:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1195:7-1197:26
+1195:7-1197:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1195:7-1198:27
+1195:7-1198:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1195:7-1199:21
+1195:7-1199:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1195:7-1200:35
+1195:7-1200:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1195:7-1201:28
+1195:7-1201:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1195:7-1202:33
+1195:7-1202:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1195:7-1203:32
+1195:7-1203:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1195:7-1204:30
+1195:7-1204:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1195:7-1205:34
+1195:7-1205:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1195:7-1233:14
+1195:7-1233:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1195:7-1235:10
+1195:7-1235:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1196:24-1196:26
+1196:24-1196:26
     ()
-SampleMaterial.lc 1197:24-1197:26
+1197:24-1197:26
     ()
-SampleMaterial.lc 1198:22-1198:27
+1198:22-1198:27
     Bool
-SampleMaterial.lc 1199:20-1199:21
+1199:20-1199:21
     _b
-SampleMaterial.lc 1200:30-1200:35
+1200:30-1200:35
     Bool
-SampleMaterial.lc 1201:23-1201:28
+1201:23-1201:28
     Bool
-SampleMaterial.lc 1202:20-1202:33
+1202:20-1202:33
     CullType
-SampleMaterial.lc 1203:30-1203:32
+1203:30-1203:32
     forall a . [a]
-SampleMaterial.lc 1204:25-1204:30
+1204:25-1204:30
     Bool
-SampleMaterial.lc 1205:29-1205:34
+1205:29-1205:34
     Bool
-SampleMaterial.lc 1207:13-1233:14
+1207:13-1233:14
     [StageAttrs]
-SampleMaterial.lc 1207:15-1207:25
+1207:15-1207:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -10105,70 +10105,70 @@ SampleMaterial.lc 1207:15-1207:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1207:15-1208:36
+1207:15-1208:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1207:15-1209:50
+1207:15-1209:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1207:15-1210:42
+1207:15-1210:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1207:15-1211:36
+1207:15-1211:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1207:15-1212:31
+1207:15-1212:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1207:15-1213:74
+1207:15-1213:74
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1207:15-1214:38
+1207:15-1214:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1207:15-1215:41
+1207:15-1215:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1207:15-1216:40
+1207:15-1216:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1207:15-1217:46
+1207:15-1217:46
     String -> StageAttrs
-SampleMaterial.lc 1207:15-1219:18
+1207:15-1219:18
     StageAttrs
-SampleMaterial.lc 1208:29-1208:36
+1208:29-1208:36
     forall a . Maybe a
-SampleMaterial.lc 1209:30-1209:50
+1209:30-1209:50
     RGBGen
-SampleMaterial.lc 1210:32-1210:42
+1210:32-1210:42
     AlphaGen
-SampleMaterial.lc 1211:29-1211:36
+1211:29-1211:36
     TCGen
-SampleMaterial.lc 1212:29-1212:31
+1212:29-1212:31
     forall a . [a]
-SampleMaterial.lc 1213:31-1213:37
+1213:31-1213:37
     String -> StageTexture
-SampleMaterial.lc 1213:31-1213:74
+1213:31-1213:74
     StageTexture
-SampleMaterial.lc 1213:38-1213:74
+1213:38-1213:74
     String
-SampleMaterial.lc 1214:34-1214:38
+1214:34-1214:38
     Bool
-SampleMaterial.lc 1215:33-1215:41
+1215:33-1215:41
     DepthFunction
-SampleMaterial.lc 1216:33-1216:40
+1216:33-1216:40
     forall a . Maybe a
-SampleMaterial.lc 1217:41-1217:46
+1217:41-1217:46
     Bool
-SampleMaterial.lc 1218:38-1218:54
+1218:38-1218:54
     String
-SampleMaterial.lc 1220:15-1220:25
+1220:15-1220:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -10176,82 +10176,82 @@ SampleMaterial.lc 1220:15-1220:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1220:15-1221:57
+1220:15-1221:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1220:15-1222:50
+1220:15-1222:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1220:15-1223:42
+1220:15-1223:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1220:15-1224:40
+1220:15-1224:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1220:15-1225:31
+1220:15-1225:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1220:15-1226:42
+1220:15-1226:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1220:15-1227:38
+1220:15-1227:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1220:15-1228:41
+1220:15-1228:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1220:15-1229:40
+1220:15-1229:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1220:15-1230:46
+1220:15-1230:46
     String -> StageAttrs
-SampleMaterial.lc 1220:15-1232:18
+1220:15-1232:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1221:29-1221:33
+1221:29-1221:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1221:29-1221:57
+1221:29-1221:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1221:34-1221:57
+1221:34-1221:57
     (Blending', Blending')
-SampleMaterial.lc 1221:36-1221:46
+1221:36-1221:46
     Blending'
-SampleMaterial.lc 1221:49-1221:55
+1221:49-1221:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1222:30-1222:50
+1222:30-1222:50
     RGBGen
-SampleMaterial.lc 1223:32-1223:42
+1223:32-1223:42
     AlphaGen
-SampleMaterial.lc 1224:29-1224:40
+1224:29-1224:40
     TCGen
-SampleMaterial.lc 1225:29-1225:31
+1225:29-1225:31
     forall a . [a]
-SampleMaterial.lc 1226:31-1226:42
+1226:31-1226:42
     StageTexture
-SampleMaterial.lc 1227:34-1227:38
+1227:34-1227:38
     Bool
-SampleMaterial.lc 1228:33-1228:41
+1228:33-1228:41
     DepthFunction
-SampleMaterial.lc 1229:33-1229:40
+1229:33-1229:40
     forall a . Maybe a
-SampleMaterial.lc 1230:41-1230:46
+1230:41-1230:46
     Bool
-SampleMaterial.lc 1231:38-1231:54
+1231:38-1231:54
     String
-SampleMaterial.lc 1234:21-1234:26
+1234:21-1234:26
     Bool
-SampleMaterial.lc 1237:5-1279:6
+1237:5-1279:6
     (String, CommonAttrs)
-SampleMaterial.lc 1237:5-2182:6
+1237:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1237:7-1237:41
+1237:7-1237:41
     String
-SampleMaterial.lc 1238:7-1238:18
+1238:7-1238:18
     ()
       -> ()
         -> Bool
@@ -10259,68 +10259,68 @@ SampleMaterial.lc 1238:7-1238:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1238:7-1239:26
+1238:7-1239:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1238:7-1240:26
+1238:7-1240:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1238:7-1241:27
+1238:7-1241:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1238:7-1242:21
+1238:7-1242:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1238:7-1243:35
+1238:7-1243:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1238:7-1244:28
+1238:7-1244:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1238:7-1245:33
+1238:7-1245:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1238:7-1246:32
+1238:7-1246:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1238:7-1247:30
+1238:7-1247:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1238:7-1248:34
+1238:7-1248:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1238:7-1276:14
+1238:7-1276:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1238:7-1278:10
+1238:7-1278:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1239:24-1239:26
+1239:24-1239:26
     ()
-SampleMaterial.lc 1240:24-1240:26
+1240:24-1240:26
     ()
-SampleMaterial.lc 1241:22-1241:27
+1241:22-1241:27
     Bool
-SampleMaterial.lc 1242:20-1242:21
+1242:20-1242:21
     _b
-SampleMaterial.lc 1243:30-1243:35
+1243:30-1243:35
     Bool
-SampleMaterial.lc 1244:23-1244:28
+1244:23-1244:28
     Bool
-SampleMaterial.lc 1245:20-1245:33
+1245:20-1245:33
     CullType
-SampleMaterial.lc 1246:30-1246:32
+1246:30-1246:32
     forall a . [a]
-SampleMaterial.lc 1247:25-1247:30
+1247:25-1247:30
     Bool
-SampleMaterial.lc 1248:29-1248:34
+1248:29-1248:34
     Bool
-SampleMaterial.lc 1250:13-1276:14
+1250:13-1276:14
     [StageAttrs]
-SampleMaterial.lc 1250:15-1250:25
+1250:15-1250:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -10328,70 +10328,70 @@ SampleMaterial.lc 1250:15-1250:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1250:15-1251:36
+1250:15-1251:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1250:15-1252:50
+1250:15-1252:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1250:15-1253:42
+1250:15-1253:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1250:15-1254:36
+1250:15-1254:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1250:15-1255:31
+1250:15-1255:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1250:15-1256:72
+1250:15-1256:72
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1250:15-1257:38
+1250:15-1257:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1250:15-1258:41
+1250:15-1258:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1250:15-1259:40
+1250:15-1259:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1250:15-1260:46
+1250:15-1260:46
     String -> StageAttrs
-SampleMaterial.lc 1250:15-1262:18
+1250:15-1262:18
     StageAttrs
-SampleMaterial.lc 1251:29-1251:36
+1251:29-1251:36
     forall a . Maybe a
-SampleMaterial.lc 1252:30-1252:50
+1252:30-1252:50
     RGBGen
-SampleMaterial.lc 1253:32-1253:42
+1253:32-1253:42
     AlphaGen
-SampleMaterial.lc 1254:29-1254:36
+1254:29-1254:36
     TCGen
-SampleMaterial.lc 1255:29-1255:31
+1255:29-1255:31
     forall a . [a]
-SampleMaterial.lc 1256:31-1256:37
+1256:31-1256:37
     String -> StageTexture
-SampleMaterial.lc 1256:31-1256:72
+1256:31-1256:72
     StageTexture
-SampleMaterial.lc 1256:38-1256:72
+1256:38-1256:72
     String
-SampleMaterial.lc 1257:34-1257:38
+1257:34-1257:38
     Bool
-SampleMaterial.lc 1258:33-1258:41
+1258:33-1258:41
     DepthFunction
-SampleMaterial.lc 1259:33-1259:40
+1259:33-1259:40
     forall a . Maybe a
-SampleMaterial.lc 1260:41-1260:46
+1260:41-1260:46
     Bool
-SampleMaterial.lc 1261:38-1261:54
+1261:38-1261:54
     String
-SampleMaterial.lc 1263:15-1263:25
+1263:15-1263:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -10399,82 +10399,82 @@ SampleMaterial.lc 1263:15-1263:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1263:15-1264:57
+1263:15-1264:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1263:15-1265:50
+1263:15-1265:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1263:15-1266:42
+1263:15-1266:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1263:15-1267:40
+1263:15-1267:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1263:15-1268:31
+1263:15-1268:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1263:15-1269:42
+1263:15-1269:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1263:15-1270:38
+1263:15-1270:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1263:15-1271:41
+1263:15-1271:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1263:15-1272:40
+1263:15-1272:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1263:15-1273:46
+1263:15-1273:46
     String -> StageAttrs
-SampleMaterial.lc 1263:15-1275:18
+1263:15-1275:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1264:29-1264:33
+1264:29-1264:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1264:29-1264:57
+1264:29-1264:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1264:34-1264:57
+1264:34-1264:57
     (Blending', Blending')
-SampleMaterial.lc 1264:36-1264:46
+1264:36-1264:46
     Blending'
-SampleMaterial.lc 1264:49-1264:55
+1264:49-1264:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1265:30-1265:50
+1265:30-1265:50
     RGBGen
-SampleMaterial.lc 1266:32-1266:42
+1266:32-1266:42
     AlphaGen
-SampleMaterial.lc 1267:29-1267:40
+1267:29-1267:40
     TCGen
-SampleMaterial.lc 1268:29-1268:31
+1268:29-1268:31
     forall a . [a]
-SampleMaterial.lc 1269:31-1269:42
+1269:31-1269:42
     StageTexture
-SampleMaterial.lc 1270:34-1270:38
+1270:34-1270:38
     Bool
-SampleMaterial.lc 1271:33-1271:41
+1271:33-1271:41
     DepthFunction
-SampleMaterial.lc 1272:33-1272:40
+1272:33-1272:40
     forall a . Maybe a
-SampleMaterial.lc 1273:41-1273:46
+1273:41-1273:46
     Bool
-SampleMaterial.lc 1274:38-1274:54
+1274:38-1274:54
     String
-SampleMaterial.lc 1277:21-1277:26
+1277:21-1277:26
     Bool
-SampleMaterial.lc 1280:5-1322:6
+1280:5-1322:6
     (String, CommonAttrs)
-SampleMaterial.lc 1280:5-2182:6
+1280:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1280:7-1280:44
+1280:7-1280:44
     String
-SampleMaterial.lc 1281:7-1281:18
+1281:7-1281:18
     ()
       -> ()
         -> Bool
@@ -10482,68 +10482,68 @@ SampleMaterial.lc 1281:7-1281:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1281:7-1282:26
+1281:7-1282:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1281:7-1283:26
+1281:7-1283:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1281:7-1284:27
+1281:7-1284:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1281:7-1285:21
+1281:7-1285:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1281:7-1286:35
+1281:7-1286:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1281:7-1287:28
+1281:7-1287:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1281:7-1288:33
+1281:7-1288:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1281:7-1289:32
+1281:7-1289:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1281:7-1290:30
+1281:7-1290:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1281:7-1291:34
+1281:7-1291:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1281:7-1319:14
+1281:7-1319:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1281:7-1321:10
+1281:7-1321:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1282:24-1282:26
+1282:24-1282:26
     ()
-SampleMaterial.lc 1283:24-1283:26
+1283:24-1283:26
     ()
-SampleMaterial.lc 1284:22-1284:27
+1284:22-1284:27
     Bool
-SampleMaterial.lc 1285:20-1285:21
+1285:20-1285:21
     _b
-SampleMaterial.lc 1286:30-1286:35
+1286:30-1286:35
     Bool
-SampleMaterial.lc 1287:23-1287:28
+1287:23-1287:28
     Bool
-SampleMaterial.lc 1288:20-1288:33
+1288:20-1288:33
     CullType
-SampleMaterial.lc 1289:30-1289:32
+1289:30-1289:32
     forall a . [a]
-SampleMaterial.lc 1290:25-1290:30
+1290:25-1290:30
     Bool
-SampleMaterial.lc 1291:29-1291:34
+1291:29-1291:34
     Bool
-SampleMaterial.lc 1293:13-1319:14
+1293:13-1319:14
     [StageAttrs]
-SampleMaterial.lc 1293:15-1293:25
+1293:15-1293:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -10551,70 +10551,70 @@ SampleMaterial.lc 1293:15-1293:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1293:15-1294:36
+1293:15-1294:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1293:15-1295:50
+1293:15-1295:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1293:15-1296:42
+1293:15-1296:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1293:15-1297:36
+1293:15-1297:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1293:15-1298:31
+1293:15-1298:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1293:15-1299:75
+1293:15-1299:75
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1293:15-1300:38
+1293:15-1300:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1293:15-1301:41
+1293:15-1301:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1293:15-1302:40
+1293:15-1302:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1293:15-1303:46
+1293:15-1303:46
     String -> StageAttrs
-SampleMaterial.lc 1293:15-1305:18
+1293:15-1305:18
     StageAttrs
-SampleMaterial.lc 1294:29-1294:36
+1294:29-1294:36
     forall a . Maybe a
-SampleMaterial.lc 1295:30-1295:50
+1295:30-1295:50
     RGBGen
-SampleMaterial.lc 1296:32-1296:42
+1296:32-1296:42
     AlphaGen
-SampleMaterial.lc 1297:29-1297:36
+1297:29-1297:36
     TCGen
-SampleMaterial.lc 1298:29-1298:31
+1298:29-1298:31
     forall a . [a]
-SampleMaterial.lc 1299:31-1299:37
+1299:31-1299:37
     String -> StageTexture
-SampleMaterial.lc 1299:31-1299:75
+1299:31-1299:75
     StageTexture
-SampleMaterial.lc 1299:38-1299:75
+1299:38-1299:75
     String
-SampleMaterial.lc 1300:34-1300:38
+1300:34-1300:38
     Bool
-SampleMaterial.lc 1301:33-1301:41
+1301:33-1301:41
     DepthFunction
-SampleMaterial.lc 1302:33-1302:40
+1302:33-1302:40
     forall a . Maybe a
-SampleMaterial.lc 1303:41-1303:46
+1303:41-1303:46
     Bool
-SampleMaterial.lc 1304:38-1304:54
+1304:38-1304:54
     String
-SampleMaterial.lc 1306:15-1306:25
+1306:15-1306:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -10622,82 +10622,82 @@ SampleMaterial.lc 1306:15-1306:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1306:15-1307:57
+1306:15-1307:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1306:15-1308:50
+1306:15-1308:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1306:15-1309:42
+1306:15-1309:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1306:15-1310:40
+1306:15-1310:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1306:15-1311:31
+1306:15-1311:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1306:15-1312:42
+1306:15-1312:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1306:15-1313:38
+1306:15-1313:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1306:15-1314:41
+1306:15-1314:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1306:15-1315:40
+1306:15-1315:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1306:15-1316:46
+1306:15-1316:46
     String -> StageAttrs
-SampleMaterial.lc 1306:15-1318:18
+1306:15-1318:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1307:29-1307:33
+1307:29-1307:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1307:29-1307:57
+1307:29-1307:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1307:34-1307:57
+1307:34-1307:57
     (Blending', Blending')
-SampleMaterial.lc 1307:36-1307:46
+1307:36-1307:46
     Blending'
-SampleMaterial.lc 1307:49-1307:55
+1307:49-1307:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1308:30-1308:50
+1308:30-1308:50
     RGBGen
-SampleMaterial.lc 1309:32-1309:42
+1309:32-1309:42
     AlphaGen
-SampleMaterial.lc 1310:29-1310:40
+1310:29-1310:40
     TCGen
-SampleMaterial.lc 1311:29-1311:31
+1311:29-1311:31
     forall a . [a]
-SampleMaterial.lc 1312:31-1312:42
+1312:31-1312:42
     StageTexture
-SampleMaterial.lc 1313:34-1313:38
+1313:34-1313:38
     Bool
-SampleMaterial.lc 1314:33-1314:41
+1314:33-1314:41
     DepthFunction
-SampleMaterial.lc 1315:33-1315:40
+1315:33-1315:40
     forall a . Maybe a
-SampleMaterial.lc 1316:41-1316:46
+1316:41-1316:46
     Bool
-SampleMaterial.lc 1317:38-1317:54
+1317:38-1317:54
     String
-SampleMaterial.lc 1320:21-1320:26
+1320:21-1320:26
     Bool
-SampleMaterial.lc 1323:5-1365:6
+1323:5-1365:6
     (String, CommonAttrs)
-SampleMaterial.lc 1323:5-2182:6
+1323:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1323:7-1323:43
+1323:7-1323:43
     String
-SampleMaterial.lc 1324:7-1324:18
+1324:7-1324:18
     ()
       -> ()
         -> Bool
@@ -10705,68 +10705,68 @@ SampleMaterial.lc 1324:7-1324:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1324:7-1325:26
+1324:7-1325:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1324:7-1326:26
+1324:7-1326:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1324:7-1327:27
+1324:7-1327:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1324:7-1328:21
+1324:7-1328:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1324:7-1329:35
+1324:7-1329:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1324:7-1330:28
+1324:7-1330:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1324:7-1331:33
+1324:7-1331:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1324:7-1332:32
+1324:7-1332:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1324:7-1333:30
+1324:7-1333:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1324:7-1334:34
+1324:7-1334:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1324:7-1362:14
+1324:7-1362:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1324:7-1364:10
+1324:7-1364:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1325:24-1325:26
+1325:24-1325:26
     ()
-SampleMaterial.lc 1326:24-1326:26
+1326:24-1326:26
     ()
-SampleMaterial.lc 1327:22-1327:27
+1327:22-1327:27
     Bool
-SampleMaterial.lc 1328:20-1328:21
+1328:20-1328:21
     _b
-SampleMaterial.lc 1329:30-1329:35
+1329:30-1329:35
     Bool
-SampleMaterial.lc 1330:23-1330:28
+1330:23-1330:28
     Bool
-SampleMaterial.lc 1331:20-1331:33
+1331:20-1331:33
     CullType
-SampleMaterial.lc 1332:30-1332:32
+1332:30-1332:32
     forall a . [a]
-SampleMaterial.lc 1333:25-1333:30
+1333:25-1333:30
     Bool
-SampleMaterial.lc 1334:29-1334:34
+1334:29-1334:34
     Bool
-SampleMaterial.lc 1336:13-1362:14
+1336:13-1362:14
     [StageAttrs]
-SampleMaterial.lc 1336:15-1336:25
+1336:15-1336:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -10774,70 +10774,70 @@ SampleMaterial.lc 1336:15-1336:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1336:15-1337:36
+1336:15-1337:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1336:15-1338:50
+1336:15-1338:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1336:15-1339:42
+1336:15-1339:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1336:15-1340:36
+1336:15-1340:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1336:15-1341:31
+1336:15-1341:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1336:15-1342:74
+1336:15-1342:74
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1336:15-1343:38
+1336:15-1343:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1336:15-1344:41
+1336:15-1344:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1336:15-1345:40
+1336:15-1345:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1336:15-1346:46
+1336:15-1346:46
     String -> StageAttrs
-SampleMaterial.lc 1336:15-1348:18
+1336:15-1348:18
     StageAttrs
-SampleMaterial.lc 1337:29-1337:36
+1337:29-1337:36
     forall a . Maybe a
-SampleMaterial.lc 1338:30-1338:50
+1338:30-1338:50
     RGBGen
-SampleMaterial.lc 1339:32-1339:42
+1339:32-1339:42
     AlphaGen
-SampleMaterial.lc 1340:29-1340:36
+1340:29-1340:36
     TCGen
-SampleMaterial.lc 1341:29-1341:31
+1341:29-1341:31
     forall a . [a]
-SampleMaterial.lc 1342:31-1342:37
+1342:31-1342:37
     String -> StageTexture
-SampleMaterial.lc 1342:31-1342:74
+1342:31-1342:74
     StageTexture
-SampleMaterial.lc 1342:38-1342:74
+1342:38-1342:74
     String
-SampleMaterial.lc 1343:34-1343:38
+1343:34-1343:38
     Bool
-SampleMaterial.lc 1344:33-1344:41
+1344:33-1344:41
     DepthFunction
-SampleMaterial.lc 1345:33-1345:40
+1345:33-1345:40
     forall a . Maybe a
-SampleMaterial.lc 1346:41-1346:46
+1346:41-1346:46
     Bool
-SampleMaterial.lc 1347:38-1347:54
+1347:38-1347:54
     String
-SampleMaterial.lc 1349:15-1349:25
+1349:15-1349:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -10845,82 +10845,82 @@ SampleMaterial.lc 1349:15-1349:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1349:15-1350:57
+1349:15-1350:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1349:15-1351:50
+1349:15-1351:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1349:15-1352:42
+1349:15-1352:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1349:15-1353:40
+1349:15-1353:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1349:15-1354:31
+1349:15-1354:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1349:15-1355:42
+1349:15-1355:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1349:15-1356:38
+1349:15-1356:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1349:15-1357:41
+1349:15-1357:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1349:15-1358:40
+1349:15-1358:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1349:15-1359:46
+1349:15-1359:46
     String -> StageAttrs
-SampleMaterial.lc 1349:15-1361:18
+1349:15-1361:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1350:29-1350:33
+1350:29-1350:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1350:29-1350:57
+1350:29-1350:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1350:34-1350:57
+1350:34-1350:57
     (Blending', Blending')
-SampleMaterial.lc 1350:36-1350:46
+1350:36-1350:46
     Blending'
-SampleMaterial.lc 1350:49-1350:55
+1350:49-1350:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1351:30-1351:50
+1351:30-1351:50
     RGBGen
-SampleMaterial.lc 1352:32-1352:42
+1352:32-1352:42
     AlphaGen
-SampleMaterial.lc 1353:29-1353:40
+1353:29-1353:40
     TCGen
-SampleMaterial.lc 1354:29-1354:31
+1354:29-1354:31
     forall a . [a]
-SampleMaterial.lc 1355:31-1355:42
+1355:31-1355:42
     StageTexture
-SampleMaterial.lc 1356:34-1356:38
+1356:34-1356:38
     Bool
-SampleMaterial.lc 1357:33-1357:41
+1357:33-1357:41
     DepthFunction
-SampleMaterial.lc 1358:33-1358:40
+1358:33-1358:40
     forall a . Maybe a
-SampleMaterial.lc 1359:41-1359:46
+1359:41-1359:46
     Bool
-SampleMaterial.lc 1360:38-1360:54
+1360:38-1360:54
     String
-SampleMaterial.lc 1363:21-1363:26
+1363:21-1363:26
     Bool
-SampleMaterial.lc 1366:5-1408:6
+1366:5-1408:6
     (String, CommonAttrs)
-SampleMaterial.lc 1366:5-2182:6
+1366:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1366:7-1366:44
+1366:7-1366:44
     String
-SampleMaterial.lc 1367:7-1367:18
+1367:7-1367:18
     ()
       -> ()
         -> Bool
@@ -10928,68 +10928,68 @@ SampleMaterial.lc 1367:7-1367:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1367:7-1368:26
+1367:7-1368:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1367:7-1369:26
+1367:7-1369:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1367:7-1370:27
+1367:7-1370:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1367:7-1371:21
+1367:7-1371:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1367:7-1372:35
+1367:7-1372:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1367:7-1373:28
+1367:7-1373:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1367:7-1374:33
+1367:7-1374:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1367:7-1375:32
+1367:7-1375:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1367:7-1376:30
+1367:7-1376:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1367:7-1377:34
+1367:7-1377:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1367:7-1405:14
+1367:7-1405:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1367:7-1407:10
+1367:7-1407:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1368:24-1368:26
+1368:24-1368:26
     ()
-SampleMaterial.lc 1369:24-1369:26
+1369:24-1369:26
     ()
-SampleMaterial.lc 1370:22-1370:27
+1370:22-1370:27
     Bool
-SampleMaterial.lc 1371:20-1371:21
+1371:20-1371:21
     _b
-SampleMaterial.lc 1372:30-1372:35
+1372:30-1372:35
     Bool
-SampleMaterial.lc 1373:23-1373:28
+1373:23-1373:28
     Bool
-SampleMaterial.lc 1374:20-1374:33
+1374:20-1374:33
     CullType
-SampleMaterial.lc 1375:30-1375:32
+1375:30-1375:32
     forall a . [a]
-SampleMaterial.lc 1376:25-1376:30
+1376:25-1376:30
     Bool
-SampleMaterial.lc 1377:29-1377:34
+1377:29-1377:34
     Bool
-SampleMaterial.lc 1379:13-1405:14
+1379:13-1405:14
     [StageAttrs]
-SampleMaterial.lc 1379:15-1379:25
+1379:15-1379:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -10997,70 +10997,70 @@ SampleMaterial.lc 1379:15-1379:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1379:15-1380:36
+1379:15-1380:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1379:15-1381:50
+1379:15-1381:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1379:15-1382:42
+1379:15-1382:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1379:15-1383:36
+1379:15-1383:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1379:15-1384:31
+1379:15-1384:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1379:15-1385:75
+1379:15-1385:75
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1379:15-1386:38
+1379:15-1386:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1379:15-1387:41
+1379:15-1387:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1379:15-1388:40
+1379:15-1388:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1379:15-1389:46
+1379:15-1389:46
     String -> StageAttrs
-SampleMaterial.lc 1379:15-1391:18
+1379:15-1391:18
     StageAttrs
-SampleMaterial.lc 1380:29-1380:36
+1380:29-1380:36
     forall a . Maybe a
-SampleMaterial.lc 1381:30-1381:50
+1381:30-1381:50
     RGBGen
-SampleMaterial.lc 1382:32-1382:42
+1382:32-1382:42
     AlphaGen
-SampleMaterial.lc 1383:29-1383:36
+1383:29-1383:36
     TCGen
-SampleMaterial.lc 1384:29-1384:31
+1384:29-1384:31
     forall a . [a]
-SampleMaterial.lc 1385:31-1385:37
+1385:31-1385:37
     String -> StageTexture
-SampleMaterial.lc 1385:31-1385:75
+1385:31-1385:75
     StageTexture
-SampleMaterial.lc 1385:38-1385:75
+1385:38-1385:75
     String
-SampleMaterial.lc 1386:34-1386:38
+1386:34-1386:38
     Bool
-SampleMaterial.lc 1387:33-1387:41
+1387:33-1387:41
     DepthFunction
-SampleMaterial.lc 1388:33-1388:40
+1388:33-1388:40
     forall a . Maybe a
-SampleMaterial.lc 1389:41-1389:46
+1389:41-1389:46
     Bool
-SampleMaterial.lc 1390:38-1390:54
+1390:38-1390:54
     String
-SampleMaterial.lc 1392:15-1392:25
+1392:15-1392:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -11068,82 +11068,82 @@ SampleMaterial.lc 1392:15-1392:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1392:15-1393:57
+1392:15-1393:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1392:15-1394:50
+1392:15-1394:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1392:15-1395:42
+1392:15-1395:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1392:15-1396:40
+1392:15-1396:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1392:15-1397:31
+1392:15-1397:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1392:15-1398:42
+1392:15-1398:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1392:15-1399:38
+1392:15-1399:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1392:15-1400:41
+1392:15-1400:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1392:15-1401:40
+1392:15-1401:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1392:15-1402:46
+1392:15-1402:46
     String -> StageAttrs
-SampleMaterial.lc 1392:15-1404:18
+1392:15-1404:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1393:29-1393:33
+1393:29-1393:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1393:29-1393:57
+1393:29-1393:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1393:34-1393:57
+1393:34-1393:57
     (Blending', Blending')
-SampleMaterial.lc 1393:36-1393:46
+1393:36-1393:46
     Blending'
-SampleMaterial.lc 1393:49-1393:55
+1393:49-1393:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1394:30-1394:50
+1394:30-1394:50
     RGBGen
-SampleMaterial.lc 1395:32-1395:42
+1395:32-1395:42
     AlphaGen
-SampleMaterial.lc 1396:29-1396:40
+1396:29-1396:40
     TCGen
-SampleMaterial.lc 1397:29-1397:31
+1397:29-1397:31
     forall a . [a]
-SampleMaterial.lc 1398:31-1398:42
+1398:31-1398:42
     StageTexture
-SampleMaterial.lc 1399:34-1399:38
+1399:34-1399:38
     Bool
-SampleMaterial.lc 1400:33-1400:41
+1400:33-1400:41
     DepthFunction
-SampleMaterial.lc 1401:33-1401:40
+1401:33-1401:40
     forall a . Maybe a
-SampleMaterial.lc 1402:41-1402:46
+1402:41-1402:46
     Bool
-SampleMaterial.lc 1403:38-1403:54
+1403:38-1403:54
     String
-SampleMaterial.lc 1406:21-1406:26
+1406:21-1406:26
     Bool
-SampleMaterial.lc 1409:5-1451:6
+1409:5-1451:6
     (String, CommonAttrs)
-SampleMaterial.lc 1409:5-2182:6
+1409:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1409:7-1409:44
+1409:7-1409:44
     String
-SampleMaterial.lc 1410:7-1410:18
+1410:7-1410:18
     ()
       -> ()
         -> Bool
@@ -11151,68 +11151,68 @@ SampleMaterial.lc 1410:7-1410:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1410:7-1411:26
+1410:7-1411:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1410:7-1412:26
+1410:7-1412:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1410:7-1413:27
+1410:7-1413:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1410:7-1414:21
+1410:7-1414:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1410:7-1415:35
+1410:7-1415:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1410:7-1416:28
+1410:7-1416:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1410:7-1417:33
+1410:7-1417:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1410:7-1418:32
+1410:7-1418:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1410:7-1419:30
+1410:7-1419:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1410:7-1420:34
+1410:7-1420:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1410:7-1448:14
+1410:7-1448:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1410:7-1450:10
+1410:7-1450:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1411:24-1411:26
+1411:24-1411:26
     ()
-SampleMaterial.lc 1412:24-1412:26
+1412:24-1412:26
     ()
-SampleMaterial.lc 1413:22-1413:27
+1413:22-1413:27
     Bool
-SampleMaterial.lc 1414:20-1414:21
+1414:20-1414:21
     _b
-SampleMaterial.lc 1415:30-1415:35
+1415:30-1415:35
     Bool
-SampleMaterial.lc 1416:23-1416:28
+1416:23-1416:28
     Bool
-SampleMaterial.lc 1417:20-1417:33
+1417:20-1417:33
     CullType
-SampleMaterial.lc 1418:30-1418:32
+1418:30-1418:32
     forall a . [a]
-SampleMaterial.lc 1419:25-1419:30
+1419:25-1419:30
     Bool
-SampleMaterial.lc 1420:29-1420:34
+1420:29-1420:34
     Bool
-SampleMaterial.lc 1422:13-1448:14
+1422:13-1448:14
     [StageAttrs]
-SampleMaterial.lc 1422:15-1422:25
+1422:15-1422:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -11220,70 +11220,70 @@ SampleMaterial.lc 1422:15-1422:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1422:15-1423:36
+1422:15-1423:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1422:15-1424:50
+1422:15-1424:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1422:15-1425:42
+1422:15-1425:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1422:15-1426:36
+1422:15-1426:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1422:15-1427:31
+1422:15-1427:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1422:15-1428:75
+1422:15-1428:75
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1422:15-1429:38
+1422:15-1429:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1422:15-1430:41
+1422:15-1430:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1422:15-1431:40
+1422:15-1431:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1422:15-1432:46
+1422:15-1432:46
     String -> StageAttrs
-SampleMaterial.lc 1422:15-1434:18
+1422:15-1434:18
     StageAttrs
-SampleMaterial.lc 1423:29-1423:36
+1423:29-1423:36
     forall a . Maybe a
-SampleMaterial.lc 1424:30-1424:50
+1424:30-1424:50
     RGBGen
-SampleMaterial.lc 1425:32-1425:42
+1425:32-1425:42
     AlphaGen
-SampleMaterial.lc 1426:29-1426:36
+1426:29-1426:36
     TCGen
-SampleMaterial.lc 1427:29-1427:31
+1427:29-1427:31
     forall a . [a]
-SampleMaterial.lc 1428:31-1428:37
+1428:31-1428:37
     String -> StageTexture
-SampleMaterial.lc 1428:31-1428:75
+1428:31-1428:75
     StageTexture
-SampleMaterial.lc 1428:38-1428:75
+1428:38-1428:75
     String
-SampleMaterial.lc 1429:34-1429:38
+1429:34-1429:38
     Bool
-SampleMaterial.lc 1430:33-1430:41
+1430:33-1430:41
     DepthFunction
-SampleMaterial.lc 1431:33-1431:40
+1431:33-1431:40
     forall a . Maybe a
-SampleMaterial.lc 1432:41-1432:46
+1432:41-1432:46
     Bool
-SampleMaterial.lc 1433:38-1433:54
+1433:38-1433:54
     String
-SampleMaterial.lc 1435:15-1435:25
+1435:15-1435:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -11291,82 +11291,82 @@ SampleMaterial.lc 1435:15-1435:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1435:15-1436:57
+1435:15-1436:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1435:15-1437:50
+1435:15-1437:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1435:15-1438:42
+1435:15-1438:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1435:15-1439:40
+1435:15-1439:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1435:15-1440:31
+1435:15-1440:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1435:15-1441:42
+1435:15-1441:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1435:15-1442:38
+1435:15-1442:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1435:15-1443:41
+1435:15-1443:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1435:15-1444:40
+1435:15-1444:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1435:15-1445:46
+1435:15-1445:46
     String -> StageAttrs
-SampleMaterial.lc 1435:15-1447:18
+1435:15-1447:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1436:29-1436:33
+1436:29-1436:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1436:29-1436:57
+1436:29-1436:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1436:34-1436:57
+1436:34-1436:57
     (Blending', Blending')
-SampleMaterial.lc 1436:36-1436:46
+1436:36-1436:46
     Blending'
-SampleMaterial.lc 1436:49-1436:55
+1436:49-1436:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1437:30-1437:50
+1437:30-1437:50
     RGBGen
-SampleMaterial.lc 1438:32-1438:42
+1438:32-1438:42
     AlphaGen
-SampleMaterial.lc 1439:29-1439:40
+1439:29-1439:40
     TCGen
-SampleMaterial.lc 1440:29-1440:31
+1440:29-1440:31
     forall a . [a]
-SampleMaterial.lc 1441:31-1441:42
+1441:31-1441:42
     StageTexture
-SampleMaterial.lc 1442:34-1442:38
+1442:34-1442:38
     Bool
-SampleMaterial.lc 1443:33-1443:41
+1443:33-1443:41
     DepthFunction
-SampleMaterial.lc 1444:33-1444:40
+1444:33-1444:40
     forall a . Maybe a
-SampleMaterial.lc 1445:41-1445:46
+1445:41-1445:46
     Bool
-SampleMaterial.lc 1446:38-1446:54
+1446:38-1446:54
     String
-SampleMaterial.lc 1449:21-1449:26
+1449:21-1449:26
     Bool
-SampleMaterial.lc 1452:5-1494:6
+1452:5-1494:6
     (String, CommonAttrs)
-SampleMaterial.lc 1452:5-2182:6
+1452:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1452:7-1452:44
+1452:7-1452:44
     String
-SampleMaterial.lc 1453:7-1453:18
+1453:7-1453:18
     ()
       -> ()
         -> Bool
@@ -11374,68 +11374,68 @@ SampleMaterial.lc 1453:7-1453:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1453:7-1454:26
+1453:7-1454:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1453:7-1455:26
+1453:7-1455:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1453:7-1456:27
+1453:7-1456:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1453:7-1457:21
+1453:7-1457:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1453:7-1458:35
+1453:7-1458:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1453:7-1459:28
+1453:7-1459:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1453:7-1460:33
+1453:7-1460:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1453:7-1461:32
+1453:7-1461:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1453:7-1462:30
+1453:7-1462:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1453:7-1463:34
+1453:7-1463:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1453:7-1491:14
+1453:7-1491:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1453:7-1493:10
+1453:7-1493:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1454:24-1454:26
+1454:24-1454:26
     ()
-SampleMaterial.lc 1455:24-1455:26
+1455:24-1455:26
     ()
-SampleMaterial.lc 1456:22-1456:27
+1456:22-1456:27
     Bool
-SampleMaterial.lc 1457:20-1457:21
+1457:20-1457:21
     _b
-SampleMaterial.lc 1458:30-1458:35
+1458:30-1458:35
     Bool
-SampleMaterial.lc 1459:23-1459:28
+1459:23-1459:28
     Bool
-SampleMaterial.lc 1460:20-1460:33
+1460:20-1460:33
     CullType
-SampleMaterial.lc 1461:30-1461:32
+1461:30-1461:32
     forall a . [a]
-SampleMaterial.lc 1462:25-1462:30
+1462:25-1462:30
     Bool
-SampleMaterial.lc 1463:29-1463:34
+1463:29-1463:34
     Bool
-SampleMaterial.lc 1465:13-1491:14
+1465:13-1491:14
     [StageAttrs]
-SampleMaterial.lc 1465:15-1465:25
+1465:15-1465:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -11443,70 +11443,70 @@ SampleMaterial.lc 1465:15-1465:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1465:15-1466:36
+1465:15-1466:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1465:15-1467:50
+1465:15-1467:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1465:15-1468:42
+1465:15-1468:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1465:15-1469:36
+1465:15-1469:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1465:15-1470:31
+1465:15-1470:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1465:15-1471:75
+1465:15-1471:75
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1465:15-1472:38
+1465:15-1472:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1465:15-1473:41
+1465:15-1473:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1465:15-1474:40
+1465:15-1474:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1465:15-1475:46
+1465:15-1475:46
     String -> StageAttrs
-SampleMaterial.lc 1465:15-1477:18
+1465:15-1477:18
     StageAttrs
-SampleMaterial.lc 1466:29-1466:36
+1466:29-1466:36
     forall a . Maybe a
-SampleMaterial.lc 1467:30-1467:50
+1467:30-1467:50
     RGBGen
-SampleMaterial.lc 1468:32-1468:42
+1468:32-1468:42
     AlphaGen
-SampleMaterial.lc 1469:29-1469:36
+1469:29-1469:36
     TCGen
-SampleMaterial.lc 1470:29-1470:31
+1470:29-1470:31
     forall a . [a]
-SampleMaterial.lc 1471:31-1471:37
+1471:31-1471:37
     String -> StageTexture
-SampleMaterial.lc 1471:31-1471:75
+1471:31-1471:75
     StageTexture
-SampleMaterial.lc 1471:38-1471:75
+1471:38-1471:75
     String
-SampleMaterial.lc 1472:34-1472:38
+1472:34-1472:38
     Bool
-SampleMaterial.lc 1473:33-1473:41
+1473:33-1473:41
     DepthFunction
-SampleMaterial.lc 1474:33-1474:40
+1474:33-1474:40
     forall a . Maybe a
-SampleMaterial.lc 1475:41-1475:46
+1475:41-1475:46
     Bool
-SampleMaterial.lc 1476:38-1476:54
+1476:38-1476:54
     String
-SampleMaterial.lc 1478:15-1478:25
+1478:15-1478:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -11514,82 +11514,82 @@ SampleMaterial.lc 1478:15-1478:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1478:15-1479:57
+1478:15-1479:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1478:15-1480:50
+1478:15-1480:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1478:15-1481:42
+1478:15-1481:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1478:15-1482:40
+1478:15-1482:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1478:15-1483:31
+1478:15-1483:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1478:15-1484:42
+1478:15-1484:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1478:15-1485:38
+1478:15-1485:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1478:15-1486:41
+1478:15-1486:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1478:15-1487:40
+1478:15-1487:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1478:15-1488:46
+1478:15-1488:46
     String -> StageAttrs
-SampleMaterial.lc 1478:15-1490:18
+1478:15-1490:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1479:29-1479:33
+1479:29-1479:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1479:29-1479:57
+1479:29-1479:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1479:34-1479:57
+1479:34-1479:57
     (Blending', Blending')
-SampleMaterial.lc 1479:36-1479:46
+1479:36-1479:46
     Blending'
-SampleMaterial.lc 1479:49-1479:55
+1479:49-1479:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1480:30-1480:50
+1480:30-1480:50
     RGBGen
-SampleMaterial.lc 1481:32-1481:42
+1481:32-1481:42
     AlphaGen
-SampleMaterial.lc 1482:29-1482:40
+1482:29-1482:40
     TCGen
-SampleMaterial.lc 1483:29-1483:31
+1483:29-1483:31
     forall a . [a]
-SampleMaterial.lc 1484:31-1484:42
+1484:31-1484:42
     StageTexture
-SampleMaterial.lc 1485:34-1485:38
+1485:34-1485:38
     Bool
-SampleMaterial.lc 1486:33-1486:41
+1486:33-1486:41
     DepthFunction
-SampleMaterial.lc 1487:33-1487:40
+1487:33-1487:40
     forall a . Maybe a
-SampleMaterial.lc 1488:41-1488:46
+1488:41-1488:46
     Bool
-SampleMaterial.lc 1489:38-1489:54
+1489:38-1489:54
     String
-SampleMaterial.lc 1492:21-1492:26
+1492:21-1492:26
     Bool
-SampleMaterial.lc 1495:5-1537:6
+1495:5-1537:6
     (String, CommonAttrs)
-SampleMaterial.lc 1495:5-2182:6
+1495:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1495:7-1495:45
+1495:7-1495:45
     String
-SampleMaterial.lc 1496:7-1496:18
+1496:7-1496:18
     ()
       -> ()
         -> Bool
@@ -11597,68 +11597,68 @@ SampleMaterial.lc 1496:7-1496:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1496:7-1497:26
+1496:7-1497:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1496:7-1498:26
+1496:7-1498:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1496:7-1499:27
+1496:7-1499:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1496:7-1500:21
+1496:7-1500:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1496:7-1501:35
+1496:7-1501:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1496:7-1502:28
+1496:7-1502:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1496:7-1503:33
+1496:7-1503:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1496:7-1504:32
+1496:7-1504:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1496:7-1505:30
+1496:7-1505:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1496:7-1506:34
+1496:7-1506:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1496:7-1534:14
+1496:7-1534:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1496:7-1536:10
+1496:7-1536:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1497:24-1497:26
+1497:24-1497:26
     ()
-SampleMaterial.lc 1498:24-1498:26
+1498:24-1498:26
     ()
-SampleMaterial.lc 1499:22-1499:27
+1499:22-1499:27
     Bool
-SampleMaterial.lc 1500:20-1500:21
+1500:20-1500:21
     _b
-SampleMaterial.lc 1501:30-1501:35
+1501:30-1501:35
     Bool
-SampleMaterial.lc 1502:23-1502:28
+1502:23-1502:28
     Bool
-SampleMaterial.lc 1503:20-1503:33
+1503:20-1503:33
     CullType
-SampleMaterial.lc 1504:30-1504:32
+1504:30-1504:32
     forall a . [a]
-SampleMaterial.lc 1505:25-1505:30
+1505:25-1505:30
     Bool
-SampleMaterial.lc 1506:29-1506:34
+1506:29-1506:34
     Bool
-SampleMaterial.lc 1508:13-1534:14
+1508:13-1534:14
     [StageAttrs]
-SampleMaterial.lc 1508:15-1508:25
+1508:15-1508:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -11666,70 +11666,70 @@ SampleMaterial.lc 1508:15-1508:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1508:15-1509:36
+1508:15-1509:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1508:15-1510:50
+1508:15-1510:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1508:15-1511:42
+1508:15-1511:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1508:15-1512:36
+1508:15-1512:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1508:15-1513:31
+1508:15-1513:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1508:15-1514:76
+1508:15-1514:76
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1508:15-1515:38
+1508:15-1515:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1508:15-1516:41
+1508:15-1516:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1508:15-1517:40
+1508:15-1517:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1508:15-1518:46
+1508:15-1518:46
     String -> StageAttrs
-SampleMaterial.lc 1508:15-1520:18
+1508:15-1520:18
     StageAttrs
-SampleMaterial.lc 1509:29-1509:36
+1509:29-1509:36
     forall a . Maybe a
-SampleMaterial.lc 1510:30-1510:50
+1510:30-1510:50
     RGBGen
-SampleMaterial.lc 1511:32-1511:42
+1511:32-1511:42
     AlphaGen
-SampleMaterial.lc 1512:29-1512:36
+1512:29-1512:36
     TCGen
-SampleMaterial.lc 1513:29-1513:31
+1513:29-1513:31
     forall a . [a]
-SampleMaterial.lc 1514:31-1514:37
+1514:31-1514:37
     String -> StageTexture
-SampleMaterial.lc 1514:31-1514:76
+1514:31-1514:76
     StageTexture
-SampleMaterial.lc 1514:38-1514:76
+1514:38-1514:76
     String
-SampleMaterial.lc 1515:34-1515:38
+1515:34-1515:38
     Bool
-SampleMaterial.lc 1516:33-1516:41
+1516:33-1516:41
     DepthFunction
-SampleMaterial.lc 1517:33-1517:40
+1517:33-1517:40
     forall a . Maybe a
-SampleMaterial.lc 1518:41-1518:46
+1518:41-1518:46
     Bool
-SampleMaterial.lc 1519:38-1519:54
+1519:38-1519:54
     String
-SampleMaterial.lc 1521:15-1521:25
+1521:15-1521:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -11737,82 +11737,82 @@ SampleMaterial.lc 1521:15-1521:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1521:15-1522:57
+1521:15-1522:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1521:15-1523:50
+1521:15-1523:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1521:15-1524:42
+1521:15-1524:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1521:15-1525:40
+1521:15-1525:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1521:15-1526:31
+1521:15-1526:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1521:15-1527:42
+1521:15-1527:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1521:15-1528:38
+1521:15-1528:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1521:15-1529:41
+1521:15-1529:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1521:15-1530:40
+1521:15-1530:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1521:15-1531:46
+1521:15-1531:46
     String -> StageAttrs
-SampleMaterial.lc 1521:15-1533:18
+1521:15-1533:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1522:29-1522:33
+1522:29-1522:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1522:29-1522:57
+1522:29-1522:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1522:34-1522:57
+1522:34-1522:57
     (Blending', Blending')
-SampleMaterial.lc 1522:36-1522:46
+1522:36-1522:46
     Blending'
-SampleMaterial.lc 1522:49-1522:55
+1522:49-1522:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1523:30-1523:50
+1523:30-1523:50
     RGBGen
-SampleMaterial.lc 1524:32-1524:42
+1524:32-1524:42
     AlphaGen
-SampleMaterial.lc 1525:29-1525:40
+1525:29-1525:40
     TCGen
-SampleMaterial.lc 1526:29-1526:31
+1526:29-1526:31
     forall a . [a]
-SampleMaterial.lc 1527:31-1527:42
+1527:31-1527:42
     StageTexture
-SampleMaterial.lc 1528:34-1528:38
+1528:34-1528:38
     Bool
-SampleMaterial.lc 1529:33-1529:41
+1529:33-1529:41
     DepthFunction
-SampleMaterial.lc 1530:33-1530:40
+1530:33-1530:40
     forall a . Maybe a
-SampleMaterial.lc 1531:41-1531:46
+1531:41-1531:46
     Bool
-SampleMaterial.lc 1532:38-1532:54
+1532:38-1532:54
     String
-SampleMaterial.lc 1535:21-1535:26
+1535:21-1535:26
     Bool
-SampleMaterial.lc 1538:5-1580:6
+1538:5-1580:6
     (String, CommonAttrs)
-SampleMaterial.lc 1538:5-2182:6
+1538:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1538:7-1538:47
+1538:7-1538:47
     String
-SampleMaterial.lc 1539:7-1539:18
+1539:7-1539:18
     ()
       -> ()
         -> Bool
@@ -11820,68 +11820,68 @@ SampleMaterial.lc 1539:7-1539:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1539:7-1540:26
+1539:7-1540:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1539:7-1541:26
+1539:7-1541:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1539:7-1542:27
+1539:7-1542:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1539:7-1543:21
+1539:7-1543:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1539:7-1544:35
+1539:7-1544:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1539:7-1545:28
+1539:7-1545:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1539:7-1546:33
+1539:7-1546:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1539:7-1547:32
+1539:7-1547:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1539:7-1548:30
+1539:7-1548:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1539:7-1549:34
+1539:7-1549:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1539:7-1577:14
+1539:7-1577:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1539:7-1579:10
+1539:7-1579:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1540:24-1540:26
+1540:24-1540:26
     ()
-SampleMaterial.lc 1541:24-1541:26
+1541:24-1541:26
     ()
-SampleMaterial.lc 1542:22-1542:27
+1542:22-1542:27
     Bool
-SampleMaterial.lc 1543:20-1543:21
+1543:20-1543:21
     _b
-SampleMaterial.lc 1544:30-1544:35
+1544:30-1544:35
     Bool
-SampleMaterial.lc 1545:23-1545:28
+1545:23-1545:28
     Bool
-SampleMaterial.lc 1546:20-1546:33
+1546:20-1546:33
     CullType
-SampleMaterial.lc 1547:30-1547:32
+1547:30-1547:32
     forall a . [a]
-SampleMaterial.lc 1548:25-1548:30
+1548:25-1548:30
     Bool
-SampleMaterial.lc 1549:29-1549:34
+1549:29-1549:34
     Bool
-SampleMaterial.lc 1551:13-1577:14
+1551:13-1577:14
     [StageAttrs]
-SampleMaterial.lc 1551:15-1551:25
+1551:15-1551:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -11889,70 +11889,70 @@ SampleMaterial.lc 1551:15-1551:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1551:15-1552:36
+1551:15-1552:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1551:15-1553:50
+1551:15-1553:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1551:15-1554:42
+1551:15-1554:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1551:15-1555:36
+1551:15-1555:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1551:15-1556:31
+1551:15-1556:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1551:15-1557:78
+1551:15-1557:78
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1551:15-1558:38
+1551:15-1558:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1551:15-1559:41
+1551:15-1559:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1551:15-1560:40
+1551:15-1560:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1551:15-1561:46
+1551:15-1561:46
     String -> StageAttrs
-SampleMaterial.lc 1551:15-1563:18
+1551:15-1563:18
     StageAttrs
-SampleMaterial.lc 1552:29-1552:36
+1552:29-1552:36
     forall a . Maybe a
-SampleMaterial.lc 1553:30-1553:50
+1553:30-1553:50
     RGBGen
-SampleMaterial.lc 1554:32-1554:42
+1554:32-1554:42
     AlphaGen
-SampleMaterial.lc 1555:29-1555:36
+1555:29-1555:36
     TCGen
-SampleMaterial.lc 1556:29-1556:31
+1556:29-1556:31
     forall a . [a]
-SampleMaterial.lc 1557:31-1557:37
+1557:31-1557:37
     String -> StageTexture
-SampleMaterial.lc 1557:31-1557:78
+1557:31-1557:78
     StageTexture
-SampleMaterial.lc 1557:38-1557:78
+1557:38-1557:78
     String
-SampleMaterial.lc 1558:34-1558:38
+1558:34-1558:38
     Bool
-SampleMaterial.lc 1559:33-1559:41
+1559:33-1559:41
     DepthFunction
-SampleMaterial.lc 1560:33-1560:40
+1560:33-1560:40
     forall a . Maybe a
-SampleMaterial.lc 1561:41-1561:46
+1561:41-1561:46
     Bool
-SampleMaterial.lc 1562:38-1562:54
+1562:38-1562:54
     String
-SampleMaterial.lc 1564:15-1564:25
+1564:15-1564:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -11960,82 +11960,82 @@ SampleMaterial.lc 1564:15-1564:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1564:15-1565:57
+1564:15-1565:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1564:15-1566:50
+1564:15-1566:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1564:15-1567:42
+1564:15-1567:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1564:15-1568:40
+1564:15-1568:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1564:15-1569:31
+1564:15-1569:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1564:15-1570:42
+1564:15-1570:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1564:15-1571:38
+1564:15-1571:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1564:15-1572:41
+1564:15-1572:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1564:15-1573:40
+1564:15-1573:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1564:15-1574:46
+1564:15-1574:46
     String -> StageAttrs
-SampleMaterial.lc 1564:15-1576:18
+1564:15-1576:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1565:29-1565:33
+1565:29-1565:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1565:29-1565:57
+1565:29-1565:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1565:34-1565:57
+1565:34-1565:57
     (Blending', Blending')
-SampleMaterial.lc 1565:36-1565:46
+1565:36-1565:46
     Blending'
-SampleMaterial.lc 1565:49-1565:55
+1565:49-1565:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1566:30-1566:50
+1566:30-1566:50
     RGBGen
-SampleMaterial.lc 1567:32-1567:42
+1567:32-1567:42
     AlphaGen
-SampleMaterial.lc 1568:29-1568:40
+1568:29-1568:40
     TCGen
-SampleMaterial.lc 1569:29-1569:31
+1569:29-1569:31
     forall a . [a]
-SampleMaterial.lc 1570:31-1570:42
+1570:31-1570:42
     StageTexture
-SampleMaterial.lc 1571:34-1571:38
+1571:34-1571:38
     Bool
-SampleMaterial.lc 1572:33-1572:41
+1572:33-1572:41
     DepthFunction
-SampleMaterial.lc 1573:33-1573:40
+1573:33-1573:40
     forall a . Maybe a
-SampleMaterial.lc 1574:41-1574:46
+1574:41-1574:46
     Bool
-SampleMaterial.lc 1575:38-1575:54
+1575:38-1575:54
     String
-SampleMaterial.lc 1578:21-1578:26
+1578:21-1578:26
     Bool
-SampleMaterial.lc 1581:5-1623:6
+1581:5-1623:6
     (String, CommonAttrs)
-SampleMaterial.lc 1581:5-2182:6
+1581:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1581:7-1581:49
+1581:7-1581:49
     String
-SampleMaterial.lc 1582:7-1582:18
+1582:7-1582:18
     ()
       -> ()
         -> Bool
@@ -12043,68 +12043,68 @@ SampleMaterial.lc 1582:7-1582:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1582:7-1583:26
+1582:7-1583:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1582:7-1584:26
+1582:7-1584:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1582:7-1585:27
+1582:7-1585:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1582:7-1586:21
+1582:7-1586:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1582:7-1587:35
+1582:7-1587:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1582:7-1588:28
+1582:7-1588:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1582:7-1589:33
+1582:7-1589:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1582:7-1590:32
+1582:7-1590:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1582:7-1591:30
+1582:7-1591:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1582:7-1592:34
+1582:7-1592:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1582:7-1620:14
+1582:7-1620:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1582:7-1622:10
+1582:7-1622:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1583:24-1583:26
+1583:24-1583:26
     ()
-SampleMaterial.lc 1584:24-1584:26
+1584:24-1584:26
     ()
-SampleMaterial.lc 1585:22-1585:27
+1585:22-1585:27
     Bool
-SampleMaterial.lc 1586:20-1586:21
+1586:20-1586:21
     _b
-SampleMaterial.lc 1587:30-1587:35
+1587:30-1587:35
     Bool
-SampleMaterial.lc 1588:23-1588:28
+1588:23-1588:28
     Bool
-SampleMaterial.lc 1589:20-1589:33
+1589:20-1589:33
     CullType
-SampleMaterial.lc 1590:30-1590:32
+1590:30-1590:32
     forall a . [a]
-SampleMaterial.lc 1591:25-1591:30
+1591:25-1591:30
     Bool
-SampleMaterial.lc 1592:29-1592:34
+1592:29-1592:34
     Bool
-SampleMaterial.lc 1594:13-1620:14
+1594:13-1620:14
     [StageAttrs]
-SampleMaterial.lc 1594:15-1594:25
+1594:15-1594:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -12112,70 +12112,70 @@ SampleMaterial.lc 1594:15-1594:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1594:15-1595:36
+1594:15-1595:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1594:15-1596:50
+1594:15-1596:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1594:15-1597:42
+1594:15-1597:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1594:15-1598:36
+1594:15-1598:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1594:15-1599:31
+1594:15-1599:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1594:15-1600:80
+1594:15-1600:80
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1594:15-1601:38
+1594:15-1601:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1594:15-1602:41
+1594:15-1602:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1594:15-1603:40
+1594:15-1603:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1594:15-1604:46
+1594:15-1604:46
     String -> StageAttrs
-SampleMaterial.lc 1594:15-1606:18
+1594:15-1606:18
     StageAttrs
-SampleMaterial.lc 1595:29-1595:36
+1595:29-1595:36
     forall a . Maybe a
-SampleMaterial.lc 1596:30-1596:50
+1596:30-1596:50
     RGBGen
-SampleMaterial.lc 1597:32-1597:42
+1597:32-1597:42
     AlphaGen
-SampleMaterial.lc 1598:29-1598:36
+1598:29-1598:36
     TCGen
-SampleMaterial.lc 1599:29-1599:31
+1599:29-1599:31
     forall a . [a]
-SampleMaterial.lc 1600:31-1600:37
+1600:31-1600:37
     String -> StageTexture
-SampleMaterial.lc 1600:31-1600:80
+1600:31-1600:80
     StageTexture
-SampleMaterial.lc 1600:38-1600:80
+1600:38-1600:80
     String
-SampleMaterial.lc 1601:34-1601:38
+1601:34-1601:38
     Bool
-SampleMaterial.lc 1602:33-1602:41
+1602:33-1602:41
     DepthFunction
-SampleMaterial.lc 1603:33-1603:40
+1603:33-1603:40
     forall a . Maybe a
-SampleMaterial.lc 1604:41-1604:46
+1604:41-1604:46
     Bool
-SampleMaterial.lc 1605:38-1605:54
+1605:38-1605:54
     String
-SampleMaterial.lc 1607:15-1607:25
+1607:15-1607:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -12183,82 +12183,82 @@ SampleMaterial.lc 1607:15-1607:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1607:15-1608:57
+1607:15-1608:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1607:15-1609:50
+1607:15-1609:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1607:15-1610:42
+1607:15-1610:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1607:15-1611:40
+1607:15-1611:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1607:15-1612:31
+1607:15-1612:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1607:15-1613:42
+1607:15-1613:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1607:15-1614:38
+1607:15-1614:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1607:15-1615:41
+1607:15-1615:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1607:15-1616:40
+1607:15-1616:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1607:15-1617:46
+1607:15-1617:46
     String -> StageAttrs
-SampleMaterial.lc 1607:15-1619:18
+1607:15-1619:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1608:29-1608:33
+1608:29-1608:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1608:29-1608:57
+1608:29-1608:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1608:34-1608:57
+1608:34-1608:57
     (Blending', Blending')
-SampleMaterial.lc 1608:36-1608:46
+1608:36-1608:46
     Blending'
-SampleMaterial.lc 1608:49-1608:55
+1608:49-1608:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1609:30-1609:50
+1609:30-1609:50
     RGBGen
-SampleMaterial.lc 1610:32-1610:42
+1610:32-1610:42
     AlphaGen
-SampleMaterial.lc 1611:29-1611:40
+1611:29-1611:40
     TCGen
-SampleMaterial.lc 1612:29-1612:31
+1612:29-1612:31
     forall a . [a]
-SampleMaterial.lc 1613:31-1613:42
+1613:31-1613:42
     StageTexture
-SampleMaterial.lc 1614:34-1614:38
+1614:34-1614:38
     Bool
-SampleMaterial.lc 1615:33-1615:41
+1615:33-1615:41
     DepthFunction
-SampleMaterial.lc 1616:33-1616:40
+1616:33-1616:40
     forall a . Maybe a
-SampleMaterial.lc 1617:41-1617:46
+1617:41-1617:46
     Bool
-SampleMaterial.lc 1618:38-1618:54
+1618:38-1618:54
     String
-SampleMaterial.lc 1621:21-1621:26
+1621:21-1621:26
     Bool
-SampleMaterial.lc 1624:5-1666:6
+1624:5-1666:6
     (String, CommonAttrs)
-SampleMaterial.lc 1624:5-2182:6
+1624:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1624:7-1624:44
+1624:7-1624:44
     String
-SampleMaterial.lc 1625:7-1625:18
+1625:7-1625:18
     ()
       -> ()
         -> Bool
@@ -12266,68 +12266,68 @@ SampleMaterial.lc 1625:7-1625:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1625:7-1626:26
+1625:7-1626:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1625:7-1627:26
+1625:7-1627:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1625:7-1628:27
+1625:7-1628:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1625:7-1629:21
+1625:7-1629:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1625:7-1630:35
+1625:7-1630:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1625:7-1631:28
+1625:7-1631:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1625:7-1632:33
+1625:7-1632:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1625:7-1633:32
+1625:7-1633:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1625:7-1634:30
+1625:7-1634:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1625:7-1635:34
+1625:7-1635:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1625:7-1663:14
+1625:7-1663:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1625:7-1665:10
+1625:7-1665:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1626:24-1626:26
+1626:24-1626:26
     ()
-SampleMaterial.lc 1627:24-1627:26
+1627:24-1627:26
     ()
-SampleMaterial.lc 1628:22-1628:27
+1628:22-1628:27
     Bool
-SampleMaterial.lc 1629:20-1629:21
+1629:20-1629:21
     _b
-SampleMaterial.lc 1630:30-1630:35
+1630:30-1630:35
     Bool
-SampleMaterial.lc 1631:23-1631:28
+1631:23-1631:28
     Bool
-SampleMaterial.lc 1632:20-1632:33
+1632:20-1632:33
     CullType
-SampleMaterial.lc 1633:30-1633:32
+1633:30-1633:32
     forall a . [a]
-SampleMaterial.lc 1634:25-1634:30
+1634:25-1634:30
     Bool
-SampleMaterial.lc 1635:29-1635:34
+1635:29-1635:34
     Bool
-SampleMaterial.lc 1637:13-1663:14
+1637:13-1663:14
     [StageAttrs]
-SampleMaterial.lc 1637:15-1637:25
+1637:15-1637:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -12335,70 +12335,70 @@ SampleMaterial.lc 1637:15-1637:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1637:15-1638:36
+1637:15-1638:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1637:15-1639:50
+1637:15-1639:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1637:15-1640:42
+1637:15-1640:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1637:15-1641:36
+1637:15-1641:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1637:15-1642:31
+1637:15-1642:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1637:15-1643:75
+1637:15-1643:75
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1637:15-1644:38
+1637:15-1644:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1637:15-1645:41
+1637:15-1645:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1637:15-1646:40
+1637:15-1646:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1637:15-1647:46
+1637:15-1647:46
     String -> StageAttrs
-SampleMaterial.lc 1637:15-1649:18
+1637:15-1649:18
     StageAttrs
-SampleMaterial.lc 1638:29-1638:36
+1638:29-1638:36
     forall a . Maybe a
-SampleMaterial.lc 1639:30-1639:50
+1639:30-1639:50
     RGBGen
-SampleMaterial.lc 1640:32-1640:42
+1640:32-1640:42
     AlphaGen
-SampleMaterial.lc 1641:29-1641:36
+1641:29-1641:36
     TCGen
-SampleMaterial.lc 1642:29-1642:31
+1642:29-1642:31
     forall a . [a]
-SampleMaterial.lc 1643:31-1643:37
+1643:31-1643:37
     String -> StageTexture
-SampleMaterial.lc 1643:31-1643:75
+1643:31-1643:75
     StageTexture
-SampleMaterial.lc 1643:38-1643:75
+1643:38-1643:75
     String
-SampleMaterial.lc 1644:34-1644:38
+1644:34-1644:38
     Bool
-SampleMaterial.lc 1645:33-1645:41
+1645:33-1645:41
     DepthFunction
-SampleMaterial.lc 1646:33-1646:40
+1646:33-1646:40
     forall a . Maybe a
-SampleMaterial.lc 1647:41-1647:46
+1647:41-1647:46
     Bool
-SampleMaterial.lc 1648:38-1648:54
+1648:38-1648:54
     String
-SampleMaterial.lc 1650:15-1650:25
+1650:15-1650:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -12406,82 +12406,82 @@ SampleMaterial.lc 1650:15-1650:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1650:15-1651:57
+1650:15-1651:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1650:15-1652:50
+1650:15-1652:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1650:15-1653:42
+1650:15-1653:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1650:15-1654:40
+1650:15-1654:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1650:15-1655:31
+1650:15-1655:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1650:15-1656:42
+1650:15-1656:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1650:15-1657:38
+1650:15-1657:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1650:15-1658:41
+1650:15-1658:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1650:15-1659:40
+1650:15-1659:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1650:15-1660:46
+1650:15-1660:46
     String -> StageAttrs
-SampleMaterial.lc 1650:15-1662:18
+1650:15-1662:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1651:29-1651:33
+1651:29-1651:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1651:29-1651:57
+1651:29-1651:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1651:34-1651:57
+1651:34-1651:57
     (Blending', Blending')
-SampleMaterial.lc 1651:36-1651:46
+1651:36-1651:46
     Blending'
-SampleMaterial.lc 1651:49-1651:55
+1651:49-1651:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1652:30-1652:50
+1652:30-1652:50
     RGBGen
-SampleMaterial.lc 1653:32-1653:42
+1653:32-1653:42
     AlphaGen
-SampleMaterial.lc 1654:29-1654:40
+1654:29-1654:40
     TCGen
-SampleMaterial.lc 1655:29-1655:31
+1655:29-1655:31
     forall a . [a]
-SampleMaterial.lc 1656:31-1656:42
+1656:31-1656:42
     StageTexture
-SampleMaterial.lc 1657:34-1657:38
+1657:34-1657:38
     Bool
-SampleMaterial.lc 1658:33-1658:41
+1658:33-1658:41
     DepthFunction
-SampleMaterial.lc 1659:33-1659:40
+1659:33-1659:40
     forall a . Maybe a
-SampleMaterial.lc 1660:41-1660:46
+1660:41-1660:46
     Bool
-SampleMaterial.lc 1661:38-1661:54
+1661:38-1661:54
     String
-SampleMaterial.lc 1664:21-1664:26
+1664:21-1664:26
     Bool
-SampleMaterial.lc 1667:5-1709:6
+1667:5-1709:6
     (String, CommonAttrs)
-SampleMaterial.lc 1667:5-2182:6
+1667:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1667:7-1667:43
+1667:7-1667:43
     String
-SampleMaterial.lc 1668:7-1668:18
+1668:7-1668:18
     ()
       -> ()
         -> Bool
@@ -12489,68 +12489,68 @@ SampleMaterial.lc 1668:7-1668:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1668:7-1669:26
+1668:7-1669:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1668:7-1670:26
+1668:7-1670:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1668:7-1671:27
+1668:7-1671:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1668:7-1672:21
+1668:7-1672:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1668:7-1673:35
+1668:7-1673:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1668:7-1674:28
+1668:7-1674:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1668:7-1675:33
+1668:7-1675:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1668:7-1676:32
+1668:7-1676:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1668:7-1677:30
+1668:7-1677:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1668:7-1678:34
+1668:7-1678:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1668:7-1706:14
+1668:7-1706:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1668:7-1708:10
+1668:7-1708:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1669:24-1669:26
+1669:24-1669:26
     ()
-SampleMaterial.lc 1670:24-1670:26
+1670:24-1670:26
     ()
-SampleMaterial.lc 1671:22-1671:27
+1671:22-1671:27
     Bool
-SampleMaterial.lc 1672:20-1672:21
+1672:20-1672:21
     _b
-SampleMaterial.lc 1673:30-1673:35
+1673:30-1673:35
     Bool
-SampleMaterial.lc 1674:23-1674:28
+1674:23-1674:28
     Bool
-SampleMaterial.lc 1675:20-1675:33
+1675:20-1675:33
     CullType
-SampleMaterial.lc 1676:30-1676:32
+1676:30-1676:32
     forall a . [a]
-SampleMaterial.lc 1677:25-1677:30
+1677:25-1677:30
     Bool
-SampleMaterial.lc 1678:29-1678:34
+1678:29-1678:34
     Bool
-SampleMaterial.lc 1680:13-1706:14
+1680:13-1706:14
     [StageAttrs]
-SampleMaterial.lc 1680:15-1680:25
+1680:15-1680:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -12558,70 +12558,70 @@ SampleMaterial.lc 1680:15-1680:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1680:15-1681:36
+1680:15-1681:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1680:15-1682:50
+1680:15-1682:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1680:15-1683:42
+1680:15-1683:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1680:15-1684:36
+1680:15-1684:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1680:15-1685:31
+1680:15-1685:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1680:15-1686:74
+1680:15-1686:74
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1680:15-1687:38
+1680:15-1687:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1680:15-1688:41
+1680:15-1688:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1680:15-1689:40
+1680:15-1689:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1680:15-1690:46
+1680:15-1690:46
     String -> StageAttrs
-SampleMaterial.lc 1680:15-1692:18
+1680:15-1692:18
     StageAttrs
-SampleMaterial.lc 1681:29-1681:36
+1681:29-1681:36
     forall a . Maybe a
-SampleMaterial.lc 1682:30-1682:50
+1682:30-1682:50
     RGBGen
-SampleMaterial.lc 1683:32-1683:42
+1683:32-1683:42
     AlphaGen
-SampleMaterial.lc 1684:29-1684:36
+1684:29-1684:36
     TCGen
-SampleMaterial.lc 1685:29-1685:31
+1685:29-1685:31
     forall a . [a]
-SampleMaterial.lc 1686:31-1686:37
+1686:31-1686:37
     String -> StageTexture
-SampleMaterial.lc 1686:31-1686:74
+1686:31-1686:74
     StageTexture
-SampleMaterial.lc 1686:38-1686:74
+1686:38-1686:74
     String
-SampleMaterial.lc 1687:34-1687:38
+1687:34-1687:38
     Bool
-SampleMaterial.lc 1688:33-1688:41
+1688:33-1688:41
     DepthFunction
-SampleMaterial.lc 1689:33-1689:40
+1689:33-1689:40
     forall a . Maybe a
-SampleMaterial.lc 1690:41-1690:46
+1690:41-1690:46
     Bool
-SampleMaterial.lc 1691:38-1691:54
+1691:38-1691:54
     String
-SampleMaterial.lc 1693:15-1693:25
+1693:15-1693:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -12629,82 +12629,82 @@ SampleMaterial.lc 1693:15-1693:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1693:15-1694:57
+1693:15-1694:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1693:15-1695:50
+1693:15-1695:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1693:15-1696:42
+1693:15-1696:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1693:15-1697:40
+1693:15-1697:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1693:15-1698:31
+1693:15-1698:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1693:15-1699:42
+1693:15-1699:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1693:15-1700:38
+1693:15-1700:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1693:15-1701:41
+1693:15-1701:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1693:15-1702:40
+1693:15-1702:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1693:15-1703:46
+1693:15-1703:46
     String -> StageAttrs
-SampleMaterial.lc 1693:15-1705:18
+1693:15-1705:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1694:29-1694:33
+1694:29-1694:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1694:29-1694:57
+1694:29-1694:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1694:34-1694:57
+1694:34-1694:57
     (Blending', Blending')
-SampleMaterial.lc 1694:36-1694:46
+1694:36-1694:46
     Blending'
-SampleMaterial.lc 1694:49-1694:55
+1694:49-1694:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1695:30-1695:50
+1695:30-1695:50
     RGBGen
-SampleMaterial.lc 1696:32-1696:42
+1696:32-1696:42
     AlphaGen
-SampleMaterial.lc 1697:29-1697:40
+1697:29-1697:40
     TCGen
-SampleMaterial.lc 1698:29-1698:31
+1698:29-1698:31
     forall a . [a]
-SampleMaterial.lc 1699:31-1699:42
+1699:31-1699:42
     StageTexture
-SampleMaterial.lc 1700:34-1700:38
+1700:34-1700:38
     Bool
-SampleMaterial.lc 1701:33-1701:41
+1701:33-1701:41
     DepthFunction
-SampleMaterial.lc 1702:33-1702:40
+1702:33-1702:40
     forall a . Maybe a
-SampleMaterial.lc 1703:41-1703:46
+1703:41-1703:46
     Bool
-SampleMaterial.lc 1704:38-1704:54
+1704:38-1704:54
     String
-SampleMaterial.lc 1707:21-1707:26
+1707:21-1707:26
     Bool
-SampleMaterial.lc 1710:5-1752:6
+1710:5-1752:6
     (String, CommonAttrs)
-SampleMaterial.lc 1710:5-2182:6
+1710:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1710:7-1710:41
+1710:7-1710:41
     String
-SampleMaterial.lc 1711:7-1711:18
+1711:7-1711:18
     ()
       -> ()
         -> Bool
@@ -12712,68 +12712,68 @@ SampleMaterial.lc 1711:7-1711:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1711:7-1712:26
+1711:7-1712:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1711:7-1713:26
+1711:7-1713:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1711:7-1714:27
+1711:7-1714:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1711:7-1715:21
+1711:7-1715:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1711:7-1716:35
+1711:7-1716:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1711:7-1717:28
+1711:7-1717:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1711:7-1718:33
+1711:7-1718:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1711:7-1719:32
+1711:7-1719:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1711:7-1720:30
+1711:7-1720:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1711:7-1721:34
+1711:7-1721:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1711:7-1749:14
+1711:7-1749:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1711:7-1751:10
+1711:7-1751:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1712:24-1712:26
+1712:24-1712:26
     ()
-SampleMaterial.lc 1713:24-1713:26
+1713:24-1713:26
     ()
-SampleMaterial.lc 1714:22-1714:27
+1714:22-1714:27
     Bool
-SampleMaterial.lc 1715:20-1715:21
+1715:20-1715:21
     _b
-SampleMaterial.lc 1716:30-1716:35
+1716:30-1716:35
     Bool
-SampleMaterial.lc 1717:23-1717:28
+1717:23-1717:28
     Bool
-SampleMaterial.lc 1718:20-1718:33
+1718:20-1718:33
     CullType
-SampleMaterial.lc 1719:30-1719:32
+1719:30-1719:32
     forall a . [a]
-SampleMaterial.lc 1720:25-1720:30
+1720:25-1720:30
     Bool
-SampleMaterial.lc 1721:29-1721:34
+1721:29-1721:34
     Bool
-SampleMaterial.lc 1723:13-1749:14
+1723:13-1749:14
     [StageAttrs]
-SampleMaterial.lc 1723:15-1723:25
+1723:15-1723:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -12781,70 +12781,70 @@ SampleMaterial.lc 1723:15-1723:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1723:15-1724:36
+1723:15-1724:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1723:15-1725:50
+1723:15-1725:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1723:15-1726:42
+1723:15-1726:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1723:15-1727:36
+1723:15-1727:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1723:15-1728:31
+1723:15-1728:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1723:15-1729:72
+1723:15-1729:72
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1723:15-1730:38
+1723:15-1730:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1723:15-1731:41
+1723:15-1731:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1723:15-1732:40
+1723:15-1732:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1723:15-1733:46
+1723:15-1733:46
     String -> StageAttrs
-SampleMaterial.lc 1723:15-1735:18
+1723:15-1735:18
     StageAttrs
-SampleMaterial.lc 1724:29-1724:36
+1724:29-1724:36
     forall a . Maybe a
-SampleMaterial.lc 1725:30-1725:50
+1725:30-1725:50
     RGBGen
-SampleMaterial.lc 1726:32-1726:42
+1726:32-1726:42
     AlphaGen
-SampleMaterial.lc 1727:29-1727:36
+1727:29-1727:36
     TCGen
-SampleMaterial.lc 1728:29-1728:31
+1728:29-1728:31
     forall a . [a]
-SampleMaterial.lc 1729:31-1729:37
+1729:31-1729:37
     String -> StageTexture
-SampleMaterial.lc 1729:31-1729:72
+1729:31-1729:72
     StageTexture
-SampleMaterial.lc 1729:38-1729:72
+1729:38-1729:72
     String
-SampleMaterial.lc 1730:34-1730:38
+1730:34-1730:38
     Bool
-SampleMaterial.lc 1731:33-1731:41
+1731:33-1731:41
     DepthFunction
-SampleMaterial.lc 1732:33-1732:40
+1732:33-1732:40
     forall a . Maybe a
-SampleMaterial.lc 1733:41-1733:46
+1733:41-1733:46
     Bool
-SampleMaterial.lc 1734:38-1734:54
+1734:38-1734:54
     String
-SampleMaterial.lc 1736:15-1736:25
+1736:15-1736:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -12852,82 +12852,82 @@ SampleMaterial.lc 1736:15-1736:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1736:15-1737:57
+1736:15-1737:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1736:15-1738:50
+1736:15-1738:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1736:15-1739:42
+1736:15-1739:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1736:15-1740:40
+1736:15-1740:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1736:15-1741:31
+1736:15-1741:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1736:15-1742:42
+1736:15-1742:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1736:15-1743:38
+1736:15-1743:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1736:15-1744:41
+1736:15-1744:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1736:15-1745:40
+1736:15-1745:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1736:15-1746:46
+1736:15-1746:46
     String -> StageAttrs
-SampleMaterial.lc 1736:15-1748:18
+1736:15-1748:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1737:29-1737:33
+1737:29-1737:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1737:29-1737:57
+1737:29-1737:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1737:34-1737:57
+1737:34-1737:57
     (Blending', Blending')
-SampleMaterial.lc 1737:36-1737:46
+1737:36-1737:46
     Blending'
-SampleMaterial.lc 1737:49-1737:55
+1737:49-1737:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1738:30-1738:50
+1738:30-1738:50
     RGBGen
-SampleMaterial.lc 1739:32-1739:42
+1739:32-1739:42
     AlphaGen
-SampleMaterial.lc 1740:29-1740:40
+1740:29-1740:40
     TCGen
-SampleMaterial.lc 1741:29-1741:31
+1741:29-1741:31
     forall a . [a]
-SampleMaterial.lc 1742:31-1742:42
+1742:31-1742:42
     StageTexture
-SampleMaterial.lc 1743:34-1743:38
+1743:34-1743:38
     Bool
-SampleMaterial.lc 1744:33-1744:41
+1744:33-1744:41
     DepthFunction
-SampleMaterial.lc 1745:33-1745:40
+1745:33-1745:40
     forall a . Maybe a
-SampleMaterial.lc 1746:41-1746:46
+1746:41-1746:46
     Bool
-SampleMaterial.lc 1747:38-1747:54
+1747:38-1747:54
     String
-SampleMaterial.lc 1750:21-1750:26
+1750:21-1750:26
     Bool
-SampleMaterial.lc 1753:5-1795:6
+1753:5-1795:6
     (String, CommonAttrs)
-SampleMaterial.lc 1753:5-2182:6
+1753:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1753:7-1753:42
+1753:7-1753:42
     String
-SampleMaterial.lc 1754:7-1754:18
+1754:7-1754:18
     ()
       -> ()
         -> Bool
@@ -12935,68 +12935,68 @@ SampleMaterial.lc 1754:7-1754:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1754:7-1755:26
+1754:7-1755:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1754:7-1756:26
+1754:7-1756:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1754:7-1757:27
+1754:7-1757:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1754:7-1758:21
+1754:7-1758:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1754:7-1759:35
+1754:7-1759:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1754:7-1760:28
+1754:7-1760:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1754:7-1761:33
+1754:7-1761:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1754:7-1762:32
+1754:7-1762:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1754:7-1763:30
+1754:7-1763:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1754:7-1764:34
+1754:7-1764:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1754:7-1792:14
+1754:7-1792:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1754:7-1794:10
+1754:7-1794:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1755:24-1755:26
+1755:24-1755:26
     ()
-SampleMaterial.lc 1756:24-1756:26
+1756:24-1756:26
     ()
-SampleMaterial.lc 1757:22-1757:27
+1757:22-1757:27
     Bool
-SampleMaterial.lc 1758:20-1758:21
+1758:20-1758:21
     _b
-SampleMaterial.lc 1759:30-1759:35
+1759:30-1759:35
     Bool
-SampleMaterial.lc 1760:23-1760:28
+1760:23-1760:28
     Bool
-SampleMaterial.lc 1761:20-1761:33
+1761:20-1761:33
     CullType
-SampleMaterial.lc 1762:30-1762:32
+1762:30-1762:32
     forall a . [a]
-SampleMaterial.lc 1763:25-1763:30
+1763:25-1763:30
     Bool
-SampleMaterial.lc 1764:29-1764:34
+1764:29-1764:34
     Bool
-SampleMaterial.lc 1766:13-1792:14
+1766:13-1792:14
     [StageAttrs]
-SampleMaterial.lc 1766:15-1766:25
+1766:15-1766:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -13004,70 +13004,70 @@ SampleMaterial.lc 1766:15-1766:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1766:15-1767:36
+1766:15-1767:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1766:15-1768:50
+1766:15-1768:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1766:15-1769:42
+1766:15-1769:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1766:15-1770:36
+1766:15-1770:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1766:15-1771:31
+1766:15-1771:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1766:15-1772:73
+1766:15-1772:73
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1766:15-1773:38
+1766:15-1773:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1766:15-1774:41
+1766:15-1774:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1766:15-1775:40
+1766:15-1775:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1766:15-1776:46
+1766:15-1776:46
     String -> StageAttrs
-SampleMaterial.lc 1766:15-1778:18
+1766:15-1778:18
     StageAttrs
-SampleMaterial.lc 1767:29-1767:36
+1767:29-1767:36
     forall a . Maybe a
-SampleMaterial.lc 1768:30-1768:50
+1768:30-1768:50
     RGBGen
-SampleMaterial.lc 1769:32-1769:42
+1769:32-1769:42
     AlphaGen
-SampleMaterial.lc 1770:29-1770:36
+1770:29-1770:36
     TCGen
-SampleMaterial.lc 1771:29-1771:31
+1771:29-1771:31
     forall a . [a]
-SampleMaterial.lc 1772:31-1772:37
+1772:31-1772:37
     String -> StageTexture
-SampleMaterial.lc 1772:31-1772:73
+1772:31-1772:73
     StageTexture
-SampleMaterial.lc 1772:38-1772:73
+1772:38-1772:73
     String
-SampleMaterial.lc 1773:34-1773:38
+1773:34-1773:38
     Bool
-SampleMaterial.lc 1774:33-1774:41
+1774:33-1774:41
     DepthFunction
-SampleMaterial.lc 1775:33-1775:40
+1775:33-1775:40
     forall a . Maybe a
-SampleMaterial.lc 1776:41-1776:46
+1776:41-1776:46
     Bool
-SampleMaterial.lc 1777:38-1777:54
+1777:38-1777:54
     String
-SampleMaterial.lc 1779:15-1779:25
+1779:15-1779:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -13075,82 +13075,82 @@ SampleMaterial.lc 1779:15-1779:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1779:15-1780:57
+1779:15-1780:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1779:15-1781:50
+1779:15-1781:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1779:15-1782:42
+1779:15-1782:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1779:15-1783:40
+1779:15-1783:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1779:15-1784:31
+1779:15-1784:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1779:15-1785:42
+1779:15-1785:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1779:15-1786:38
+1779:15-1786:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1779:15-1787:41
+1779:15-1787:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1779:15-1788:40
+1779:15-1788:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1779:15-1789:46
+1779:15-1789:46
     String -> StageAttrs
-SampleMaterial.lc 1779:15-1791:18
+1779:15-1791:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1780:29-1780:33
+1780:29-1780:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1780:29-1780:57
+1780:29-1780:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1780:34-1780:57
+1780:34-1780:57
     (Blending', Blending')
-SampleMaterial.lc 1780:36-1780:46
+1780:36-1780:46
     Blending'
-SampleMaterial.lc 1780:49-1780:55
+1780:49-1780:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1781:30-1781:50
+1781:30-1781:50
     RGBGen
-SampleMaterial.lc 1782:32-1782:42
+1782:32-1782:42
     AlphaGen
-SampleMaterial.lc 1783:29-1783:40
+1783:29-1783:40
     TCGen
-SampleMaterial.lc 1784:29-1784:31
+1784:29-1784:31
     forall a . [a]
-SampleMaterial.lc 1785:31-1785:42
+1785:31-1785:42
     StageTexture
-SampleMaterial.lc 1786:34-1786:38
+1786:34-1786:38
     Bool
-SampleMaterial.lc 1787:33-1787:41
+1787:33-1787:41
     DepthFunction
-SampleMaterial.lc 1788:33-1788:40
+1788:33-1788:40
     forall a . Maybe a
-SampleMaterial.lc 1789:41-1789:46
+1789:41-1789:46
     Bool
-SampleMaterial.lc 1790:38-1790:54
+1790:38-1790:54
     String
-SampleMaterial.lc 1793:21-1793:26
+1793:21-1793:26
     Bool
-SampleMaterial.lc 1796:5-1838:6
+1796:5-1838:6
     (String, CommonAttrs)
-SampleMaterial.lc 1796:5-2182:6
+1796:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1796:7-1796:48
+1796:7-1796:48
     String
-SampleMaterial.lc 1797:7-1797:18
+1797:7-1797:18
     ()
       -> ()
         -> Bool
@@ -13158,68 +13158,68 @@ SampleMaterial.lc 1797:7-1797:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1797:7-1798:26
+1797:7-1798:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1797:7-1799:26
+1797:7-1799:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1797:7-1800:27
+1797:7-1800:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1797:7-1801:21
+1797:7-1801:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1797:7-1802:35
+1797:7-1802:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1797:7-1803:28
+1797:7-1803:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1797:7-1804:33
+1797:7-1804:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1797:7-1805:32
+1797:7-1805:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1797:7-1806:30
+1797:7-1806:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1797:7-1807:34
+1797:7-1807:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1797:7-1835:14
+1797:7-1835:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1797:7-1837:10
+1797:7-1837:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1798:24-1798:26
+1798:24-1798:26
     ()
-SampleMaterial.lc 1799:24-1799:26
+1799:24-1799:26
     ()
-SampleMaterial.lc 1800:22-1800:27
+1800:22-1800:27
     Bool
-SampleMaterial.lc 1801:20-1801:21
+1801:20-1801:21
     _b
-SampleMaterial.lc 1802:30-1802:35
+1802:30-1802:35
     Bool
-SampleMaterial.lc 1803:23-1803:28
+1803:23-1803:28
     Bool
-SampleMaterial.lc 1804:20-1804:33
+1804:20-1804:33
     CullType
-SampleMaterial.lc 1805:30-1805:32
+1805:30-1805:32
     forall a . [a]
-SampleMaterial.lc 1806:25-1806:30
+1806:25-1806:30
     Bool
-SampleMaterial.lc 1807:29-1807:34
+1807:29-1807:34
     Bool
-SampleMaterial.lc 1809:13-1835:14
+1809:13-1835:14
     [StageAttrs]
-SampleMaterial.lc 1809:15-1809:25
+1809:15-1809:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -13227,66 +13227,66 @@ SampleMaterial.lc 1809:15-1809:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1809:15-1810:36
+1809:15-1810:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1809:15-1811:42
+1809:15-1811:42
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1809:15-1812:42
+1809:15-1812:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1809:15-1813:40
+1809:15-1813:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1809:15-1814:31
+1809:15-1814:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1809:15-1815:42
+1809:15-1815:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1809:15-1816:38
+1809:15-1816:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1809:15-1817:41
+1809:15-1817:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1809:15-1818:40
+1809:15-1818:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1809:15-1819:46
+1809:15-1819:46
     String -> StageAttrs
-SampleMaterial.lc 1809:15-1821:18
+1809:15-1821:18
     StageAttrs
-SampleMaterial.lc 1810:29-1810:36
+1810:29-1810:36
     forall a . Maybe a
-SampleMaterial.lc 1811:30-1811:42
+1811:30-1811:42
     RGBGen
-SampleMaterial.lc 1812:32-1812:42
+1812:32-1812:42
     AlphaGen
-SampleMaterial.lc 1813:29-1813:40
+1813:29-1813:40
     TCGen
-SampleMaterial.lc 1814:29-1814:31
+1814:29-1814:31
     forall a . [a]
-SampleMaterial.lc 1815:31-1815:42
+1815:31-1815:42
     StageTexture
-SampleMaterial.lc 1816:34-1816:38
+1816:34-1816:38
     Bool
-SampleMaterial.lc 1817:33-1817:41
+1817:33-1817:41
     DepthFunction
-SampleMaterial.lc 1818:33-1818:40
+1818:33-1818:40
     forall a . Maybe a
-SampleMaterial.lc 1819:41-1819:46
+1819:41-1819:46
     Bool
-SampleMaterial.lc 1820:38-1820:53
+1820:38-1820:53
     String
-SampleMaterial.lc 1822:15-1822:25
+1822:15-1822:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -13294,86 +13294,86 @@ SampleMaterial.lc 1822:15-1822:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1822:15-1823:57
+1822:15-1823:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1822:15-1824:42
+1822:15-1824:42
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1822:15-1825:42
+1822:15-1825:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1822:15-1826:36
+1822:15-1826:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1822:15-1827:31
+1822:15-1827:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1822:15-1828:77
+1822:15-1828:77
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1822:15-1829:39
+1822:15-1829:39
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1822:15-1830:41
+1822:15-1830:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1822:15-1831:40
+1822:15-1831:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1822:15-1832:46
+1822:15-1832:46
     String -> StageAttrs
-SampleMaterial.lc 1822:15-1834:18
+1822:15-1834:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1823:29-1823:33
+1823:29-1823:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1823:29-1823:57
+1823:29-1823:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1823:34-1823:57
+1823:34-1823:57
     (Blending', Blending')
-SampleMaterial.lc 1823:36-1823:46
+1823:36-1823:46
     Blending'
-SampleMaterial.lc 1823:49-1823:55
+1823:49-1823:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1824:30-1824:42
+1824:30-1824:42
     RGBGen
-SampleMaterial.lc 1825:32-1825:42
+1825:32-1825:42
     AlphaGen
-SampleMaterial.lc 1826:29-1826:36
+1826:29-1826:36
     TCGen
-SampleMaterial.lc 1827:29-1827:31
+1827:29-1827:31
     forall a . [a]
-SampleMaterial.lc 1828:31-1828:37
+1828:31-1828:37
     String -> StageTexture
-SampleMaterial.lc 1828:31-1828:77
+1828:31-1828:77
     StageTexture
-SampleMaterial.lc 1828:38-1828:77
+1828:38-1828:77
     String
-SampleMaterial.lc 1829:34-1829:39
+1829:34-1829:39
     Bool
-SampleMaterial.lc 1830:33-1830:41
+1830:33-1830:41
     DepthFunction
-SampleMaterial.lc 1831:33-1831:40
+1831:33-1831:40
     forall a . Maybe a
-SampleMaterial.lc 1832:41-1832:46
+1832:41-1832:46
     Bool
-SampleMaterial.lc 1833:38-1833:54
+1833:38-1833:54
     String
-SampleMaterial.lc 1836:21-1836:26
+1836:21-1836:26
     Bool
-SampleMaterial.lc 1839:5-1881:6
+1839:5-1881:6
     (String, CommonAttrs)
-SampleMaterial.lc 1839:5-2182:6
+1839:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1839:7-1839:42
+1839:7-1839:42
     String
-SampleMaterial.lc 1840:7-1840:18
+1840:7-1840:18
     ()
       -> ()
         -> Bool
@@ -13381,68 +13381,68 @@ SampleMaterial.lc 1840:7-1840:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1840:7-1841:26
+1840:7-1841:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1840:7-1842:26
+1840:7-1842:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1840:7-1843:27
+1840:7-1843:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1840:7-1844:21
+1840:7-1844:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1840:7-1845:35
+1840:7-1845:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1840:7-1846:28
+1840:7-1846:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1840:7-1847:33
+1840:7-1847:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1840:7-1848:32
+1840:7-1848:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1840:7-1849:30
+1840:7-1849:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1840:7-1850:34
+1840:7-1850:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1840:7-1878:14
+1840:7-1878:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1840:7-1880:10
+1840:7-1880:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1841:24-1841:26
+1841:24-1841:26
     ()
-SampleMaterial.lc 1842:24-1842:26
+1842:24-1842:26
     ()
-SampleMaterial.lc 1843:22-1843:27
+1843:22-1843:27
     Bool
-SampleMaterial.lc 1844:20-1844:21
+1844:20-1844:21
     _b
-SampleMaterial.lc 1845:30-1845:35
+1845:30-1845:35
     Bool
-SampleMaterial.lc 1846:23-1846:28
+1846:23-1846:28
     Bool
-SampleMaterial.lc 1847:20-1847:33
+1847:20-1847:33
     CullType
-SampleMaterial.lc 1848:30-1848:32
+1848:30-1848:32
     forall a . [a]
-SampleMaterial.lc 1849:25-1849:30
+1849:25-1849:30
     Bool
-SampleMaterial.lc 1850:29-1850:34
+1850:29-1850:34
     Bool
-SampleMaterial.lc 1852:13-1878:14
+1852:13-1878:14
     [StageAttrs]
-SampleMaterial.lc 1852:15-1852:25
+1852:15-1852:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -13450,70 +13450,70 @@ SampleMaterial.lc 1852:15-1852:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1852:15-1853:36
+1852:15-1853:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1852:15-1854:50
+1852:15-1854:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1852:15-1855:42
+1852:15-1855:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1852:15-1856:36
+1852:15-1856:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1852:15-1857:31
+1852:15-1857:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1852:15-1858:73
+1852:15-1858:73
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1852:15-1859:38
+1852:15-1859:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1852:15-1860:41
+1852:15-1860:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1852:15-1861:40
+1852:15-1861:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1852:15-1862:46
+1852:15-1862:46
     String -> StageAttrs
-SampleMaterial.lc 1852:15-1864:18
+1852:15-1864:18
     StageAttrs
-SampleMaterial.lc 1853:29-1853:36
+1853:29-1853:36
     forall a . Maybe a
-SampleMaterial.lc 1854:30-1854:50
+1854:30-1854:50
     RGBGen
-SampleMaterial.lc 1855:32-1855:42
+1855:32-1855:42
     AlphaGen
-SampleMaterial.lc 1856:29-1856:36
+1856:29-1856:36
     TCGen
-SampleMaterial.lc 1857:29-1857:31
+1857:29-1857:31
     forall a . [a]
-SampleMaterial.lc 1858:31-1858:37
+1858:31-1858:37
     String -> StageTexture
-SampleMaterial.lc 1858:31-1858:73
+1858:31-1858:73
     StageTexture
-SampleMaterial.lc 1858:38-1858:73
+1858:38-1858:73
     String
-SampleMaterial.lc 1859:34-1859:38
+1859:34-1859:38
     Bool
-SampleMaterial.lc 1860:33-1860:41
+1860:33-1860:41
     DepthFunction
-SampleMaterial.lc 1861:33-1861:40
+1861:33-1861:40
     forall a . Maybe a
-SampleMaterial.lc 1862:41-1862:46
+1862:41-1862:46
     Bool
-SampleMaterial.lc 1863:38-1863:54
+1863:38-1863:54
     String
-SampleMaterial.lc 1865:15-1865:25
+1865:15-1865:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -13521,82 +13521,82 @@ SampleMaterial.lc 1865:15-1865:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1865:15-1866:57
+1865:15-1866:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1865:15-1867:50
+1865:15-1867:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1865:15-1868:42
+1865:15-1868:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1865:15-1869:40
+1865:15-1869:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1865:15-1870:31
+1865:15-1870:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1865:15-1871:42
+1865:15-1871:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1865:15-1872:38
+1865:15-1872:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1865:15-1873:41
+1865:15-1873:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1865:15-1874:40
+1865:15-1874:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1865:15-1875:46
+1865:15-1875:46
     String -> StageAttrs
-SampleMaterial.lc 1865:15-1877:18
+1865:15-1877:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1866:29-1866:33
+1866:29-1866:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1866:29-1866:57
+1866:29-1866:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1866:34-1866:57
+1866:34-1866:57
     (Blending', Blending')
-SampleMaterial.lc 1866:36-1866:46
+1866:36-1866:46
     Blending'
-SampleMaterial.lc 1866:49-1866:55
+1866:49-1866:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1867:30-1867:50
+1867:30-1867:50
     RGBGen
-SampleMaterial.lc 1868:32-1868:42
+1868:32-1868:42
     AlphaGen
-SampleMaterial.lc 1869:29-1869:40
+1869:29-1869:40
     TCGen
-SampleMaterial.lc 1870:29-1870:31
+1870:29-1870:31
     forall a . [a]
-SampleMaterial.lc 1871:31-1871:42
+1871:31-1871:42
     StageTexture
-SampleMaterial.lc 1872:34-1872:38
+1872:34-1872:38
     Bool
-SampleMaterial.lc 1873:33-1873:41
+1873:33-1873:41
     DepthFunction
-SampleMaterial.lc 1874:33-1874:40
+1874:33-1874:40
     forall a . Maybe a
-SampleMaterial.lc 1875:41-1875:46
+1875:41-1875:46
     Bool
-SampleMaterial.lc 1876:38-1876:54
+1876:38-1876:54
     String
-SampleMaterial.lc 1879:21-1879:26
+1879:21-1879:26
     Bool
-SampleMaterial.lc 1882:5-1924:6
+1882:5-1924:6
     (String, CommonAttrs)
-SampleMaterial.lc 1882:5-2182:6
+1882:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1882:7-1882:47
+1882:7-1882:47
     String
-SampleMaterial.lc 1883:7-1883:18
+1883:7-1883:18
     ()
       -> ()
         -> Bool
@@ -13604,68 +13604,68 @@ SampleMaterial.lc 1883:7-1883:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1883:7-1884:26
+1883:7-1884:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1883:7-1885:26
+1883:7-1885:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1883:7-1886:27
+1883:7-1886:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1883:7-1887:21
+1883:7-1887:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1883:7-1888:35
+1883:7-1888:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1883:7-1889:28
+1883:7-1889:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1883:7-1890:33
+1883:7-1890:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1883:7-1891:32
+1883:7-1891:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1883:7-1892:30
+1883:7-1892:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1883:7-1893:34
+1883:7-1893:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1883:7-1921:14
+1883:7-1921:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1883:7-1923:10
+1883:7-1923:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1884:24-1884:26
+1884:24-1884:26
     ()
-SampleMaterial.lc 1885:24-1885:26
+1885:24-1885:26
     ()
-SampleMaterial.lc 1886:22-1886:27
+1886:22-1886:27
     Bool
-SampleMaterial.lc 1887:20-1887:21
+1887:20-1887:21
     _b
-SampleMaterial.lc 1888:30-1888:35
+1888:30-1888:35
     Bool
-SampleMaterial.lc 1889:23-1889:28
+1889:23-1889:28
     Bool
-SampleMaterial.lc 1890:20-1890:33
+1890:20-1890:33
     CullType
-SampleMaterial.lc 1891:30-1891:32
+1891:30-1891:32
     forall a . [a]
-SampleMaterial.lc 1892:25-1892:30
+1892:25-1892:30
     Bool
-SampleMaterial.lc 1893:29-1893:34
+1893:29-1893:34
     Bool
-SampleMaterial.lc 1895:13-1921:14
+1895:13-1921:14
     [StageAttrs]
-SampleMaterial.lc 1895:15-1895:25
+1895:15-1895:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -13673,70 +13673,70 @@ SampleMaterial.lc 1895:15-1895:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1895:15-1896:36
+1895:15-1896:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1895:15-1897:50
+1895:15-1897:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1895:15-1898:42
+1895:15-1898:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1895:15-1899:36
+1895:15-1899:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1895:15-1900:31
+1895:15-1900:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1895:15-1901:78
+1895:15-1901:78
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1895:15-1902:38
+1895:15-1902:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1895:15-1903:41
+1895:15-1903:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1895:15-1904:40
+1895:15-1904:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1895:15-1905:46
+1895:15-1905:46
     String -> StageAttrs
-SampleMaterial.lc 1895:15-1907:18
+1895:15-1907:18
     StageAttrs
-SampleMaterial.lc 1896:29-1896:36
+1896:29-1896:36
     forall a . Maybe a
-SampleMaterial.lc 1897:30-1897:50
+1897:30-1897:50
     RGBGen
-SampleMaterial.lc 1898:32-1898:42
+1898:32-1898:42
     AlphaGen
-SampleMaterial.lc 1899:29-1899:36
+1899:29-1899:36
     TCGen
-SampleMaterial.lc 1900:29-1900:31
+1900:29-1900:31
     forall a . [a]
-SampleMaterial.lc 1901:31-1901:37
+1901:31-1901:37
     String -> StageTexture
-SampleMaterial.lc 1901:31-1901:78
+1901:31-1901:78
     StageTexture
-SampleMaterial.lc 1901:38-1901:78
+1901:38-1901:78
     String
-SampleMaterial.lc 1902:34-1902:38
+1902:34-1902:38
     Bool
-SampleMaterial.lc 1903:33-1903:41
+1903:33-1903:41
     DepthFunction
-SampleMaterial.lc 1904:33-1904:40
+1904:33-1904:40
     forall a . Maybe a
-SampleMaterial.lc 1905:41-1905:46
+1905:41-1905:46
     Bool
-SampleMaterial.lc 1906:38-1906:54
+1906:38-1906:54
     String
-SampleMaterial.lc 1908:15-1908:25
+1908:15-1908:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -13744,82 +13744,82 @@ SampleMaterial.lc 1908:15-1908:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1908:15-1909:57
+1908:15-1909:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1908:15-1910:50
+1908:15-1910:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1908:15-1911:42
+1908:15-1911:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1908:15-1912:40
+1908:15-1912:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1908:15-1913:31
+1908:15-1913:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1908:15-1914:42
+1908:15-1914:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1908:15-1915:38
+1908:15-1915:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1908:15-1916:41
+1908:15-1916:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1908:15-1917:40
+1908:15-1917:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1908:15-1918:46
+1908:15-1918:46
     String -> StageAttrs
-SampleMaterial.lc 1908:15-1920:18
+1908:15-1920:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1909:29-1909:33
+1909:29-1909:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1909:29-1909:57
+1909:29-1909:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1909:34-1909:57
+1909:34-1909:57
     (Blending', Blending')
-SampleMaterial.lc 1909:36-1909:46
+1909:36-1909:46
     Blending'
-SampleMaterial.lc 1909:49-1909:55
+1909:49-1909:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1910:30-1910:50
+1910:30-1910:50
     RGBGen
-SampleMaterial.lc 1911:32-1911:42
+1911:32-1911:42
     AlphaGen
-SampleMaterial.lc 1912:29-1912:40
+1912:29-1912:40
     TCGen
-SampleMaterial.lc 1913:29-1913:31
+1913:29-1913:31
     forall a . [a]
-SampleMaterial.lc 1914:31-1914:42
+1914:31-1914:42
     StageTexture
-SampleMaterial.lc 1915:34-1915:38
+1915:34-1915:38
     Bool
-SampleMaterial.lc 1916:33-1916:41
+1916:33-1916:41
     DepthFunction
-SampleMaterial.lc 1917:33-1917:40
+1917:33-1917:40
     forall a . Maybe a
-SampleMaterial.lc 1918:41-1918:46
+1918:41-1918:46
     Bool
-SampleMaterial.lc 1919:38-1919:54
+1919:38-1919:54
     String
-SampleMaterial.lc 1922:21-1922:26
+1922:21-1922:26
     Bool
-SampleMaterial.lc 1925:5-1967:6
+1925:5-1967:6
     (String, CommonAttrs)
-SampleMaterial.lc 1925:5-2182:6
+1925:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1925:7-1925:38
+1925:7-1925:38
     String
-SampleMaterial.lc 1926:7-1926:18
+1926:7-1926:18
     ()
       -> ()
         -> Bool
@@ -13827,68 +13827,68 @@ SampleMaterial.lc 1926:7-1926:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1926:7-1927:26
+1926:7-1927:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1926:7-1928:26
+1926:7-1928:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1926:7-1929:27
+1926:7-1929:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1926:7-1930:21
+1926:7-1930:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1926:7-1931:35
+1926:7-1931:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1926:7-1932:28
+1926:7-1932:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1926:7-1933:33
+1926:7-1933:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1926:7-1934:32
+1926:7-1934:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1926:7-1935:30
+1926:7-1935:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1926:7-1936:34
+1926:7-1936:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1926:7-1964:14
+1926:7-1964:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1926:7-1966:10
+1926:7-1966:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1927:24-1927:26
+1927:24-1927:26
     ()
-SampleMaterial.lc 1928:24-1928:26
+1928:24-1928:26
     ()
-SampleMaterial.lc 1929:22-1929:27
+1929:22-1929:27
     Bool
-SampleMaterial.lc 1930:20-1930:21
+1930:20-1930:21
     _b
-SampleMaterial.lc 1931:30-1931:35
+1931:30-1931:35
     Bool
-SampleMaterial.lc 1932:23-1932:28
+1932:23-1932:28
     Bool
-SampleMaterial.lc 1933:20-1933:33
+1933:20-1933:33
     CullType
-SampleMaterial.lc 1934:30-1934:32
+1934:30-1934:32
     forall a . [a]
-SampleMaterial.lc 1935:25-1935:30
+1935:25-1935:30
     Bool
-SampleMaterial.lc 1936:29-1936:34
+1936:29-1936:34
     Bool
-SampleMaterial.lc 1938:13-1964:14
+1938:13-1964:14
     [StageAttrs]
-SampleMaterial.lc 1938:15-1938:25
+1938:15-1938:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -13896,70 +13896,70 @@ SampleMaterial.lc 1938:15-1938:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1938:15-1939:36
+1938:15-1939:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1938:15-1940:50
+1938:15-1940:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1938:15-1941:42
+1938:15-1941:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1938:15-1942:36
+1938:15-1942:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1938:15-1943:31
+1938:15-1943:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1938:15-1944:69
+1938:15-1944:69
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1938:15-1945:38
+1938:15-1945:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1938:15-1946:41
+1938:15-1946:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1938:15-1947:40
+1938:15-1947:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1938:15-1948:46
+1938:15-1948:46
     String -> StageAttrs
-SampleMaterial.lc 1938:15-1950:18
+1938:15-1950:18
     StageAttrs
-SampleMaterial.lc 1939:29-1939:36
+1939:29-1939:36
     forall a . Maybe a
-SampleMaterial.lc 1940:30-1940:50
+1940:30-1940:50
     RGBGen
-SampleMaterial.lc 1941:32-1941:42
+1941:32-1941:42
     AlphaGen
-SampleMaterial.lc 1942:29-1942:36
+1942:29-1942:36
     TCGen
-SampleMaterial.lc 1943:29-1943:31
+1943:29-1943:31
     forall a . [a]
-SampleMaterial.lc 1944:31-1944:37
+1944:31-1944:37
     String -> StageTexture
-SampleMaterial.lc 1944:31-1944:69
+1944:31-1944:69
     StageTexture
-SampleMaterial.lc 1944:38-1944:69
+1944:38-1944:69
     String
-SampleMaterial.lc 1945:34-1945:38
+1945:34-1945:38
     Bool
-SampleMaterial.lc 1946:33-1946:41
+1946:33-1946:41
     DepthFunction
-SampleMaterial.lc 1947:33-1947:40
+1947:33-1947:40
     forall a . Maybe a
-SampleMaterial.lc 1948:41-1948:46
+1948:41-1948:46
     Bool
-SampleMaterial.lc 1949:38-1949:54
+1949:38-1949:54
     String
-SampleMaterial.lc 1951:15-1951:25
+1951:15-1951:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -13967,82 +13967,82 @@ SampleMaterial.lc 1951:15-1951:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1951:15-1952:57
+1951:15-1952:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1951:15-1953:50
+1951:15-1953:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1951:15-1954:42
+1951:15-1954:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1951:15-1955:40
+1951:15-1955:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1951:15-1956:31
+1951:15-1956:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1951:15-1957:42
+1951:15-1957:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1951:15-1958:38
+1951:15-1958:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1951:15-1959:41
+1951:15-1959:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1951:15-1960:40
+1951:15-1960:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1951:15-1961:46
+1951:15-1961:46
     String -> StageAttrs
-SampleMaterial.lc 1951:15-1963:18
+1951:15-1963:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1952:29-1952:33
+1952:29-1952:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1952:29-1952:57
+1952:29-1952:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1952:34-1952:57
+1952:34-1952:57
     (Blending', Blending')
-SampleMaterial.lc 1952:36-1952:46
+1952:36-1952:46
     Blending'
-SampleMaterial.lc 1952:49-1952:55
+1952:49-1952:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1953:30-1953:50
+1953:30-1953:50
     RGBGen
-SampleMaterial.lc 1954:32-1954:42
+1954:32-1954:42
     AlphaGen
-SampleMaterial.lc 1955:29-1955:40
+1955:29-1955:40
     TCGen
-SampleMaterial.lc 1956:29-1956:31
+1956:29-1956:31
     forall a . [a]
-SampleMaterial.lc 1957:31-1957:42
+1957:31-1957:42
     StageTexture
-SampleMaterial.lc 1958:34-1958:38
+1958:34-1958:38
     Bool
-SampleMaterial.lc 1959:33-1959:41
+1959:33-1959:41
     DepthFunction
-SampleMaterial.lc 1960:33-1960:40
+1960:33-1960:40
     forall a . Maybe a
-SampleMaterial.lc 1961:41-1961:46
+1961:41-1961:46
     Bool
-SampleMaterial.lc 1962:38-1962:54
+1962:38-1962:54
     String
-SampleMaterial.lc 1965:21-1965:26
+1965:21-1965:26
     Bool
-SampleMaterial.lc 1968:5-2010:6
+1968:5-2010:6
     (String, CommonAttrs)
-SampleMaterial.lc 1968:5-2182:6
+1968:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1968:7-1968:43
+1968:7-1968:43
     String
-SampleMaterial.lc 1969:7-1969:18
+1969:7-1969:18
     ()
       -> ()
         -> Bool
@@ -14050,68 +14050,68 @@ SampleMaterial.lc 1969:7-1969:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1969:7-1970:26
+1969:7-1970:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1969:7-1971:26
+1969:7-1971:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1969:7-1972:27
+1969:7-1972:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1969:7-1973:21
+1969:7-1973:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1969:7-1974:35
+1969:7-1974:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1969:7-1975:28
+1969:7-1975:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1969:7-1976:33
+1969:7-1976:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1969:7-1977:32
+1969:7-1977:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1969:7-1978:30
+1969:7-1978:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1969:7-1979:34
+1969:7-1979:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1969:7-2007:14
+1969:7-2007:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1969:7-2009:10
+1969:7-2009:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1970:24-1970:26
+1970:24-1970:26
     ()
-SampleMaterial.lc 1971:24-1971:26
+1971:24-1971:26
     ()
-SampleMaterial.lc 1972:22-1972:27
+1972:22-1972:27
     Bool
-SampleMaterial.lc 1973:20-1973:21
+1973:20-1973:21
     _b
-SampleMaterial.lc 1974:30-1974:35
+1974:30-1974:35
     Bool
-SampleMaterial.lc 1975:23-1975:28
+1975:23-1975:28
     Bool
-SampleMaterial.lc 1976:20-1976:33
+1976:20-1976:33
     CullType
-SampleMaterial.lc 1977:30-1977:32
+1977:30-1977:32
     forall a . [a]
-SampleMaterial.lc 1978:25-1978:30
+1978:25-1978:30
     Bool
-SampleMaterial.lc 1979:29-1979:34
+1979:29-1979:34
     Bool
-SampleMaterial.lc 1981:13-2007:14
+1981:13-2007:14
     [StageAttrs]
-SampleMaterial.lc 1981:15-1981:25
+1981:15-1981:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -14119,70 +14119,70 @@ SampleMaterial.lc 1981:15-1981:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1981:15-1982:36
+1981:15-1982:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1981:15-1983:50
+1981:15-1983:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1981:15-1984:42
+1981:15-1984:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1981:15-1985:36
+1981:15-1985:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1981:15-1986:31
+1981:15-1986:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1981:15-1987:74
+1981:15-1987:74
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1981:15-1988:38
+1981:15-1988:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1981:15-1989:41
+1981:15-1989:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1981:15-1990:40
+1981:15-1990:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1981:15-1991:46
+1981:15-1991:46
     String -> StageAttrs
-SampleMaterial.lc 1981:15-1993:18
+1981:15-1993:18
     StageAttrs
-SampleMaterial.lc 1982:29-1982:36
+1982:29-1982:36
     forall a . Maybe a
-SampleMaterial.lc 1983:30-1983:50
+1983:30-1983:50
     RGBGen
-SampleMaterial.lc 1984:32-1984:42
+1984:32-1984:42
     AlphaGen
-SampleMaterial.lc 1985:29-1985:36
+1985:29-1985:36
     TCGen
-SampleMaterial.lc 1986:29-1986:31
+1986:29-1986:31
     forall a . [a]
-SampleMaterial.lc 1987:31-1987:37
+1987:31-1987:37
     String -> StageTexture
-SampleMaterial.lc 1987:31-1987:74
+1987:31-1987:74
     StageTexture
-SampleMaterial.lc 1987:38-1987:74
+1987:38-1987:74
     String
-SampleMaterial.lc 1988:34-1988:38
+1988:34-1988:38
     Bool
-SampleMaterial.lc 1989:33-1989:41
+1989:33-1989:41
     DepthFunction
-SampleMaterial.lc 1990:33-1990:40
+1990:33-1990:40
     forall a . Maybe a
-SampleMaterial.lc 1991:41-1991:46
+1991:41-1991:46
     Bool
-SampleMaterial.lc 1992:38-1992:53
+1992:38-1992:53
     String
-SampleMaterial.lc 1994:15-1994:25
+1994:15-1994:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -14190,82 +14190,82 @@ SampleMaterial.lc 1994:15-1994:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1994:15-1995:57
+1994:15-1995:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1994:15-1996:50
+1994:15-1996:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1994:15-1997:42
+1994:15-1997:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1994:15-1998:40
+1994:15-1998:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1994:15-1999:31
+1994:15-1999:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1994:15-2000:42
+1994:15-2000:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1994:15-2001:38
+1994:15-2001:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1994:15-2002:41
+1994:15-2002:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1994:15-2003:40
+1994:15-2003:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1994:15-2004:46
+1994:15-2004:46
     String -> StageAttrs
-SampleMaterial.lc 1994:15-2006:18
+1994:15-2006:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1995:29-1995:33
+1995:29-1995:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1995:29-1995:57
+1995:29-1995:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1995:34-1995:57
+1995:34-1995:57
     (Blending', Blending')
-SampleMaterial.lc 1995:36-1995:46
+1995:36-1995:46
     Blending'
-SampleMaterial.lc 1995:49-1995:55
+1995:49-1995:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1996:30-1996:50
+1996:30-1996:50
     RGBGen
-SampleMaterial.lc 1997:32-1997:42
+1997:32-1997:42
     AlphaGen
-SampleMaterial.lc 1998:29-1998:40
+1998:29-1998:40
     TCGen
-SampleMaterial.lc 1999:29-1999:31
+1999:29-1999:31
     forall a . [a]
-SampleMaterial.lc 2000:31-2000:42
+2000:31-2000:42
     StageTexture
-SampleMaterial.lc 2001:34-2001:38
+2001:34-2001:38
     Bool
-SampleMaterial.lc 2002:33-2002:41
+2002:33-2002:41
     DepthFunction
-SampleMaterial.lc 2003:33-2003:40
+2003:33-2003:40
     forall a . Maybe a
-SampleMaterial.lc 2004:41-2004:46
+2004:41-2004:46
     Bool
-SampleMaterial.lc 2005:38-2005:54
+2005:38-2005:54
     String
-SampleMaterial.lc 2008:21-2008:26
+2008:21-2008:26
     Bool
-SampleMaterial.lc 2011:5-2053:6
+2011:5-2053:6
     (String, CommonAttrs)
-SampleMaterial.lc 2011:5-2182:6
+2011:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 2011:7-2011:36
+2011:7-2011:36
     String
-SampleMaterial.lc 2012:7-2012:18
+2012:7-2012:18
     ()
       -> ()
         -> Bool
@@ -14273,68 +14273,68 @@ SampleMaterial.lc 2012:7-2012:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2012:7-2013:26
+2012:7-2013:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2012:7-2014:26
+2012:7-2014:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2012:7-2015:27
+2012:7-2015:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2012:7-2016:21
+2012:7-2016:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2012:7-2017:35
+2012:7-2017:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2012:7-2018:28
+2012:7-2018:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2012:7-2019:33
+2012:7-2019:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2012:7-2020:32
+2012:7-2020:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2012:7-2021:30
+2012:7-2021:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2012:7-2022:34
+2012:7-2022:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2012:7-2050:14
+2012:7-2050:14
     Bool -> CommonAttrs
-SampleMaterial.lc 2012:7-2052:10
+2012:7-2052:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 2013:24-2013:26
+2013:24-2013:26
     ()
-SampleMaterial.lc 2014:24-2014:26
+2014:24-2014:26
     ()
-SampleMaterial.lc 2015:22-2015:27
+2015:22-2015:27
     Bool
-SampleMaterial.lc 2016:20-2016:21
+2016:20-2016:21
     _b
-SampleMaterial.lc 2017:30-2017:35
+2017:30-2017:35
     Bool
-SampleMaterial.lc 2018:23-2018:28
+2018:23-2018:28
     Bool
-SampleMaterial.lc 2019:20-2019:33
+2019:20-2019:33
     CullType
-SampleMaterial.lc 2020:30-2020:32
+2020:30-2020:32
     forall a . [a]
-SampleMaterial.lc 2021:25-2021:30
+2021:25-2021:30
     Bool
-SampleMaterial.lc 2022:29-2022:34
+2022:29-2022:34
     Bool
-SampleMaterial.lc 2024:13-2050:14
+2024:13-2050:14
     [StageAttrs]
-SampleMaterial.lc 2024:15-2024:25
+2024:15-2024:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -14342,70 +14342,70 @@ SampleMaterial.lc 2024:15-2024:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2024:15-2025:36
+2024:15-2025:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2024:15-2026:50
+2024:15-2026:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2024:15-2027:42
+2024:15-2027:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2024:15-2028:36
+2024:15-2028:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2024:15-2029:31
+2024:15-2029:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2024:15-2030:67
+2024:15-2030:67
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2024:15-2031:38
+2024:15-2031:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2024:15-2032:41
+2024:15-2032:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2024:15-2033:40
+2024:15-2033:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 2024:15-2034:46
+2024:15-2034:46
     String -> StageAttrs
-SampleMaterial.lc 2024:15-2036:18
+2024:15-2036:18
     StageAttrs
-SampleMaterial.lc 2025:29-2025:36
+2025:29-2025:36
     forall a . Maybe a
-SampleMaterial.lc 2026:30-2026:50
+2026:30-2026:50
     RGBGen
-SampleMaterial.lc 2027:32-2027:42
+2027:32-2027:42
     AlphaGen
-SampleMaterial.lc 2028:29-2028:36
+2028:29-2028:36
     TCGen
-SampleMaterial.lc 2029:29-2029:31
+2029:29-2029:31
     forall a . [a]
-SampleMaterial.lc 2030:31-2030:37
+2030:31-2030:37
     String -> StageTexture
-SampleMaterial.lc 2030:31-2030:67
+2030:31-2030:67
     StageTexture
-SampleMaterial.lc 2030:38-2030:67
+2030:38-2030:67
     String
-SampleMaterial.lc 2031:34-2031:38
+2031:34-2031:38
     Bool
-SampleMaterial.lc 2032:33-2032:41
+2032:33-2032:41
     DepthFunction
-SampleMaterial.lc 2033:33-2033:40
+2033:33-2033:40
     forall a . Maybe a
-SampleMaterial.lc 2034:41-2034:46
+2034:41-2034:46
     Bool
-SampleMaterial.lc 2035:38-2035:54
+2035:38-2035:54
     String
-SampleMaterial.lc 2037:15-2037:25
+2037:15-2037:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -14413,82 +14413,82 @@ SampleMaterial.lc 2037:15-2037:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2037:15-2038:57
+2037:15-2038:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2037:15-2039:50
+2037:15-2039:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2037:15-2040:42
+2037:15-2040:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2037:15-2041:40
+2037:15-2041:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2037:15-2042:31
+2037:15-2042:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2037:15-2043:42
+2037:15-2043:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2037:15-2044:38
+2037:15-2044:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2037:15-2045:41
+2037:15-2045:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2037:15-2046:40
+2037:15-2046:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 2037:15-2047:46
+2037:15-2047:46
     String -> StageAttrs
-SampleMaterial.lc 2037:15-2049:18
+2037:15-2049:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 2038:29-2038:33
+2038:29-2038:33
     forall a . a -> Maybe a
-SampleMaterial.lc 2038:29-2038:57
+2038:29-2038:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 2038:34-2038:57
+2038:34-2038:57
     (Blending', Blending')
-SampleMaterial.lc 2038:36-2038:46
+2038:36-2038:46
     Blending'
-SampleMaterial.lc 2038:49-2038:55
+2038:49-2038:55
     Blending' | ((Blending'))
-SampleMaterial.lc 2039:30-2039:50
+2039:30-2039:50
     RGBGen
-SampleMaterial.lc 2040:32-2040:42
+2040:32-2040:42
     AlphaGen
-SampleMaterial.lc 2041:29-2041:40
+2041:29-2041:40
     TCGen
-SampleMaterial.lc 2042:29-2042:31
+2042:29-2042:31
     forall a . [a]
-SampleMaterial.lc 2043:31-2043:42
+2043:31-2043:42
     StageTexture
-SampleMaterial.lc 2044:34-2044:38
+2044:34-2044:38
     Bool
-SampleMaterial.lc 2045:33-2045:41
+2045:33-2045:41
     DepthFunction
-SampleMaterial.lc 2046:33-2046:40
+2046:33-2046:40
     forall a . Maybe a
-SampleMaterial.lc 2047:41-2047:46
+2047:41-2047:46
     Bool
-SampleMaterial.lc 2048:38-2048:54
+2048:38-2048:54
     String
-SampleMaterial.lc 2051:21-2051:26
+2051:21-2051:26
     Bool
-SampleMaterial.lc 2054:5-2096:6
+2054:5-2096:6
     (String, CommonAttrs)
-SampleMaterial.lc 2054:5-2182:6
+2054:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 2054:7-2054:40
+2054:7-2054:40
     String
-SampleMaterial.lc 2055:7-2055:18
+2055:7-2055:18
     ()
       -> ()
         -> Bool
@@ -14496,68 +14496,68 @@ SampleMaterial.lc 2055:7-2055:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2055:7-2056:26
+2055:7-2056:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2055:7-2057:26
+2055:7-2057:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2055:7-2058:27
+2055:7-2058:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2055:7-2059:21
+2055:7-2059:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2055:7-2060:35
+2055:7-2060:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2055:7-2061:28
+2055:7-2061:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2055:7-2062:33
+2055:7-2062:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2055:7-2063:32
+2055:7-2063:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2055:7-2064:30
+2055:7-2064:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2055:7-2065:34
+2055:7-2065:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2055:7-2093:14
+2055:7-2093:14
     Bool -> CommonAttrs
-SampleMaterial.lc 2055:7-2095:10
+2055:7-2095:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 2056:24-2056:26
+2056:24-2056:26
     ()
-SampleMaterial.lc 2057:24-2057:26
+2057:24-2057:26
     ()
-SampleMaterial.lc 2058:22-2058:27
+2058:22-2058:27
     Bool
-SampleMaterial.lc 2059:20-2059:21
+2059:20-2059:21
     _b
-SampleMaterial.lc 2060:30-2060:35
+2060:30-2060:35
     Bool
-SampleMaterial.lc 2061:23-2061:28
+2061:23-2061:28
     Bool
-SampleMaterial.lc 2062:20-2062:33
+2062:20-2062:33
     CullType
-SampleMaterial.lc 2063:30-2063:32
+2063:30-2063:32
     forall a . [a]
-SampleMaterial.lc 2064:25-2064:30
+2064:25-2064:30
     Bool
-SampleMaterial.lc 2065:29-2065:34
+2065:29-2065:34
     Bool
-SampleMaterial.lc 2067:13-2093:14
+2067:13-2093:14
     [StageAttrs]
-SampleMaterial.lc 2067:15-2067:25
+2067:15-2067:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -14565,70 +14565,70 @@ SampleMaterial.lc 2067:15-2067:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2067:15-2068:36
+2067:15-2068:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2067:15-2069:50
+2067:15-2069:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2067:15-2070:42
+2067:15-2070:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2067:15-2071:36
+2067:15-2071:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2067:15-2072:31
+2067:15-2072:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2067:15-2073:71
+2067:15-2073:71
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2067:15-2074:38
+2067:15-2074:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2067:15-2075:41
+2067:15-2075:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2067:15-2076:40
+2067:15-2076:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 2067:15-2077:46
+2067:15-2077:46
     String -> StageAttrs
-SampleMaterial.lc 2067:15-2079:18
+2067:15-2079:18
     StageAttrs
-SampleMaterial.lc 2068:29-2068:36
+2068:29-2068:36
     forall a . Maybe a
-SampleMaterial.lc 2069:30-2069:50
+2069:30-2069:50
     RGBGen
-SampleMaterial.lc 2070:32-2070:42
+2070:32-2070:42
     AlphaGen
-SampleMaterial.lc 2071:29-2071:36
+2071:29-2071:36
     TCGen
-SampleMaterial.lc 2072:29-2072:31
+2072:29-2072:31
     forall a . [a]
-SampleMaterial.lc 2073:31-2073:37
+2073:31-2073:37
     String -> StageTexture
-SampleMaterial.lc 2073:31-2073:71
+2073:31-2073:71
     StageTexture
-SampleMaterial.lc 2073:38-2073:71
+2073:38-2073:71
     String
-SampleMaterial.lc 2074:34-2074:38
+2074:34-2074:38
     Bool
-SampleMaterial.lc 2075:33-2075:41
+2075:33-2075:41
     DepthFunction
-SampleMaterial.lc 2076:33-2076:40
+2076:33-2076:40
     forall a . Maybe a
-SampleMaterial.lc 2077:41-2077:46
+2077:41-2077:46
     Bool
-SampleMaterial.lc 2078:38-2078:54
+2078:38-2078:54
     String
-SampleMaterial.lc 2080:15-2080:25
+2080:15-2080:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -14636,82 +14636,82 @@ SampleMaterial.lc 2080:15-2080:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2080:15-2081:57
+2080:15-2081:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2080:15-2082:50
+2080:15-2082:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2080:15-2083:42
+2080:15-2083:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2080:15-2084:40
+2080:15-2084:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2080:15-2085:31
+2080:15-2085:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2080:15-2086:42
+2080:15-2086:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2080:15-2087:38
+2080:15-2087:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2080:15-2088:41
+2080:15-2088:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2080:15-2089:40
+2080:15-2089:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 2080:15-2090:46
+2080:15-2090:46
     String -> StageAttrs
-SampleMaterial.lc 2080:15-2092:18
+2080:15-2092:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 2081:29-2081:33
+2081:29-2081:33
     forall a . a -> Maybe a
-SampleMaterial.lc 2081:29-2081:57
+2081:29-2081:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 2081:34-2081:57
+2081:34-2081:57
     (Blending', Blending')
-SampleMaterial.lc 2081:36-2081:46
+2081:36-2081:46
     Blending'
-SampleMaterial.lc 2081:49-2081:55
+2081:49-2081:55
     Blending' | ((Blending'))
-SampleMaterial.lc 2082:30-2082:50
+2082:30-2082:50
     RGBGen
-SampleMaterial.lc 2083:32-2083:42
+2083:32-2083:42
     AlphaGen
-SampleMaterial.lc 2084:29-2084:40
+2084:29-2084:40
     TCGen
-SampleMaterial.lc 2085:29-2085:31
+2085:29-2085:31
     forall a . [a]
-SampleMaterial.lc 2086:31-2086:42
+2086:31-2086:42
     StageTexture
-SampleMaterial.lc 2087:34-2087:38
+2087:34-2087:38
     Bool
-SampleMaterial.lc 2088:33-2088:41
+2088:33-2088:41
     DepthFunction
-SampleMaterial.lc 2089:33-2089:40
+2089:33-2089:40
     forall a . Maybe a
-SampleMaterial.lc 2090:41-2090:46
+2090:41-2090:46
     Bool
-SampleMaterial.lc 2091:38-2091:54
+2091:38-2091:54
     String
-SampleMaterial.lc 2094:21-2094:26
+2094:21-2094:26
     Bool
-SampleMaterial.lc 2097:5-2139:6
+2097:5-2139:6
     (String, CommonAttrs)
-SampleMaterial.lc 2097:5-2182:6
+2097:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 2097:7-2097:50
+2097:7-2097:50
     String
-SampleMaterial.lc 2098:7-2098:18
+2098:7-2098:18
     ()
       -> ()
         -> Bool
@@ -14719,68 +14719,68 @@ SampleMaterial.lc 2098:7-2098:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2098:7-2099:26
+2098:7-2099:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2098:7-2100:26
+2098:7-2100:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2098:7-2101:27
+2098:7-2101:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2098:7-2102:21
+2098:7-2102:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2098:7-2103:35
+2098:7-2103:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2098:7-2104:28
+2098:7-2104:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2098:7-2105:33
+2098:7-2105:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2098:7-2106:32
+2098:7-2106:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2098:7-2107:30
+2098:7-2107:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2098:7-2108:34
+2098:7-2108:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2098:7-2136:14
+2098:7-2136:14
     Bool -> CommonAttrs
-SampleMaterial.lc 2098:7-2138:10
+2098:7-2138:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 2099:24-2099:26
+2099:24-2099:26
     ()
-SampleMaterial.lc 2100:24-2100:26
+2100:24-2100:26
     ()
-SampleMaterial.lc 2101:22-2101:27
+2101:22-2101:27
     Bool
-SampleMaterial.lc 2102:20-2102:21
+2102:20-2102:21
     _b
-SampleMaterial.lc 2103:30-2103:35
+2103:30-2103:35
     Bool
-SampleMaterial.lc 2104:23-2104:28
+2104:23-2104:28
     Bool
-SampleMaterial.lc 2105:20-2105:33
+2105:20-2105:33
     CullType
-SampleMaterial.lc 2106:30-2106:32
+2106:30-2106:32
     forall a . [a]
-SampleMaterial.lc 2107:25-2107:30
+2107:25-2107:30
     Bool
-SampleMaterial.lc 2108:29-2108:34
+2108:29-2108:34
     Bool
-SampleMaterial.lc 2110:13-2136:14
+2110:13-2136:14
     [StageAttrs]
-SampleMaterial.lc 2110:15-2110:25
+2110:15-2110:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -14788,70 +14788,70 @@ SampleMaterial.lc 2110:15-2110:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2110:15-2111:36
+2110:15-2111:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2110:15-2112:50
+2110:15-2112:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2110:15-2113:42
+2110:15-2113:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2110:15-2114:36
+2110:15-2114:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2110:15-2115:31
+2110:15-2115:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2110:15-2116:81
+2110:15-2116:81
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2110:15-2117:38
+2110:15-2117:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2110:15-2118:41
+2110:15-2118:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2110:15-2119:40
+2110:15-2119:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 2110:15-2120:46
+2110:15-2120:46
     String -> StageAttrs
-SampleMaterial.lc 2110:15-2122:18
+2110:15-2122:18
     StageAttrs
-SampleMaterial.lc 2111:29-2111:36
+2111:29-2111:36
     forall a . Maybe a
-SampleMaterial.lc 2112:30-2112:50
+2112:30-2112:50
     RGBGen
-SampleMaterial.lc 2113:32-2113:42
+2113:32-2113:42
     AlphaGen
-SampleMaterial.lc 2114:29-2114:36
+2114:29-2114:36
     TCGen
-SampleMaterial.lc 2115:29-2115:31
+2115:29-2115:31
     forall a . [a]
-SampleMaterial.lc 2116:31-2116:37
+2116:31-2116:37
     String -> StageTexture
-SampleMaterial.lc 2116:31-2116:81
+2116:31-2116:81
     StageTexture
-SampleMaterial.lc 2116:38-2116:81
+2116:38-2116:81
     String
-SampleMaterial.lc 2117:34-2117:38
+2117:34-2117:38
     Bool
-SampleMaterial.lc 2118:33-2118:41
+2118:33-2118:41
     DepthFunction
-SampleMaterial.lc 2119:33-2119:40
+2119:33-2119:40
     forall a . Maybe a
-SampleMaterial.lc 2120:41-2120:46
+2120:41-2120:46
     Bool
-SampleMaterial.lc 2121:38-2121:53
+2121:38-2121:53
     String
-SampleMaterial.lc 2123:15-2123:25
+2123:15-2123:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -14859,80 +14859,80 @@ SampleMaterial.lc 2123:15-2123:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2123:15-2124:57
+2123:15-2124:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2123:15-2125:50
+2123:15-2125:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2123:15-2126:42
+2123:15-2126:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2123:15-2127:40
+2123:15-2127:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2123:15-2128:31
+2123:15-2128:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2123:15-2129:42
+2123:15-2129:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2123:15-2130:38
+2123:15-2130:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2123:15-2131:41
+2123:15-2131:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2123:15-2132:40
+2123:15-2132:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 2123:15-2133:46
+2123:15-2133:46
     String -> StageAttrs
-SampleMaterial.lc 2123:15-2135:18
+2123:15-2135:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 2124:29-2124:33
+2124:29-2124:33
     forall a . a -> Maybe a
-SampleMaterial.lc 2124:29-2124:57
+2124:29-2124:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 2124:34-2124:57
+2124:34-2124:57
     (Blending', Blending')
-SampleMaterial.lc 2124:36-2124:46
+2124:36-2124:46
     Blending'
-SampleMaterial.lc 2124:49-2124:55
+2124:49-2124:55
     Blending' | ((Blending'))
-SampleMaterial.lc 2125:30-2125:50
+2125:30-2125:50
     RGBGen
-SampleMaterial.lc 2126:32-2126:42
+2126:32-2126:42
     AlphaGen
-SampleMaterial.lc 2127:29-2127:40
+2127:29-2127:40
     TCGen
-SampleMaterial.lc 2128:29-2128:31
+2128:29-2128:31
     forall a . [a]
-SampleMaterial.lc 2129:31-2129:42
+2129:31-2129:42
     StageTexture
-SampleMaterial.lc 2130:34-2130:38
+2130:34-2130:38
     Bool
-SampleMaterial.lc 2131:33-2131:41
+2131:33-2131:41
     DepthFunction
-SampleMaterial.lc 2132:33-2132:40
+2132:33-2132:40
     forall a . Maybe a
-SampleMaterial.lc 2133:41-2133:46
+2133:41-2133:46
     Bool
-SampleMaterial.lc 2134:38-2134:54
+2134:38-2134:54
     String
-SampleMaterial.lc 2137:21-2137:26
+2137:21-2137:26
     Bool
-SampleMaterial.lc 2140:5-2182:6
+2140:5-2182:6
     (String, CommonAttrs) | [(String, CommonAttrs)]
-SampleMaterial.lc 2140:7-2140:50
+2140:7-2140:50
     String
-SampleMaterial.lc 2141:7-2141:18
+2141:7-2141:18
     ()
       -> ()
         -> Bool
@@ -14940,68 +14940,68 @@ SampleMaterial.lc 2141:7-2141:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2141:7-2142:26
+2141:7-2142:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2141:7-2143:26
+2141:7-2143:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2141:7-2144:27
+2141:7-2144:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2141:7-2145:21
+2141:7-2145:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2141:7-2146:35
+2141:7-2146:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2141:7-2147:28
+2141:7-2147:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2141:7-2148:33
+2141:7-2148:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2141:7-2149:32
+2141:7-2149:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2141:7-2150:30
+2141:7-2150:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2141:7-2151:34
+2141:7-2151:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2141:7-2179:14
+2141:7-2179:14
     Bool -> CommonAttrs
-SampleMaterial.lc 2141:7-2181:10
+2141:7-2181:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 2142:24-2142:26
+2142:24-2142:26
     ()
-SampleMaterial.lc 2143:24-2143:26
+2143:24-2143:26
     ()
-SampleMaterial.lc 2144:22-2144:27
+2144:22-2144:27
     Bool
-SampleMaterial.lc 2145:20-2145:21
+2145:20-2145:21
     _b
-SampleMaterial.lc 2146:30-2146:35
+2146:30-2146:35
     Bool
-SampleMaterial.lc 2147:23-2147:28
+2147:23-2147:28
     Bool
-SampleMaterial.lc 2148:20-2148:33
+2148:20-2148:33
     CullType
-SampleMaterial.lc 2149:30-2149:32
+2149:30-2149:32
     forall a . [a]
-SampleMaterial.lc 2150:25-2150:30
+2150:25-2150:30
     Bool
-SampleMaterial.lc 2151:29-2151:34
+2151:29-2151:34
     Bool
-SampleMaterial.lc 2153:13-2179:14
+2153:13-2179:14
     [StageAttrs]
-SampleMaterial.lc 2153:15-2153:25
+2153:15-2153:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -15009,70 +15009,70 @@ SampleMaterial.lc 2153:15-2153:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2153:15-2154:36
+2153:15-2154:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2153:15-2155:50
+2153:15-2155:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2153:15-2156:42
+2153:15-2156:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2153:15-2157:36
+2153:15-2157:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2153:15-2158:31
+2153:15-2158:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2153:15-2159:81
+2153:15-2159:81
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2153:15-2160:38
+2153:15-2160:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2153:15-2161:41
+2153:15-2161:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2153:15-2162:40
+2153:15-2162:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 2153:15-2163:46
+2153:15-2163:46
     String -> StageAttrs
-SampleMaterial.lc 2153:15-2165:18
+2153:15-2165:18
     StageAttrs
-SampleMaterial.lc 2154:29-2154:36
+2154:29-2154:36
     forall a . Maybe a
-SampleMaterial.lc 2155:30-2155:50
+2155:30-2155:50
     RGBGen
-SampleMaterial.lc 2156:32-2156:42
+2156:32-2156:42
     AlphaGen
-SampleMaterial.lc 2157:29-2157:36
+2157:29-2157:36
     TCGen
-SampleMaterial.lc 2158:29-2158:31
+2158:29-2158:31
     forall a . [a]
-SampleMaterial.lc 2159:31-2159:37
+2159:31-2159:37
     String -> StageTexture
-SampleMaterial.lc 2159:31-2159:81
+2159:31-2159:81
     StageTexture
-SampleMaterial.lc 2159:38-2159:81
+2159:38-2159:81
     String
-SampleMaterial.lc 2160:34-2160:38
+2160:34-2160:38
     Bool
-SampleMaterial.lc 2161:33-2161:41
+2161:33-2161:41
     DepthFunction
-SampleMaterial.lc 2162:33-2162:40
+2162:33-2162:40
     forall a . Maybe a
-SampleMaterial.lc 2163:41-2163:46
+2163:41-2163:46
     Bool
-SampleMaterial.lc 2164:38-2164:54
+2164:38-2164:54
     String
-SampleMaterial.lc 2166:15-2166:25
+2166:15-2166:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -15080,72 +15080,72 @@ SampleMaterial.lc 2166:15-2166:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2166:15-2167:57
+2166:15-2167:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2166:15-2168:50
+2166:15-2168:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2166:15-2169:42
+2166:15-2169:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2166:15-2170:40
+2166:15-2170:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2166:15-2171:31
+2166:15-2171:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2166:15-2172:42
+2166:15-2172:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2166:15-2173:38
+2166:15-2173:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2166:15-2174:41
+2166:15-2174:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2166:15-2175:40
+2166:15-2175:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 2166:15-2176:46
+2166:15-2176:46
     String -> StageAttrs
-SampleMaterial.lc 2166:15-2178:18
+2166:15-2178:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 2167:29-2167:33
+2167:29-2167:33
     forall a . a -> Maybe a
-SampleMaterial.lc 2167:29-2167:57
+2167:29-2167:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 2167:34-2167:57
+2167:34-2167:57
     (Blending', Blending')
-SampleMaterial.lc 2167:36-2167:46
+2167:36-2167:46
     Blending'
-SampleMaterial.lc 2167:49-2167:55
+2167:49-2167:55
     Blending' | ((Blending'))
-SampleMaterial.lc 2168:30-2168:50
+2168:30-2168:50
     RGBGen
-SampleMaterial.lc 2169:32-2169:42
+2169:32-2169:42
     AlphaGen
-SampleMaterial.lc 2170:29-2170:40
+2170:29-2170:40
     TCGen
-SampleMaterial.lc 2171:29-2171:31
+2171:29-2171:31
     forall a . [a]
-SampleMaterial.lc 2172:31-2172:42
+2172:31-2172:42
     StageTexture
-SampleMaterial.lc 2173:34-2173:38
+2173:34-2173:38
     Bool
-SampleMaterial.lc 2174:33-2174:41
+2174:33-2174:41
     DepthFunction
-SampleMaterial.lc 2175:33-2175:40
+2175:33-2175:40
     forall a . Maybe a
-SampleMaterial.lc 2176:41-2176:46
+2176:41-2176:46
     Bool
-SampleMaterial.lc 2177:38-2177:54
+2177:38-2177:54
     String
-SampleMaterial.lc 2180:21-2180:26
+2180:21-2180:26
     Bool
\ No newline at end of file
diff --git a/testdata/accumulate01.reject.out b/testdata/accumulate01.reject.out
index 73137227..d405efed 100644
--- a/testdata/accumulate01.reject.out
+++ b/testdata/accumulate01.reject.out
@@ -1,3 +1,3 @@
-testdata/accumulate01.reject.lc:3:3:
+./testdata/accumulate01.reject.lc:3:3:
 expecting expression
-wrong indentation
+wrong indentation
\ No newline at end of file
diff --git a/testdata/adhoc.reject.out b/testdata/adhoc.reject.out
index 252d31df..10abb5da 100644
--- a/testdata/adhoc.reject.out
+++ b/testdata/adhoc.reject.out
@@ -1,5 +1,5 @@
 type error: no instance of 'Component on ???
-in adhoc.reject.lc:4:5:
+in ./testdata/adhoc.reject.lc:4:5:
 x = one :: Vec 4 A
     ^^^
 ------------ trace
@@ -8,25 +8,25 @@ A :: A
 case'A :: forall (a :: A -> Type) -> a 'A -> forall (b :: A) -> a b
 match'A :: forall (a :: Type -> Type) -> a A -> forall b -> a b -> a b
 !type error: no instance of 'Component on ???
-in adhoc.reject.lc:4:5:
+in ./testdata/adhoc.reject.lc:4:5:
 x = one :: Vec 4 A
     ^^^
 ------------ tooltips
-adhoc.reject.lc 2:6-2:7
+2:6-2:7
     Type | Type | Type | Type | Type
-adhoc.reject.lc 2:6-2:11
+2:6-2:11
     Type
-adhoc.reject.lc 2:10-2:11
+2:10-2:11
     A
-adhoc.reject.lc 4:5-4:8
+4:5-4:8
     forall a . Component a => a
-adhoc.reject.lc 4:12-4:15
+4:12-4:15
     Nat -> Type -> Type
-adhoc.reject.lc 4:12-4:17
+4:12-4:17
     Type -> Type
-adhoc.reject.lc 4:12-4:19
+4:12-4:19
     Type
-adhoc.reject.lc 4:16-4:17
+4:16-4:17
     _b
-adhoc.reject.lc 4:18-4:19
+4:18-4:19
     Type
\ No newline at end of file
diff --git a/testdata/ambig.out b/testdata/ambig.out
index 82be9b6f..d7e4ee3e 100644
--- a/testdata/ambig.out
+++ b/testdata/ambig.out
@@ -26,19 +26,19 @@ h
       (\g h -> hlistConsCase d [] c (\i j -> hlistNilCase c (e g i) j) h)
       f)
 ------------ tooltips
-ambig.lc 4:1-4:2
+4:1-4:2
     forall a b c d . (b -> d -> c) -> (b, d) -> a -> c
-ambig.lc 4:11-4:12
+4:11-4:12
     _c
-ambig.lc 7:9-7:29
+7:9-7:29
     _b
-ambig.lc 7:21-7:22
+7:21-7:22
     _s
-ambig.lc 7:21-7:26
+7:21-7:26
     _c | _d
-ambig.lc 7:23-7:24
+7:23-7:24
     _n
-ambig.lc 7:25-7:26
+7:25-7:26
     _j
-ambig.lc 7:28-7:29
+7:28-7:29
     _g
\ No newline at end of file
diff --git a/testdata/complex.out b/testdata/complex.out
index e352f507..c6f9d2e8 100644
--- a/testdata/complex.out
+++ b/testdata/complex.out
@@ -293,732 +293,732 @@ toPolar
     Normal
     a
 ------------ tooltips
-complex.lc 3:6-3:10
+3:6-3:10
     Type | Type | Type | Type | Type | Type
-complex.lc 3:6-3:27
+3:6-3:27
     Type | Type
-complex.lc 3:13-3:19
+3:13-3:19
     Repr
-complex.lc 3:22-3:27
+3:22-3:27
     Repr
-complex.lc 5:6-5:13
+5:6-5:13
     Repr -> Type | Repr -> Type | Type | Repr -> Type | Type | Type
-complex.lc 5:6-6:52
+5:6-6:52
     Type
-complex.lc 5:17-5:21
+5:17-5:21
     Type
-complex.lc 5:25-5:29
+5:25-5:29
     Type | Type
-complex.lc 6:3-6:10
+6:3-6:10
     forall (a :: Repr) . Float -> Float -> Complex a | Complex _c
-complex.lc 6:3-6:52
+6:3-6:52
     Type | Type | Type | Type
-complex.lc 6:25-6:30
+6:25-6:30
     Type
-complex.lc 6:25-6:52
+6:25-6:52
     Type
-complex.lc 6:34-6:39
+6:34-6:39
     Type
-complex.lc 6:34-6:52
+6:34-6:52
     Type
-complex.lc 6:43-6:50
+6:43-6:50
     Repr -> Type
-complex.lc 6:43-6:52
+6:43-6:52
     Type | Type
-complex.lc 6:51-6:52
+6:51-6:52
     _d | Repr
-complex.lc 8:20-8:27
+8:20-8:27
     Repr -> Type
-complex.lc 8:20-8:29
+8:20-8:29
     Type
-complex.lc 8:20-8:37
+8:20-8:37
     Type
-complex.lc 8:28-8:29
+8:28-8:29
     _b
-complex.lc 8:33-8:37
+8:33-8:37
     Type | Type
-complex.lc 9:1-9:5
+9:1-9:5
     forall (a :: Repr) . Complex a -> Repr
-complex.lc 9:13-9:14
+9:13-9:14
     Repr
-complex.lc 11:11-11:16
+11:11-11:16
     Type
-complex.lc 11:20-11:25
+11:20-11:25
     Type
-complex.lc 11:20-11:43
+11:20-11:43
     Type
-complex.lc 11:29-11:36
+11:29-11:36
     Repr -> Type
-complex.lc 11:29-11:43
+11:29-11:43
     Type | Type
-complex.lc 11:37-11:43
+11:37-11:43
     Repr
-complex.lc 12:1-12:7
+12:1-12:7
     Float -> Float -> Complex 'Normal
-complex.lc 12:14-12:21
+12:14-12:21
     forall (a :: Repr) . Float -> Float -> Complex a
-complex.lc 12:14-12:23
+12:14-12:23
     Float -> Complex _a
-complex.lc 12:14-12:25
+12:14-12:25
     Complex 'Normal
-complex.lc 12:22-12:23
+12:22-12:23
     Float
-complex.lc 12:24-12:25
+12:24-12:25
     Float
-complex.lc 14:10-14:15
+14:10-14:15
     Type
-complex.lc 14:19-14:24
+14:19-14:24
     Type
-complex.lc 14:19-14:41
+14:19-14:41
     Type
-complex.lc 14:28-14:35
+14:28-14:35
     Repr -> Type
-complex.lc 14:28-14:41
+14:28-14:41
     Type | Type
-complex.lc 14:36-14:41
+14:36-14:41
     Repr
-complex.lc 15:1-15:6
+15:1-15:6
     Float -> Float -> Complex 'Polar
-complex.lc 15:13-15:20
+15:13-15:20
     forall (a :: Repr) . Float -> Float -> Complex a
-complex.lc 15:13-15:22
+15:13-15:22
     Float -> Complex _a
-complex.lc 15:13-15:24
+15:13-15:24
     Complex 'Polar
-complex.lc 15:21-15:22
+15:21-15:22
     Float
-complex.lc 15:23-15:24
+15:23-15:24
     Float
-complex.lc 18:20-18:27
+18:20-18:27
     Repr -> Type
-complex.lc 18:20-18:29
+18:20-18:29
     Type
-complex.lc 18:20-18:38
+18:20-18:38
     Type
-complex.lc 18:28-18:29
+18:28-18:29
     _b
-complex.lc 18:33-18:38
+18:33-18:38
     Type | Type
-complex.lc 19:1-19:5
+19:1-19:5
     forall (a :: Repr) . Complex a -> Float
-complex.lc 19:34-19:38
+19:34-19:38
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-complex.lc 19:34-19:50
+19:34-19:50
     VecScalar 1 Float | Float
-complex.lc 19:34-20:35
+19:34-20:35
     Repr -> Float | Float
-complex.lc 19:40-19:41
+19:40-19:41
     Float
-complex.lc 19:40-19:42
+19:40-19:42
     Float -> Float
-complex.lc 19:40-19:43
+19:40-19:43
     Float
-complex.lc 19:40-19:45
+19:40-19:45
     Float -> Float
-complex.lc 19:40-19:49
+19:40-19:49
     Float
-complex.lc 19:41-19:42
+19:41-19:42
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-complex.lc 19:42-19:43
+19:42-19:43
     Float
-complex.lc 19:44-19:45
+19:44-19:45
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-complex.lc 19:46-19:47
+19:46-19:47
     Float
-complex.lc 19:46-19:48
+19:46-19:48
     Float -> Float
-complex.lc 19:46-19:49
+19:46-19:49
     Float
-complex.lc 19:47-19:48
+19:47-19:48
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-complex.lc 19:48-19:49
+19:48-19:49
     Float
-complex.lc 20:34-20:35
+20:34-20:35
     Float | Float
-complex.lc 22:12-22:19
+22:12-22:19
     Repr -> Type
-complex.lc 22:12-22:26
+22:12-22:26
     Type
-complex.lc 22:20-22:26
+22:20-22:26
     Repr
-complex.lc 22:30-22:37
+22:30-22:37
     Repr -> Type
-complex.lc 22:30-22:43
+22:30-22:43
     Type | Type
-complex.lc 22:38-22:43
+22:38-22:43
     Repr
-complex.lc 23:1-23:8
+23:1-23:8
     Complex 'Normal -> Complex 'Polar
-complex.lc 24:8-29:17
+24:8-29:17
     Complex 'Polar
-complex.lc 24:8-31:25
+24:8-31:25
     Complex 'Polar
-complex.lc 24:11-24:12
+24:11-24:12
     Float
-complex.lc 24:11-24:14
+24:11-24:14
     VecScalar 1 Float -> VecScalar 1 Bool
-complex.lc 24:11-24:19
+24:11-24:19
     VecScalar 1 Bool
-complex.lc 24:11-24:59
+24:11-24:59
     Complex 'Polar -> Complex 'Polar
-complex.lc 24:13-24:14
+24:13-24:14
     forall (a :: Nat) b
       . Num b => VecScalar a b -> VecScalar a b -> VecScalar a Bool
-complex.lc 24:16-24:19
+24:16-24:19
     Float
-complex.lc 24:37-24:42
+24:37-24:42
     Float -> Float -> Complex 'Polar
-complex.lc 24:37-24:44
+24:37-24:44
     Float -> Complex 'Polar
-complex.lc 24:37-24:59
+24:37-24:59
     Complex 'Polar
-complex.lc 24:43-24:44
+24:43-24:44
     VecScalar 1 Float
-complex.lc 24:46-24:50
+24:46-24:50
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-complex.lc 24:46-24:58
+24:46-24:58
     VecScalar 1 Float
-complex.lc 24:52-24:53
+24:52-24:53
     Float
-complex.lc 24:52-24:55
+24:52-24:55
     VecScalar 1 Float -> VecScalar 1 Float
-complex.lc 24:52-24:57
+24:52-24:57
     VecScalar 1 Float
-complex.lc 24:54-24:55
+24:54-24:55
     forall a (b :: Nat) . Num a => VecScalar b a -> VecScalar b a -> VecScalar b a
-complex.lc 24:56-24:57
+24:56-24:57
     Float
-complex.lc 25:8-29:17
+25:8-29:17
     Complex 'Polar
-complex.lc 25:11-25:12
+25:11-25:12
     Float
-complex.lc 25:11-25:14
+25:11-25:14
     VecScalar 1 Float -> VecScalar 1 Bool
-complex.lc 25:11-25:19
+25:11-25:19
     VecScalar 1 Bool
-complex.lc 25:11-25:22
+25:11-25:22
     Bool -> Bool
-complex.lc 25:11-25:31
+25:11-25:31
     Bool
-complex.lc 25:11-25:64
+25:11-25:64
     Complex 'Polar -> Complex 'Polar
-complex.lc 25:13-25:14
+25:13-25:14
     forall (a :: Nat) b
       . Num b => VecScalar a b -> VecScalar a b -> VecScalar a Bool
-complex.lc 25:16-25:19
+25:16-25:19
     Float
-complex.lc 25:20-25:22
+25:20-25:22
     Bool -> Bool -> Bool
-complex.lc 25:23-25:24
+25:23-25:24
     Float
-complex.lc 25:23-25:27
+25:23-25:27
     VecScalar 1 Float -> VecScalar 1 Bool
-complex.lc 25:23-25:31
+25:23-25:31
     VecScalar 1 Bool
-complex.lc 25:25-25:27
+25:25-25:27
     forall (a :: Nat) b
       . Num b => VecScalar a b -> VecScalar a b -> VecScalar a Bool
-complex.lc 25:28-25:31
+25:28-25:31
     Float
-complex.lc 25:37-25:42
+25:37-25:42
     Float -> Float -> Complex 'Polar
-complex.lc 25:37-25:44
+25:37-25:44
     Float -> Complex 'Polar
-complex.lc 25:37-25:64
+25:37-25:64
     Complex 'Polar
-complex.lc 25:43-25:44
+25:43-25:44
     VecScalar 1 Float
-complex.lc 25:46-25:50
+25:46-25:50
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-complex.lc 25:46-25:58
+25:46-25:58
     VecScalar 1 Float
-complex.lc 25:46-25:60
+25:46-25:60
     Float -> Float
-complex.lc 25:46-25:63
+25:46-25:63
     Float
-complex.lc 25:52-25:53
+25:52-25:53
     Float
-complex.lc 25:52-25:55
+25:52-25:55
     VecScalar 1 Float -> VecScalar 1 Float
-complex.lc 25:52-25:57
+25:52-25:57
     VecScalar 1 Float
-complex.lc 25:54-25:55
+25:54-25:55
     forall a (b :: Nat) . Num a => VecScalar b a -> VecScalar b a -> VecScalar b a
-complex.lc 25:56-25:57
+25:56-25:57
     Float
-complex.lc 25:59-25:60
+25:59-25:60
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-complex.lc 25:61-25:63
+25:61-25:63
     Float
-complex.lc 26:8-29:17
+26:8-29:17
     Complex 'Polar
-complex.lc 26:11-26:12
+26:11-26:12
     Float
-complex.lc 26:11-26:14
+26:11-26:14
     VecScalar 1 Float -> VecScalar 1 Bool
-complex.lc 26:11-26:19
+26:11-26:19
     VecScalar 1 Bool
-complex.lc 26:11-26:22
+26:11-26:22
     Bool -> Bool
-complex.lc 26:11-26:31
+26:11-26:31
     Bool
-complex.lc 26:11-26:64
+26:11-26:64
     Complex 'Polar -> Complex 'Polar
-complex.lc 26:13-26:14
+26:13-26:14
     forall (a :: Nat) b
       . Num b => VecScalar a b -> VecScalar a b -> VecScalar a Bool
-complex.lc 26:16-26:19
+26:16-26:19
     Float
-complex.lc 26:20-26:22
+26:20-26:22
     Bool -> Bool -> Bool
-complex.lc 26:23-26:24
+26:23-26:24
     Float
-complex.lc 26:23-26:26
+26:23-26:26
     VecScalar 1 Float -> VecScalar 1 Bool
-complex.lc 26:23-26:31
+26:23-26:31
     VecScalar 1 Bool
-complex.lc 26:25-26:26
+26:25-26:26
     forall (a :: Nat) b
       . Num b => VecScalar a b -> VecScalar a b -> VecScalar a Bool
-complex.lc 26:28-26:31
+26:28-26:31
     Float
-complex.lc 26:37-26:42
+26:37-26:42
     Float -> Float -> Complex 'Polar
-complex.lc 26:37-26:44
+26:37-26:44
     Float -> Complex 'Polar
-complex.lc 26:37-26:64
+26:37-26:64
     Complex 'Polar
-complex.lc 26:43-26:44
+26:43-26:44
     VecScalar 1 Float
-complex.lc 26:46-26:50
+26:46-26:50
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-complex.lc 26:46-26:58
+26:46-26:58
     VecScalar 1 Float
-complex.lc 26:46-26:60
+26:46-26:60
     Float -> Float
-complex.lc 26:46-26:63
+26:46-26:63
     Float
-complex.lc 26:52-26:53
+26:52-26:53
     Float
-complex.lc 26:52-26:55
+26:52-26:55
     VecScalar 1 Float -> VecScalar 1 Float
-complex.lc 26:52-26:57
+26:52-26:57
     VecScalar 1 Float
-complex.lc 26:54-26:55
+26:54-26:55
     forall a (b :: Nat) . Num a => VecScalar b a -> VecScalar b a -> VecScalar b a
-complex.lc 26:56-26:57
+26:56-26:57
     Float
-complex.lc 26:59-26:60
+26:59-26:60
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-complex.lc 26:61-26:63
+26:61-26:63
     Float
-complex.lc 27:8-29:17
+27:8-29:17
     Complex 'Polar
-complex.lc 27:11-27:12
+27:11-27:12
     Float
-complex.lc 27:11-27:15
+27:11-27:15
     Float -> Bool
-complex.lc 27:11-27:19
+27:11-27:19
     Bool
-complex.lc 27:11-27:22
+27:11-27:22
     Bool -> Bool
-complex.lc 27:11-27:31
+27:11-27:31
     Bool
-complex.lc 27:11-27:56
+27:11-27:56
     Complex 'Polar -> Complex 'Polar
-complex.lc 27:13-27:15
+27:13-27:15
     forall a . Eq a => a -> a -> Bool
-complex.lc 27:16-27:19
+27:16-27:19
     Float
-complex.lc 27:20-27:22
+27:20-27:22
     Bool -> Bool -> Bool
-complex.lc 27:23-27:24
+27:23-27:24
     Float
-complex.lc 27:23-27:27
+27:23-27:27
     VecScalar 1 Float -> VecScalar 1 Bool
-complex.lc 27:23-27:31
+27:23-27:31
     VecScalar 1 Bool
-complex.lc 27:25-27:27
+27:25-27:27
     forall (a :: Nat) b
       . Num b => VecScalar a b -> VecScalar a b -> VecScalar a Bool
-complex.lc 27:28-27:31
+27:28-27:31
     Float
-complex.lc 27:37-27:42
+27:37-27:42
     Float -> Float -> Complex 'Polar
-complex.lc 27:37-27:44
+27:37-27:44
     Float -> Complex 'Polar
-complex.lc 27:37-27:56
+27:37-27:56
     Complex 'Polar
-complex.lc 27:43-27:44
+27:43-27:44
     VecScalar 1 Float
-complex.lc 27:47-27:49
+27:47-27:49
     Float
-complex.lc 27:47-27:51
+27:47-27:51
     VecScalar 1 Float -> VecScalar 1 Float
-complex.lc 27:47-27:55
+27:47-27:55
     VecScalar 1 Float
-complex.lc 27:50-27:51
+27:50-27:51
     forall a (b :: Nat) . Num a => VecScalar b a -> VecScalar b a -> VecScalar b a
-complex.lc 27:52-27:55
+27:52-27:55
     Float
-complex.lc 28:8-29:17
+28:8-29:17
     Complex 'Polar
-complex.lc 28:11-28:12
+28:11-28:12
     Float
-complex.lc 28:11-28:15
+28:11-28:15
     Float -> Bool
-complex.lc 28:11-28:19
+28:11-28:19
     Bool
-complex.lc 28:11-28:22
+28:11-28:22
     Bool -> Bool
-complex.lc 28:11-28:31
+28:11-28:31
     Bool
-complex.lc 28:11-28:56
+28:11-28:56
     Complex 'Polar -> Complex 'Polar
-complex.lc 28:13-28:15
+28:13-28:15
     forall a . Eq a => a -> a -> Bool
-complex.lc 28:16-28:19
+28:16-28:19
     Float
-complex.lc 28:20-28:22
+28:20-28:22
     Bool -> Bool -> Bool
-complex.lc 28:23-28:24
+28:23-28:24
     Float
-complex.lc 28:23-28:26
+28:23-28:26
     VecScalar 1 Float -> VecScalar 1 Bool
-complex.lc 28:23-28:31
+28:23-28:31
     VecScalar 1 Bool
-complex.lc 28:25-28:26
+28:25-28:26
     forall (a :: Nat) b
       . Num b => VecScalar a b -> VecScalar a b -> VecScalar a Bool
-complex.lc 28:28-28:31
+28:28-28:31
     Float
-complex.lc 28:37-28:42
+28:37-28:42
     Float -> Float -> Complex 'Polar
-complex.lc 28:37-28:44
+28:37-28:44
     Float -> Complex 'Polar
-complex.lc 28:37-28:56
+28:37-28:56
     Complex 'Polar
-complex.lc 28:43-28:44
+28:43-28:44
     VecScalar 1 Float
-complex.lc 28:46-28:47
+28:46-28:47
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-complex.lc 28:46-28:55
+28:46-28:55
     Float
-complex.lc 28:47-28:49
+28:47-28:49
     Float
-complex.lc 28:47-28:51
+28:47-28:51
     VecScalar 1 Float -> VecScalar 1 Float
-complex.lc 28:47-28:55
+28:47-28:55
     VecScalar 1 Float
-complex.lc 28:50-28:51
+28:50-28:51
     forall a (b :: Nat) . Num a => VecScalar b a -> VecScalar b a -> VecScalar b a
-complex.lc 28:52-28:55
+28:52-28:55
     Float
-complex.lc 29:8-29:17
+29:8-29:17
     forall a . a
-complex.lc 31:9-31:13
+31:9-31:13
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-complex.lc 31:9-31:25
+31:9-31:25
     VecScalar 1 Float
-complex.lc 31:15-31:16
+31:15-31:16
     Float
-complex.lc 31:15-31:17
+31:15-31:17
     Float -> Float
-complex.lc 31:15-31:18
+31:15-31:18
     Float
-complex.lc 31:15-31:20
+31:15-31:20
     Float -> Float
-complex.lc 31:15-31:24
+31:15-31:24
     Float
-complex.lc 31:16-31:17
+31:16-31:17
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-complex.lc 31:17-31:18
+31:17-31:18
     Float
-complex.lc 31:19-31:20
+31:19-31:20
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-complex.lc 31:21-31:22
+31:21-31:22
     Float
-complex.lc 31:21-31:23
+31:21-31:23
     Float -> Float
-complex.lc 31:21-31:24
+31:21-31:24
     Float
-complex.lc 31:22-31:23
+31:22-31:23
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-complex.lc 31:23-31:24
+31:23-31:24
     Float
-complex.lc 64:13-64:20
+64:13-64:20
     Repr -> Type
-complex.lc 64:13-64:26
+64:13-64:26
     Type
-complex.lc 64:21-64:26
+64:21-64:26
     Repr
-complex.lc 64:30-64:37
+64:30-64:37
     Repr -> Type
-complex.lc 64:30-64:44
+64:30-64:44
     Type | Type
-complex.lc 64:38-64:44
+64:38-64:44
     Repr
-complex.lc 65:1-65:9
+65:1-65:9
     Complex 'Polar -> Complex 'Normal
-complex.lc 65:28-65:35
+65:28-65:35
     forall (a :: Repr) . Float -> Float -> Complex a
-complex.lc 65:28-65:49
+65:28-65:49
     Float -> Complex _a
-complex.lc 65:28-65:63
+65:28-65:63
     Complex _a | Complex _a
-complex.lc 65:37-65:38
+65:37-65:38
     Float
-complex.lc 65:37-65:40
+65:37-65:40
     Float -> Float
-complex.lc 65:37-65:48
+65:37-65:48
     Float
-complex.lc 65:39-65:40
+65:39-65:40
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-complex.lc 65:41-65:44
+65:41-65:44
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-complex.lc 65:41-65:48
+65:41-65:48
     VecScalar 1 Float
-complex.lc 65:45-65:48
+65:45-65:48
     Float
-complex.lc 65:51-65:52
+65:51-65:52
     Float
-complex.lc 65:51-65:54
+65:51-65:54
     Float -> Float
-complex.lc 65:51-65:62
+65:51-65:62
     Float
-complex.lc 65:53-65:54
+65:53-65:54
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-complex.lc 65:55-65:58
+65:55-65:58
     forall a (b :: Nat) . (a ~ VecScalar b Float) => a -> a
-complex.lc 65:55-65:62
+65:55-65:62
     VecScalar 1 Float
-complex.lc 65:59-65:62
+65:59-65:62
     Float
-complex.lc 111:1-111:15
+111:1-111:15
     forall (a :: Repr) . Complex a -> Float
-complex.lc 111:38-111:39
+111:38-111:39
     Float
-complex.lc 113:20-113:70
+113:20-113:70
     Type
-complex.lc 113:32-113:39
+113:32-113:39
     Repr -> Type
-complex.lc 113:32-113:42
+113:32-113:42
     Type
-complex.lc 113:32-113:70
+113:32-113:70
     Type
-complex.lc 113:40-113:42
+113:40-113:42
     _d
-complex.lc 113:46-113:53
+113:46-113:53
     Repr -> Type
-complex.lc 113:46-113:56
+113:46-113:56
     Type
-complex.lc 113:46-113:70
+113:46-113:70
     Type
-complex.lc 113:54-113:56
+113:54-113:56
     _c
-complex.lc 113:60-113:67
+113:60-113:67
     Repr -> Type
-complex.lc 113:60-113:70
+113:60-113:70
     Type | Type
-complex.lc 113:68-113:70
+113:68-113:70
     Repr
-complex.lc 114:1-114:4
+114:1-114:4
     forall (a :: Repr) (b :: Repr) . Complex a -> Complex b -> Complex a
-complex.lc 114:53-114:60
+114:53-114:60
     forall (a :: Repr) . Float -> Float -> Complex a
-complex.lc 114:53-114:68
+114:53-114:68
     Float -> Complex _a
-complex.lc 114:53-114:76
+114:53-114:76
     Complex _a | Complex _a | Complex _a | Complex _a | Complex _d
-complex.lc 114:62-114:63
+114:62-114:63
     Float
-complex.lc 114:62-114:65
+114:62-114:65
     Float -> Float
-complex.lc 114:62-114:67
+114:62-114:67
     Float
-complex.lc 114:64-114:65
+114:64-114:65
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-complex.lc 114:66-114:67
+114:66-114:67
     Float
-complex.lc 114:70-114:71
+114:70-114:71
     Float
-complex.lc 114:70-114:73
+114:70-114:73
     Float -> Float
-complex.lc 114:70-114:75
+114:70-114:75
     Float
-complex.lc 114:72-114:73
+114:72-114:73
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-complex.lc 114:74-114:75
+114:74-114:75
     Float
-complex.lc 128:23-128:30
+128:23-128:30
     Repr -> Type
-complex.lc 128:23-128:33
+128:23-128:33
     Type
-complex.lc 128:23-128:61
+128:23-128:61
     Type | Type
-complex.lc 128:31-128:33
+128:31-128:33
     _d
-complex.lc 128:37-128:44
+128:37-128:44
     Repr -> Type
-complex.lc 128:37-128:47
+128:37-128:47
     Type
-complex.lc 128:37-128:61
+128:37-128:61
     Type
-complex.lc 128:45-128:47
+128:45-128:47
     _c
-complex.lc 128:51-128:58
+128:51-128:58
     Repr -> Type
-complex.lc 128:51-128:61
+128:51-128:61
     Type | Type
-complex.lc 128:59-128:61
+128:59-128:61
     Repr
-complex.lc 129:1-129:4
+129:1-129:4
     forall (a :: Repr) (b :: Repr) . Complex a -> Complex b -> Complex a
-complex.lc 129:53-129:60
+129:53-129:60
     forall (a :: Repr) . Float -> Float -> Complex a
-complex.lc 129:53-129:72
+129:53-129:72
     Float -> Complex _a
-complex.lc 129:53-129:84
+129:53-129:84
     Complex _a | Complex _a | Complex _a | Complex _a | Complex _d
-complex.lc 129:62-129:63
+129:62-129:63
     Float
-complex.lc 129:62-129:64
+129:62-129:64
     Float -> Float
-complex.lc 129:62-129:65
+129:62-129:65
     Float
-complex.lc 129:62-129:67
+129:62-129:67
     Float -> Float
-complex.lc 129:62-129:71
+129:62-129:71
     Float
-complex.lc 129:63-129:64
+129:63-129:64
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-complex.lc 129:64-129:65
+129:64-129:65
     Float
-complex.lc 129:66-129:67
+129:66-129:67
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-complex.lc 129:68-129:69
+129:68-129:69
     Float
-complex.lc 129:68-129:70
+129:68-129:70
     Float -> Float
-complex.lc 129:68-129:71
+129:68-129:71
     Float
-complex.lc 129:69-129:70
+129:69-129:70
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-complex.lc 129:70-129:71
+129:70-129:71
     Float
-complex.lc 129:74-129:75
+129:74-129:75
     Float
-complex.lc 129:74-129:76
+129:74-129:76
     Float -> Float
-complex.lc 129:74-129:77
+129:74-129:77
     Float
-complex.lc 129:74-129:79
+129:74-129:79
     Float -> Float
-complex.lc 129:74-129:83
+129:74-129:83
     Float
-complex.lc 129:75-129:76
+129:75-129:76
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-complex.lc 129:76-129:77
+129:76-129:77
     Float
-complex.lc 129:78-129:79
+129:78-129:79
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-complex.lc 129:80-129:81
+129:80-129:81
     Float
-complex.lc 129:80-129:82
+129:80-129:82
     Float -> Float
-complex.lc 129:80-129:83
+129:80-129:83
     Float
-complex.lc 129:81-129:82
+129:81-129:82
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-complex.lc 129:82-129:83
+129:82-129:83
     Float
-complex.lc 137:6-137:13
+137:6-137:13
     Repr -> Type
-complex.lc 137:6-137:15
+137:6-137:15
     Type
-complex.lc 137:6-137:28
+137:6-137:28
     Type
-complex.lc 137:14-137:15
+137:14-137:15
     _b
-complex.lc 137:19-137:26
+137:19-137:26
     Repr -> Type
-complex.lc 137:19-137:28
+137:19-137:28
     Type | Type
-complex.lc 137:27-137:28
+137:27-137:28
     Repr
-complex.lc 138:1-138:2
+138:1-138:2
     forall (a :: Repr) . Complex a -> Complex a
-complex.lc 138:7-138:22
+138:7-138:22
     Complex _a -> Complex _c
-complex.lc 138:7-138:24
+138:7-138:24
     Complex _b
-complex.lc 138:8-138:11
+138:8-138:11
     forall (a :: Repr) (b :: Repr) . Complex a -> Complex b -> Complex a
-complex.lc 138:8-138:13
+138:8-138:13
     Complex _a -> Complex _e
-complex.lc 138:8-138:15
+138:8-138:15
     Complex _c
-complex.lc 138:12-138:13
+138:12-138:13
     Complex _f
-complex.lc 138:14-138:15
+138:14-138:15
     Complex _d
-complex.lc 138:17-138:22
+138:17-138:22
     forall (a :: Repr) (b :: Repr) . Complex a -> Complex b -> Complex a
-complex.lc 138:23-138:24
+138:23-138:24
     Complex _c
-complex.lc 141:1-141:3
+141:1-141:3
     forall (a :: Repr) . Complex a -> Complex a
-complex.lc 141:8-141:9
+141:8-141:9
     forall (a :: Repr) . Complex a -> Complex a
-complex.lc 141:8-141:23
+141:8-141:23
     Complex _a
-complex.lc 141:11-141:12
+141:11-141:12
     forall (a :: Repr) . Complex a -> Complex a
-complex.lc 141:11-141:22
+141:11-141:22
     Complex _a
-complex.lc 141:14-141:15
+141:14-141:15
     forall (a :: Repr) . Complex a -> Complex a
-complex.lc 141:14-141:21
+141:14-141:21
     Complex _a
-complex.lc 141:17-141:18
+141:17-141:18
     forall (a :: Repr) . Complex a -> Complex a
-complex.lc 141:17-141:20
+141:17-141:20
     Complex _a
-complex.lc 141:19-141:20
+141:19-141:20
     _f
-complex.lc 143:1-143:5
+143:1-143:5
     forall (a :: Repr) . Complex a -> Complex a
-complex.lc 143:8-143:10
+143:8-143:10
     forall (a :: Repr) . Complex a -> Complex a
-complex.lc 145:1-145:7
+145:1-145:7
     forall (a :: Repr) . Complex a -> VecScalar 1 Bool
-complex.lc 145:12-145:16
+145:12-145:16
     forall (a :: Repr) . Complex a -> Float
-complex.lc 145:12-145:25
+145:12-145:25
     Float
-complex.lc 145:12-145:27
+145:12-145:27
     VecScalar 1 Float -> VecScalar 1 Bool
-complex.lc 145:12-145:31
+145:12-145:31
     VecScalar 1 Bool
-complex.lc 145:18-145:22
+145:18-145:22
     forall (a :: Repr) . Complex a -> Complex a
-complex.lc 145:18-145:24
+145:18-145:24
     Complex _a
-complex.lc 145:23-145:24
+145:23-145:24
     _g
-complex.lc 145:26-145:27
+145:26-145:27
     forall (a :: Nat) b
       . Num b => VecScalar a b -> VecScalar a b -> VecScalar a Bool
-complex.lc 145:28-145:31
+145:28-145:31
     Float
 ------------ warnings
-Uncovered pattern(s) at complex.lc:114:1:
+Uncovered pattern(s) at ./testdata/complex.lc:114:1:
 add @'Normal @'Normal (Complex a b) (Complex c d) = Complex (a + c) (b + d)
 ^^^
 Missing case(s):
     add Normal Polar _ _
     add Polar _ _ _
-Uncovered pattern(s) at complex.lc:129:1:
+Uncovered pattern(s) at ./testdata/complex.lc:129:1:
 mul @'Normal @'Normal (Complex a b) (Complex c d) = Complex (a*c - b*d) (b*c + a*d)
 ^^^
 Missing case(s):
diff --git a/testdata/concatmap01.out b/testdata/concatmap01.out
index d055ce51..09039dd3 100644
--- a/testdata/concatmap01.out
+++ b/testdata/concatmap01.out
@@ -26,38 +26,38 @@ a = _rhs (1.0 : [] ++ foldr (++) [] (map (\a -> [a]) []))
 main :: Bool
 main = _rhs True
 ------------ tooltips
-concatmap01.lc 1:6-1:13
+1:6-1:13
     Type
-concatmap01.lc 1:7-1:12
+1:7-1:12
     Type
-concatmap01.lc 2:1-2:2
+2:1-2:2
     [Float]
-concatmap01.lc 2:5-2:14
+2:5-2:14
     forall a b . (a -> [b]) -> [a] -> [b]
-concatmap01.lc 2:5-2:26
+2:5-2:26
     [_a] -> [_a]
-concatmap01.lc 2:5-2:32
+2:5-2:32
     [Float]
-concatmap01.lc 2:22-2:25
+2:22-2:25
     [_b]
-concatmap01.lc 2:23-2:24
+2:23-2:24
     _d
-concatmap01.lc 2:27-2:32
+2:27-2:32
     [Float]
-concatmap01.lc 2:28-2:31
+2:28-2:31
     Float
-concatmap01.lc 4:9-4:13
+4:9-4:13
     Type
-concatmap01.lc 5:1-5:5
+5:1-5:5
     Bool
-concatmap01.lc 5:8-6:23
+5:8-6:23
     Bool
-concatmap01.lc 5:13-5:14
+5:13-5:14
     [Float]
-concatmap01.lc 6:19-6:23
+6:19-6:23
     Bool | Bool | Bool
 ------------ warnings
-Uncovered pattern(s) at concatmap01.lc:5:13:
+Uncovered pattern(s) at ./testdata/concatmap01.lc:5:13:
 main = case a of
             ^
 Missing case(s):
diff --git a/testdata/data.out b/testdata/data.out
index 8399c1f4..cf3a735e 100644
--- a/testdata/data.out
+++ b/testdata/data.out
@@ -202,154 +202,154 @@ y
     (_rhs (undefined 'Int))
     a
 ------------ tooltips
-data.lc 1:6-1:11
+1:6-1:11
     Type | Type | Type | Type | Type
-data.lc 1:6-1:19
+1:6-1:19
     Type
-data.lc 1:14-1:19
+1:14-1:19
     Data0
-data.lc 3:6-3:11
+3:6-3:11
     Type -> Type -> Type -> Type | Type -> Type -> Type -> Type | Type
       -> Type -> Type -> Type | Type -> Type -> Type -> Type | Type
-data.lc 3:6-3:13
+3:6-3:13
     Type -> Type -> Type
-data.lc 3:6-3:15
+3:6-3:15
     Type -> Type
-data.lc 3:6-3:17
+3:6-3:17
     Type | Type
-data.lc 3:6-3:25
+3:6-3:25
     Type | Type | Type | Type
-data.lc 3:6-3:31
+3:6-3:31
     Type | Type | Type | Type | Type
-data.lc 3:12-3:13
+3:12-3:13
     Type
-data.lc 3:14-3:15
+3:14-3:15
     Type
-data.lc 3:16-3:17
+3:16-3:17
     Type
-data.lc 3:20-3:25
+3:20-3:25
     forall a b c . a -> b -> c -> Data1 a b c | Data1
       _g
       _f
       _e | Type | Type | Type | Type
-data.lc 3:26-3:27
+3:26-3:27
     Type
-data.lc 3:28-3:29
+3:28-3:29
     Type
-data.lc 3:30-3:31
+3:30-3:31
     Type
-data.lc 5:6-5:11
+5:6-5:11
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-data.lc 5:6-6:39
+5:6-6:39
     Type
-data.lc 5:6-8:20
+5:6-8:20
     Type | Type | Type | Type
-data.lc 5:14-5:20
+5:14-5:20
     Int -> Data2 | Data2 | Type | Type
-data.lc 5:21-5:24
+5:21-5:24
     Type
-data.lc 6:14-6:20
+6:14-6:20
     Int -> Int -> Data2 | Data2 | Type | Type | Type
-data.lc 6:23-6:24
+6:23-6:24
     Data2 -> Int
-data.lc 6:28-6:31
+6:28-6:31
     Type
-data.lc 6:33-6:34
+6:33-6:34
     Data2 -> Int
-data.lc 6:36-6:39
+6:36-6:39
     Type
-data.lc 7:14-7:20
+7:14-7:20
     Int -> Data2 | Data2 | Type | Type
-data.lc 7:28-7:31
+7:28-7:31
     Type
-data.lc 8:14-8:20
+8:14-8:20
     Data2
-data.lc 10:6-10:11
+10:6-10:11
     Type -> Type -> Type -> Type | Type -> Type -> Type -> Type | Type
       -> Type -> Type -> Type | Type -> Type -> Type -> Type | Type
       -> Type -> Type -> Type | Type -> Type -> Type -> Type | Type
-data.lc 10:6-10:14
+10:6-10:14
     Type -> Type -> Type | Type -> Type -> Type | Type -> Type -> Type
-data.lc 10:6-10:17
+10:6-10:17
     Type -> Type | Type -> Type | Type -> Type
-data.lc 10:6-10:20
+10:6-10:20
     Type | Type | Type | Type | Type | Type
-data.lc 10:6-10:38
+10:6-10:38
     Type | Type | Type
-data.lc 10:6-11:54
+10:6-11:54
     Type | Type | Type | Type | Type
-data.lc 10:6-12:29
+10:6-12:29
     Type | Type | Type | Type | Type | Type
-data.lc 10:6-12:48
+10:6-12:48
     Type | Type | Type | Type | Type | Type | Type
-data.lc 10:12-10:14
+10:12-10:14
     Type | Type | Type
-data.lc 10:15-10:17
+10:15-10:17
     Type | Type | Type
-data.lc 10:18-10:20
+10:18-10:20
     Type | Type | Type
-data.lc 10:23-10:29
+10:23-10:29
     forall a b c . a -> Data5 a b c | Data5 _e _d _c | Type | Type
-data.lc 10:32-10:34
+10:32-10:34
     forall a b c . Data5 a b c -> a
-data.lc 10:36-10:38
+10:36-10:38
     Type
-data.lc 11:23-11:29
+11:23-11:29
     forall a b c . a -> b -> c -> Data5 a b c | Data5
       _h
       _g
       _f | Type | Type | Type | Type
-data.lc 11:36-11:38
+11:36-11:38
     Type
-data.lc 11:40-11:42
+11:40-11:42
     forall a b c . Data5 a b c -> b
-data.lc 11:44-11:46
+11:44-11:46
     Type
-data.lc 11:48-11:50
+11:48-11:50
     forall a b c . Data5 a b c -> c
-data.lc 11:52-11:54
+11:52-11:54
     Type
-data.lc 12:23-12:29
+12:23-12:29
     forall a b c . Int -> a -> Float -> b -> c -> Data5 a b c | Data5
       _k
       _j
       _i | Type | Type | Type | Type | Type | Type
-data.lc 12:30-12:33
+12:30-12:33
     Type
-data.lc 12:34-12:36
+12:34-12:36
     Type
-data.lc 12:37-12:42
+12:37-12:42
     Type
-data.lc 12:43-12:45
+12:43-12:45
     Type
-data.lc 12:46-12:48
+12:46-12:48
     Type
 ------------ warnings
-Uncovered pattern(s) at data.lc:6:23:
+Uncovered pattern(s) at ./testdata/data.lc:6:23:
            | Data22 { x :: Int, y::Int }
                       ^
 Missing case(s):
     x (Data21 _)
     x Data24
-Uncovered pattern(s) at data.lc:6:33:
+Uncovered pattern(s) at ./testdata/data.lc:6:33:
            | Data22 { x :: Int, y::Int }
                                 ^
 Missing case(s):
     y (Data21 _)
     y (Data23 _)
     y Data24
-Uncovered pattern(s) at data.lc:10:32:
+Uncovered pattern(s) at ./testdata/data.lc:10:32:
 data Data5 a5 b5 c5 = Data51 { a5::a5}
                                ^^
 Missing case(s):
     a5 (Data53 _ _ _ _ _)
-Uncovered pattern(s) at data.lc:11:40:
+Uncovered pattern(s) at ./testdata/data.lc:11:40:
                     | Data52 { a5::a5, b5::b5, c5::c5 }
                                        ^^
 Missing case(s):
     b5 (Data51 _)
     b5 (Data53 _ _ _ _ _)
-Uncovered pattern(s) at data.lc:11:48:
+Uncovered pattern(s) at ./testdata/data.lc:11:48:
                     | Data52 { a5::a5, b5::b5, c5::c5 }
                                                ^^
 Missing case(s):
diff --git a/testdata/data.reject.out b/testdata/data.reject.out
index 6c8bcfc3..058e84e3 100644
--- a/testdata/data.reject.out
+++ b/testdata/data.reject.out
@@ -1,11 +1,11 @@
-can't find: a in data.reject.lc:1:20:
+can't find: a in ./testdata/data.reject.lc:1:20:
 data Data1 = Data1 a b c
                    ^
 ------------ trace
 'Data1 :: Type
-!can't find: a in data.reject.lc:1:20:
+!can't find: a in ./testdata/data.reject.lc:1:20:
 data Data1 = Data1 a b c
                    ^
 ------------ tooltips
-data.reject.lc 1:6-1:11
+1:6-1:11
     Type
\ No newline at end of file
diff --git a/testdata/dotdot01.out b/testdata/dotdot01.out
index f531d1b7..cd91a134 100644
--- a/testdata/dotdot01.out
+++ b/testdata/dotdot01.out
@@ -36,22 +36,22 @@ main
 main :: Bool
 main = _rhs True
 ------------ tooltips
-dotdot01.lc 1:9-1:13
+1:9-1:13
     Type
-dotdot01.lc 2:1-2:5
+2:1-2:5
     Bool
-dotdot01.lc 2:8-3:33
+2:8-3:33
     Bool
-dotdot01.lc 2:13-2:23
+2:13-2:23
     [Float]
-dotdot01.lc 2:14-2:17
+2:14-2:17
     Float
-dotdot01.lc 2:19-2:22
+2:19-2:22
     Float
-dotdot01.lc 3:29-3:33
+3:29-3:33
     Bool | Bool | Bool | Bool | Bool | Bool | Bool
 ------------ warnings
-Uncovered pattern(s) at dotdot01.lc:2:13:
+Uncovered pattern(s) at ./testdata/dotdot01.lc:2:13:
 main = case [1.0..3.0] of
             ^^^^^^^^^^
 Missing case(s):
diff --git a/testdata/dotdot02.out b/testdata/dotdot02.out
index 9f0522f0..c3d13d97 100644
--- a/testdata/dotdot02.out
+++ b/testdata/dotdot02.out
@@ -16,22 +16,22 @@ main
 main :: Bool
 main = _rhs True
 ------------ tooltips
-dotdot02.lc 1:9-1:13
+1:9-1:13
     Type
-dotdot02.lc 2:1-2:5
+2:1-2:5
     Bool
-dotdot02.lc 2:8-3:20
+2:8-3:20
     Bool
-dotdot02.lc 2:13-2:23
+2:13-2:23
     [Float]
-dotdot02.lc 2:14-2:17
+2:14-2:17
     Float
-dotdot02.lc 2:19-2:22
+2:19-2:22
     Float
-dotdot02.lc 3:16-3:20
+3:16-3:20
     Bool
 ------------ warnings
-Uncovered pattern(s) at dotdot02.lc:2:13:
+Uncovered pattern(s) at ./testdata/dotdot02.lc:2:13:
 main = case [3.0..1.0] of
             ^^^^^^^^^^
 Missing case(s):
diff --git a/testdata/empty.out b/testdata/empty.out
index adb27003..df427cab 100644
--- a/testdata/empty.out
+++ b/testdata/empty.out
@@ -12,5 +12,5 @@ case'Empty = \a b -> <<case function of a type with 0 parameters>>
 match'Empty :: forall (a :: Type -> Type) -> a Empty -> forall b -> a b -> a b
 match'Empty = \a b c d -> <<type case function>>
 ------------ tooltips
-empty.lc 3:6-3:11
+3:6-3:11
     Type | Type | Type | Type
\ No newline at end of file
diff --git a/testdata/empty.reject.out b/testdata/empty.reject.out
index a1da6c9d..31491cf6 100644
--- a/testdata/empty.reject.out
+++ b/testdata/empty.reject.out
@@ -1,3 +1,3 @@
-testdata/empty.reject.lc:4:1:
+./testdata/empty.reject.lc:4:1:
 expecting uppercase ident
-wrong indentation
+wrong indentation
\ No newline at end of file
diff --git a/testdata/framebuffer02.reject.out b/testdata/framebuffer02.reject.out
index 76afa505..58ff2a70 100644
--- a/testdata/framebuffer02.reject.out
+++ b/testdata/framebuffer02.reject.out
@@ -2,7 +2,7 @@ type error: can not unify
   0
 with
   1
-in framebuffer02.reject.lc:2:17:
+in ./testdata/framebuffer02.reject.lc:2:17:
     let frame = FrameBuffer (colorImage1 (V4 0.0 0.0 0.4 1.0)
                             ,ColorImage @2 (V4 1.0 1.0 1.0 1.0)
                             ,colorImage1 1.0
@@ -12,17 +12,17 @@ in framebuffer02.reject.lc:2:17:
   0
 with
   1
-in framebuffer02.reject.lc:2:17:
+in ./testdata/framebuffer02.reject.lc:2:17:
     let frame = FrameBuffer (colorImage1 (V4 0.0 0.0 0.4 1.0)
                             ,ColorImage @2 (V4 1.0 1.0 1.0 1.0)
                             ,colorImage1 1.0
                             )
 ------------ tooltips
-framebuffer02.reject.lc 2:17-2:28
+2:17-2:28
     forall (a :: [Type])
       . sameLayerCounts a
         => HList a -> FrameBuffer (ImageLC (head a)) (map GetImageKind a)
-framebuffer02.reject.lc 2:17-5:30
+2:17-5:30
     FrameBuffer
       1
       (map
@@ -30,64 +30,64 @@ framebuffer02.reject.lc 2:17-5:30
         ' [Image 1 ('Color (VecScalar 4 Float))
         , Image 2 ('Color (VecScalar 4 Float))
         , Image 1 ('Color (VecScalar 1 Float))])
-framebuffer02.reject.lc 2:29-5:30
+2:29-5:30
     (Image 1 ('Color (VecScalar 4 Float))
     , Image 2 ('Color (VecScalar 4 Float))
     , Image 1 ('Color (VecScalar 1 Float)))
-framebuffer02.reject.lc 2:30-2:41
+2:30-2:41
     forall (a :: Nat) b c . (Num b, c ~ VecScalar a b) => c -> Image 1 ('Color c)
-framebuffer02.reject.lc 2:30-2:62
+2:30-2:62
     Image 1 ('Color (VecScalar 4 Float))
-framebuffer02.reject.lc 2:43-2:45
+2:43-2:45
     forall a . a -> a -> a -> a -> VecS a 4
-framebuffer02.reject.lc 2:43-2:49
+2:43-2:49
     Float -> Float -> Float -> VecS Float 4
-framebuffer02.reject.lc 2:43-2:53
+2:43-2:53
     Float -> Float -> VecS Float 4
-framebuffer02.reject.lc 2:43-2:57
+2:43-2:57
     Float -> VecS Float 4
-framebuffer02.reject.lc 2:43-2:61
+2:43-2:61
     VecS Float 4
-framebuffer02.reject.lc 2:46-2:49
+2:46-2:49
     Float
-framebuffer02.reject.lc 2:50-2:53
+2:50-2:53
     Float
-framebuffer02.reject.lc 2:54-2:57
+2:54-2:57
     Float
-framebuffer02.reject.lc 2:58-2:61
+2:58-2:61
     Float
-framebuffer02.reject.lc 3:30-3:40
+3:30-3:40
     forall (a :: Nat) (b :: Nat) c d
       . (Num c, d ~ VecScalar b c) => d -> Image a ('Color d)
-framebuffer02.reject.lc 3:30-3:43
+3:30-3:43
     forall (a :: Nat) b c . (Num b, c ~ VecScalar a b) => c -> Image 2 ('Color c)
-framebuffer02.reject.lc 3:30-3:64
+3:30-3:64
     Image 2 ('Color (VecScalar 4 Float))
-framebuffer02.reject.lc 3:30-4:45
+3:30-4:45
     (Image 2 ('Color (VecScalar 4 Float)), Image 1 ('Color (VecScalar 1 Float)))
-framebuffer02.reject.lc 3:42-3:43
+3:42-3:43
     _b
-framebuffer02.reject.lc 3:45-3:47
+3:45-3:47
     forall a . a -> a -> a -> a -> VecS a 4
-framebuffer02.reject.lc 3:45-3:51
+3:45-3:51
     Float -> Float -> Float -> VecS Float 4
-framebuffer02.reject.lc 3:45-3:55
+3:45-3:55
     Float -> Float -> VecS Float 4
-framebuffer02.reject.lc 3:45-3:59
+3:45-3:59
     Float -> VecS Float 4
-framebuffer02.reject.lc 3:45-3:63
+3:45-3:63
     VecS Float 4
-framebuffer02.reject.lc 3:48-3:51
+3:48-3:51
     Float
-framebuffer02.reject.lc 3:52-3:55
+3:52-3:55
     Float
-framebuffer02.reject.lc 3:56-3:59
+3:56-3:59
     Float
-framebuffer02.reject.lc 3:60-3:63
+3:60-3:63
     Float
-framebuffer02.reject.lc 4:30-4:41
+4:30-4:41
     forall (a :: Nat) b c . (Num b, c ~ VecScalar a b) => c -> Image 1 ('Color c)
-framebuffer02.reject.lc 4:30-4:45
+4:30-4:45
     Image 1 ('Color (VecScalar 1 Float)) | ((Image 1 ('Color (VecScalar 1 Float))))
-framebuffer02.reject.lc 4:42-4:45
+4:42-4:45
     Float
\ No newline at end of file
diff --git a/testdata/fromto.out b/testdata/fromto.out
index 0266c83b..a6f636b7 100644
--- a/testdata/fromto.out
+++ b/testdata/fromto.out
@@ -36,26 +36,26 @@ main
 main :: Bool
 main = _rhs True
 ------------ tooltips
-fromto.lc 1:9-1:13
+1:9-1:13
     Type
-fromto.lc 2:1-2:5
+2:1-2:5
     Bool
-fromto.lc 2:8-3:33
+2:8-3:33
     Bool
-fromto.lc 2:14-2:20
+2:14-2:20
     Float -> Float -> [Float]
-fromto.lc 2:14-2:24
+2:14-2:24
     Float -> [Float]
-fromto.lc 2:14-2:28
+2:14-2:28
     [Float]
-fromto.lc 2:21-2:24
+2:21-2:24
     Float
-fromto.lc 2:25-2:28
+2:25-2:28
     Float
-fromto.lc 3:29-3:33
+3:29-3:33
     Bool | Bool | Bool | Bool | Bool | Bool | Bool
 ------------ warnings
-Uncovered pattern(s) at fromto.lc:2:13:
+Uncovered pattern(s) at ./testdata/fromto.lc:2:13:
 main = case (fromTo 1.0 3.0) of
             ^^^^^^^^^^^^^^^^
 Missing case(s):
diff --git a/testdata/id.out b/testdata/id.out
index f25f9043..12848a12 100644
--- a/testdata/id.out
+++ b/testdata/id.out
@@ -5,21 +5,21 @@ main' = _lhs main' (_rhs let a = \(b :: _) -> b in (a 4.0, a True))
 main' :: (Float, Bool)
 main' = _rhs (4.0, True)
 ------------ tooltips
-id.lc 1:1-1:6
+1:1-1:6
     (Float, Bool)
-id.lc 3:19-3:20
+3:19-3:20
     _b
-id.lc 4:8-4:27
+4:8-4:27
     (Float, Bool)
-id.lc 4:9-4:12
+4:9-4:12
     forall a . a -> a
-id.lc 4:9-4:16
+4:9-4:16
     Float
-id.lc 4:13-4:16
+4:13-4:16
     Float
-id.lc 4:18-4:21
+4:18-4:21
     forall a . a -> a
-id.lc 4:18-4:26
+4:18-4:26
     Bool | ((Bool))
-id.lc 4:22-4:26
+4:22-4:26
     Bool
\ No newline at end of file
diff --git a/testdata/ifThenElse01.out b/testdata/ifThenElse01.out
index edbcc6d6..6a5763f5 100644
--- a/testdata/ifThenElse01.out
+++ b/testdata/ifThenElse01.out
@@ -7,21 +7,21 @@ main = _lhs main (_rhs ((\(a :: _) -> primIfThenElse a a a) True))
 main :: Bool
 main = _rhs True
 ------------ tooltips
-ifThenElse01.lc 1:9-1:13
+1:9-1:13
     Type
-ifThenElse01.lc 2:1-2:5
+2:1-2:5
     Bool
-ifThenElse01.lc 2:8-2:39
+2:8-2:39
     Bool
-ifThenElse01.lc 2:15-2:33
+2:15-2:33
     Bool
-ifThenElse01.lc 2:18-2:19
+2:18-2:19
     _c
-ifThenElse01.lc 2:18-2:26
+2:18-2:26
     Bool -> Bool
-ifThenElse01.lc 2:25-2:26
+2:25-2:26
     Bool
-ifThenElse01.lc 2:32-2:33
+2:32-2:33
     Bool
-ifThenElse01.lc 2:35-2:39
+2:35-2:39
     Bool
\ No newline at end of file
diff --git a/testdata/instantiate.out b/testdata/instantiate.out
index 8af193a3..b86ce3fd 100644
--- a/testdata/instantiate.out
+++ b/testdata/instantiate.out
@@ -5,33 +5,33 @@ main' = _lhs main' (_rhs let a = PrimAdd in a (V2 1.0 2.0) (V2 1.0 2.0))
 main' :: VecS Float 2
 main' = _rhs (PrimAdd ('VecS 'Float 2) TT (V2 1.0 2.0) (V2 1.0 2.0))
 ------------ tooltips
-instantiate.lc 1:1-1:6
+1:1-1:6
     VecS Float 2
-instantiate.lc 2:13-2:20
+2:13-2:20
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-instantiate.lc 2:24-2:25
+2:24-2:25
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-instantiate.lc 2:24-2:38
+2:24-2:38
     VecS Float 2 -> VecS Float 2
-instantiate.lc 2:24-2:51
+2:24-2:51
     VecS Float 2
-instantiate.lc 2:27-2:29
+2:27-2:29
     forall a . a -> a -> VecS a 2
-instantiate.lc 2:27-2:33
+2:27-2:33
     Float -> VecS Float 2
-instantiate.lc 2:27-2:37
+2:27-2:37
     VecS Float 2
-instantiate.lc 2:30-2:33
+2:30-2:33
     Float
-instantiate.lc 2:34-2:37
+2:34-2:37
     Float
-instantiate.lc 2:40-2:42
+2:40-2:42
     forall a . a -> a -> VecS a 2
-instantiate.lc 2:40-2:46
+2:40-2:46
     Float -> VecS Float 2
-instantiate.lc 2:40-2:50
+2:40-2:50
     VecS Float 2
-instantiate.lc 2:43-2:46
+2:43-2:46
     Float
-instantiate.lc 2:47-2:50
+2:47-2:50
     Float
\ No newline at end of file
diff --git a/testdata/instantiate2.out b/testdata/instantiate2.out
index 8ab4f778..54829208 100644
--- a/testdata/instantiate2.out
+++ b/testdata/instantiate2.out
@@ -6,45 +6,45 @@ main = _lhs main (_rhs let a = (+) in (a (V2 1.0 2.0) (V2 2.3 3.4), a 1.0 2.0))
 main :: (VecS Float 2, Float)
 main = _rhs (V2 1.0 2.0 + V2 2.3 3.4, 1.0 + 2.0)
 ------------ tooltips
-instantiate2.lc 1:1-1:5
+1:1-1:5
     (VecS Float 2, Float)
-instantiate2.lc 1:16-1:19
+1:16-1:19
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-instantiate2.lc 1:23-1:63
+1:23-1:63
     (VecS Float 2, Float)
-instantiate2.lc 1:24-1:25
+1:24-1:25
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-instantiate2.lc 1:24-1:38
+1:24-1:38
     VecS Float 2 -> VecS Float 2
-instantiate2.lc 1:24-1:51
+1:24-1:51
     VecS Float 2
-instantiate2.lc 1:27-1:29
+1:27-1:29
     forall a . a -> a -> VecS a 2
-instantiate2.lc 1:27-1:33
+1:27-1:33
     Float -> VecS Float 2
-instantiate2.lc 1:27-1:37
+1:27-1:37
     VecS Float 2
-instantiate2.lc 1:30-1:33
+1:30-1:33
     Float
-instantiate2.lc 1:34-1:37
+1:34-1:37
     Float
-instantiate2.lc 1:40-1:42
+1:40-1:42
     forall a . a -> a -> VecS a 2
-instantiate2.lc 1:40-1:46
+1:40-1:46
     Float -> VecS Float 2
-instantiate2.lc 1:40-1:50
+1:40-1:50
     VecS Float 2
-instantiate2.lc 1:43-1:46
+1:43-1:46
     Float
-instantiate2.lc 1:47-1:50
+1:47-1:50
     Float
-instantiate2.lc 1:53-1:54
+1:53-1:54
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-instantiate2.lc 1:53-1:58
+1:53-1:58
     Float -> Float
-instantiate2.lc 1:53-1:62
+1:53-1:62
     Float | ((Float))
-instantiate2.lc 1:55-1:58
+1:55-1:58
     Float
-instantiate2.lc 1:59-1:62
+1:59-1:62
     Float
\ No newline at end of file
diff --git a/testdata/it.out b/testdata/it.out
index e48723ee..cdcf0874 100644
--- a/testdata/it.out
+++ b/testdata/it.out
@@ -40,60 +40,60 @@ from = primFix _ \a -> _rhs \b -> b : a (primAddInt 1 b)
 main :: Bool
 main = _rhs True
 ------------ tooltips
-it.lc 4:1-4:5
+4:1-4:5
     Int -> [Int]
-it.lc 4:14-4:15
+4:14-4:15
     _c
-it.lc 4:14-4:16
+4:14-4:16
     [_b] -> [_b]
-it.lc 4:14-4:38
+4:14-4:38
     [Int]
-it.lc 4:15-4:16
+4:15-4:16
     forall a . a -> [a] -> [a]
-it.lc 4:17-4:21
+4:17-4:21
     _d
-it.lc 4:23-4:33
+4:23-4:33
     Int -> Int -> Int
-it.lc 4:23-4:35
+4:23-4:35
     Int -> Int
-it.lc 4:23-4:37
+4:23-4:37
     Int
-it.lc 4:34-4:35
+4:34-4:35
     _b
-it.lc 4:36-4:37
+4:36-4:37
     _e
-it.lc 6:1-6:5
+6:1-6:5
     Bool
-it.lc 6:8-7:57
+6:8-7:57
     Bool
-it.lc 6:13-6:17
+6:13-6:17
     Int -> [Int]
-it.lc 6:13-6:19
+6:13-6:19
     [Int]
-it.lc 6:18-6:19
+6:18-6:19
     _b
-it.lc 7:20-7:57
+7:20-7:57
     Bool | Bool | Bool | Bool
-it.lc 7:25-7:39
+7:25-7:39
     Int -> Int -> Ordering
-it.lc 7:25-7:41
+7:25-7:41
     Int -> Ordering
-it.lc 7:25-7:43
+7:25-7:43
     Ordering
-it.lc 7:40-7:41
+7:40-7:41
     _c
-it.lc 7:42-7:43
+7:42-7:43
     _b
-it.lc 7:53-7:57
+7:53-7:57
     Bool
 ------------ warnings
-Uncovered pattern(s) at it.lc:7:25:
+Uncovered pattern(s) at ./testdata/it.lc:7:25:
     (_:_:_:i:_) -> case primCompareInt i 3 of EQ -> True
                         ^^^^^^^^^^^^^^^^^^
 Missing case(s):
      LT
      GT
-Uncovered pattern(s) at it.lc:6:13:
+Uncovered pattern(s) at ./testdata/it.lc:6:13:
 main = case from 0 of
             ^^^^^^
 Missing case(s):
diff --git a/testdata/language-features/adt/adt01.out b/testdata/language-features/adt/adt01.out
index 36f684b5..67385347 100644
--- a/testdata/language-features/adt/adt01.out
+++ b/testdata/language-features/adt/adt01.out
@@ -108,80 +108,80 @@ match'Zero = \a b c d -> <<type case function>>
 value1 :: OneBool
 value1 = _rhs (OneBool True)
 ------------ tooltips
-adt01.lc 1:6-1:10
+1:6-1:10
     Type | Type | Type | Type
-adt01.lc 3:6-3:10
+3:6-3:10
     Type -> Type | Type -> Type | Type -> Type | Type -> Type | Type
-adt01.lc 3:6-3:12
+3:6-3:12
     Type | Type
-adt01.lc 3:6-3:19
+3:6-3:19
     Type | Type
-adt01.lc 3:6-3:21
+3:6-3:21
     Type
-adt01.lc 3:11-3:12
+3:11-3:12
     Type
-adt01.lc 3:15-3:19
+3:15-3:19
     forall a . a -> One1 a | One1 _c | Type | Type
-adt01.lc 3:20-3:21
+3:20-3:21
     Type
-adt01.lc 5:6-5:12
+5:6-5:12
     Type | Type | Type | Type | Type | Type
-adt01.lc 5:6-5:19
+5:6-5:19
     Type
-adt01.lc 5:15-5:19
+5:15-5:19
     Int -> OneInt | OneInt | Type | Type
-adt01.lc 5:20-5:23
+5:20-5:23
     Type
-adt01.lc 7:6-7:13
+7:6-7:13
     Type | Type | Type | Type | Type | Type
-adt01.lc 7:6-7:23
+7:6-7:23
     Type
-adt01.lc 7:16-7:23
+7:16-7:23
     Bool -> OneBool | OneBool | Type | Type
-adt01.lc 7:24-7:28
+7:24-7:28
     Type
-adt01.lc 9:6-9:9
+9:6-9:9
     Type -> Type -> Type | Type -> Type -> Type | Type -> Type -> Type | Type
       -> Type -> Type | Type -> Type -> Type | Type
-adt01.lc 9:6-9:11
+9:6-9:11
     Type -> Type | Type -> Type
-adt01.lc 9:6-9:13
+9:6-9:13
     Type | Type | Type | Type
-adt01.lc 9:6-10:11
+9:6-10:11
     Type | Type
-adt01.lc 9:6-11:9
+9:6-11:9
     Type | Type | Type | Type
-adt01.lc 9:6-11:11
+9:6-11:11
     Type | Type
-adt01.lc 9:10-9:11
+9:10-9:11
     Type | Type
-adt01.lc 9:12-9:13
+9:12-9:13
     Type | Type
-adt01.lc 10:5-10:9
+10:5-10:9
     forall a b . a -> Two a b | Two _d _c | Type | Type
-adt01.lc 10:10-10:11
+10:10-10:11
     Type
-adt01.lc 11:5-11:9
+11:5-11:9
     forall a b . b -> Two a b | Two _e _d | Type | Type
-adt01.lc 11:10-11:11
+11:10-11:11
     Type
-adt01.lc 13:1-13:7
+13:1-13:7
     OneBool
-adt01.lc 13:10-13:17
+13:10-13:17
     Bool -> OneBool
-adt01.lc 13:10-13:22
+13:10-13:22
     OneBool
-adt01.lc 13:18-13:22
+13:18-13:22
     Bool
-adt01.lc 15:1-15:2
+15:1-15:2
     OneBool -> Bool
-adt01.lc 15:17-15:18
+15:17-15:18
     Bool
-adt01.lc 17:1-17:5
+17:1-17:5
     Bool
-adt01.lc 17:8-17:9
+17:8-17:9
     OneBool -> Bool
-adt01.lc 17:8-17:16
+17:8-17:16
     Bool
-adt01.lc 17:10-17:16
+17:10-17:16
     OneBool
\ No newline at end of file
diff --git a/testdata/language-features/adt/adt02.out b/testdata/language-features/adt/adt02.out
index 8145446b..404cd771 100644
--- a/testdata/language-features/adt/adt02.out
+++ b/testdata/language-features/adt/adt02.out
@@ -149,141 +149,141 @@ value2 = _rhs (Data2 True "friend" True)
 value3 :: Data3 Bool Bool Bool
 value3 = _rhs (Data3 True True True)
 ------------ tooltips
-adt02.lc 1:6-1:11
+1:6-1:11
     Type | Type | Type | Type | Type | Type
-adt02.lc 1:6-1:19
+1:6-1:19
     Type
-adt02.lc 1:14-1:19
+1:14-1:19
     Bool -> Data1 | Data1 | Type | Type
-adt02.lc 1:22-1:26
+1:22-1:26
     Data1 -> Bool
-adt02.lc 1:30-1:34
+1:30-1:34
     Type
-adt02.lc 3:6-3:11
+3:6-3:11
     Type | Type | Type | Type | Type | Type
-adt02.lc 3:6-3:19
+3:6-3:19
     Type
-adt02.lc 3:6-6:17
+3:6-6:17
     Type | Type
-adt02.lc 3:14-3:19
+3:14-3:19
     Bool -> String -> Bool -> Data2 | Data2 | Type | Type | Type | Type
-adt02.lc 4:5-4:9
+4:5-4:9
     Data2 -> Bool
-adt02.lc 4:13-4:17
+4:13-4:17
     Type
-adt02.lc 5:5-5:9
+5:5-5:9
     Data2 -> String
-adt02.lc 5:13-5:19
+5:13-5:19
     Type
-adt02.lc 6:5-6:9
+6:5-6:9
     Data2 -> Bool
-adt02.lc 6:13-6:17
+6:13-6:17
     Type
-adt02.lc 9:1-9:7
+9:1-9:7
     Data1
-adt02.lc 9:10-9:15
+9:10-9:15
     Bool -> Data1
-adt02.lc 9:10-9:20
+9:10-9:20
     Data1
-adt02.lc 9:16-9:20
+9:16-9:20
     Bool
-adt02.lc 10:1-10:7
+10:1-10:7
     Data2
-adt02.lc 10:10-10:15
+10:10-10:15
     Bool -> String -> Bool -> Data2
-adt02.lc 10:10-10:20
+10:10-10:20
     String -> Bool -> Data2
-adt02.lc 10:10-10:29
+10:10-10:29
     Bool -> Data2
-adt02.lc 10:10-10:34
+10:10-10:34
     Data2
-adt02.lc 10:16-10:20
+10:16-10:20
     Bool
-adt02.lc 10:21-10:29
+10:21-10:29
     String
-adt02.lc 10:30-10:34
+10:30-10:34
     Bool
-adt02.lc 12:6-12:11
+12:6-12:11
     Type -> Type -> Type -> Type | Type -> Type -> Type -> Type | Type
       -> Type -> Type -> Type | Type -> Type -> Type -> Type | Type
-adt02.lc 12:6-12:13
+12:6-12:13
     Type -> Type -> Type
-adt02.lc 12:6-12:15
+12:6-12:15
     Type -> Type
-adt02.lc 12:6-12:17
+12:6-12:17
     Type | Type
-adt02.lc 12:6-12:25
+12:6-12:25
     Type | Type | Type | Type
-adt02.lc 12:6-15:14
+12:6-15:14
     Type | Type | Type | Type | Type
-adt02.lc 12:12-12:13
+12:12-12:13
     Type
-adt02.lc 12:14-12:15
+12:14-12:15
     Type
-adt02.lc 12:16-12:17
+12:16-12:17
     Type
-adt02.lc 12:20-12:25
+12:20-12:25
     forall a b c . a -> b -> c -> Data3 a b c | Data3
       _g
       _f
       _e | Type | Type | Type | Type
-adt02.lc 13:5-13:9
+13:5-13:9
     forall a b c . Data3 a b c -> a
-adt02.lc 13:13-13:14
+13:13-13:14
     Type
-adt02.lc 14:5-14:9
+14:5-14:9
     forall a b c . Data3 a b c -> b
-adt02.lc 14:13-14:14
+14:13-14:14
     Type
-adt02.lc 15:5-15:9
+15:5-15:9
     forall a b c . Data3 a b c -> c
-adt02.lc 15:13-15:14
+15:13-15:14
     Type
-adt02.lc 18:1-18:7
+18:1-18:7
     Data3 Bool Bool Bool
-adt02.lc 18:10-18:15
+18:10-18:15
     forall a b c . a -> b -> c -> Data3 a b c
-adt02.lc 18:10-18:20
+18:10-18:20
     _b -> _a -> Data3 Bool _b _a
-adt02.lc 18:10-18:25
+18:10-18:25
     _a -> Data3 Bool Bool _a
-adt02.lc 18:10-18:30
+18:10-18:30
     Data3 Bool Bool Bool
-adt02.lc 18:16-18:20
+18:16-18:20
     Bool
-adt02.lc 18:21-18:25
+18:21-18:25
     Bool
-adt02.lc 18:26-18:30
+18:26-18:30
     Bool
-adt02.lc 20:1-20:5
+20:1-20:5
     Bool
-adt02.lc 20:8-20:12
+20:8-20:12
     Data2 -> Bool
-adt02.lc 20:8-20:19
+20:8-20:19
     Bool
-adt02.lc 20:8-20:22
+20:8-20:22
     Bool -> Bool
-adt02.lc 20:8-20:49
+20:8-20:49
     Bool
-adt02.lc 20:13-20:19
+20:13-20:19
     Data2
-adt02.lc 20:20-20:22
+20:20-20:22
     Bool -> Bool -> Bool
-adt02.lc 20:23-20:27
+20:23-20:27
     Data2 -> Bool
-adt02.lc 20:23-20:34
+20:23-20:34
     Bool
-adt02.lc 20:23-20:37
+20:23-20:37
     Bool -> Bool
-adt02.lc 20:23-20:49
+20:23-20:49
     Bool
-adt02.lc 20:28-20:34
+20:28-20:34
     Data2
-adt02.lc 20:35-20:37
+20:35-20:37
     Bool -> Bool -> Bool
-adt02.lc 20:38-20:42
+20:38-20:42
     forall a b c . Data3 a b c -> a
-adt02.lc 20:38-20:49
+20:38-20:49
     Bool
-adt02.lc 20:43-20:49
+20:43-20:49
     Data3 Bool Bool Bool
\ No newline at end of file
diff --git a/testdata/language-features/adt/adt02.reject.out b/testdata/language-features/adt/adt02.reject.out
index 4df48b2c..e07abac2 100644
--- a/testdata/language-features/adt/adt02.reject.out
+++ b/testdata/language-features/adt/adt02.reject.out
@@ -1,9 +1,9 @@
 type error: can not unify
-  'Internals.lc:63:6:
+  <<installed-prelude-path>>/Internals.lc:63:6:
   data Bool = False | True
        ^^^^
 with
-  'Internals.lc:58:6:
+  <<installed-prelude-path>>/Internals.lc:58:6:
   data Int
        ^^^
 in proj
@@ -18,36 +18,36 @@ case'Data3
         -> forall (h :: Data3) -> a h
 match'Data3 :: forall (a :: Type -> Type) -> a Data3 -> forall b -> a b -> a b
 !type error: can not unify
-  'Internals.lc:63:6:
+  <<installed-prelude-path>>/Internals.lc:63:6:
   data Bool = False | True
        ^^^^
 with
-  'Internals.lc:58:6:
+  <<installed-prelude-path>>/Internals.lc:58:6:
   data Int
        ^^^
 in proj
 ------------ tooltips
-adt02.reject.lc 2:6-2:11
+2:6-2:11
     Type | Type | Type | Type | Type | Type | Type | Type
-adt02.reject.lc 2:6-5:25
+2:6-5:25
     Type | Type
-adt02.reject.lc 2:6-7:11
+2:6-7:11
     Type | Type
-adt02.reject.lc 2:6-10:20
+2:6-10:20
     Type | Type
-adt02.reject.lc 3:5-3:10
+3:5-3:10
     Bool -> Char -> Bool -> Data3 | Data3 | Type | Type | Type | Type
-adt02.reject.lc 3:21-3:25
+3:21-3:25
     Type
-adt02.reject.lc 4:21-4:25
+4:21-4:25
     Type
-adt02.reject.lc 5:21-5:25
+5:21-5:25
     Type
-adt02.reject.lc 7:5-7:11
+7:5-7:11
     Int -> String -> Int -> Data3 | Data3 | Type | Type | Type | Type
-adt02.reject.lc 8:17-8:20
+8:17-8:20
     Type
-adt02.reject.lc 9:17-9:23
+9:17-9:23
     Type
-adt02.reject.lc 10:17-10:20
+10:17-10:20
     Type
\ No newline at end of file
diff --git a/testdata/language-features/adt/adt03.reject.out b/testdata/language-features/adt/adt03.reject.out
index 4296561e..51c1f1ad 100644
--- a/testdata/language-features/adt/adt03.reject.out
+++ b/testdata/language-features/adt/adt03.reject.out
@@ -1,11 +1,11 @@
-can't find: a in adt03.reject.lc:2:20:
+can't find: a in ./testdata/language-features/adt/adt03.reject.lc:2:20:
 data Data3 = Data3 a b c
                    ^
 ------------ trace
 'Data3 :: Type
-!can't find: a in adt03.reject.lc:2:20:
+!can't find: a in ./testdata/language-features/adt/adt03.reject.lc:2:20:
 data Data3 = Data3 a b c
                    ^
 ------------ tooltips
-adt03.reject.lc 2:6-2:11
+2:6-2:11
     Type
\ No newline at end of file
diff --git a/testdata/language-features/adt/adt04.reject.out b/testdata/language-features/adt/adt04.reject.out
index 5a605902..7ec3f438 100644
--- a/testdata/language-features/adt/adt04.reject.out
+++ b/testdata/language-features/adt/adt04.reject.out
@@ -1,11 +1,11 @@
-can't find: a in adt04.reject.lc:2:27:
+can't find: a in ./testdata/language-features/adt/adt04.reject.lc:2:27:
 data Data3 = Data3 { x :: a , y :: b , z :: c }
                           ^
 ------------ trace
 'Data3 :: Type
-!can't find: a in adt04.reject.lc:2:27:
+!can't find: a in ./testdata/language-features/adt/adt04.reject.lc:2:27:
 data Data3 = Data3 { x :: a , y :: b , z :: c }
                           ^
 ------------ tooltips
-adt04.reject.lc 2:6-2:11
+2:6-2:11
     Type
\ No newline at end of file
diff --git a/testdata/language-features/adt/adt05.out b/testdata/language-features/adt/adt05.out
index 5e37e669..777c9003 100644
--- a/testdata/language-features/adt/adt05.out
+++ b/testdata/language-features/adt/adt05.out
@@ -66,77 +66,77 @@ value1 = _rhs TEmpty
 value2 :: forall a . Num a => TList a
 value2 = \a b -> _rhs (TCons (fromInt a b 3) TEmpty)
 ------------ tooltips
-adt05.lc 3:6-3:11
+3:6-3:11
     Type -> Type | Type -> Type | Type -> Type | Type -> Type | Type -> Type | Type
-adt05.lc 3:6-3:13
+3:6-3:13
     Type | Type | Type | Type
-adt05.lc 3:6-3:30
+3:6-3:30
     Type | Type | Type
-adt05.lc 3:6-3:42
+3:6-3:42
     Type | Type
-adt05.lc 3:12-3:13
+3:12-3:13
     Type | Type
-adt05.lc 3:16-3:22
+3:16-3:22
     forall a . TList a | TList _b
-adt05.lc 3:25-3:30
+3:25-3:30
     forall a . a -> TList a -> TList a | TList _e | Type | Type | Type
-adt05.lc 3:31-3:32
+3:31-3:32
     Type
-adt05.lc 3:34-3:39
+3:34-3:39
     Type -> Type
-adt05.lc 3:34-3:41
+3:34-3:41
     Type
-adt05.lc 3:40-3:41
+3:40-3:41
     Type
-adt05.lc 5:1-5:7
+5:1-5:7
     forall a . TList a
-adt05.lc 5:10-5:16
+5:10-5:16
     forall a . TList a
-adt05.lc 6:1-6:7
+6:1-6:7
     forall a . Num a => TList a
-adt05.lc 6:10-6:15
+6:10-6:15
     forall a . a -> TList a -> TList a
-adt05.lc 6:10-6:17
+6:10-6:17
     TList _b -> TList _b
-adt05.lc 6:10-6:24
+6:10-6:24
     TList _b
-adt05.lc 6:16-6:17
+6:16-6:17
     _b
-adt05.lc 6:18-6:24
+6:18-6:24
     forall a . TList a
-adt05.lc 8:1-8:8
+8:1-8:8
     forall a . TList a -> Bool
-adt05.lc 8:18-8:22
+8:18-8:22
     Bool
-adt05.lc 8:18-9:23
+8:18-9:23
     TList _a -> Bool
-adt05.lc 9:18-9:23
+9:18-9:23
     Bool
-adt05.lc 11:1-11:7
+11:1-11:7
     forall a . TList a -> Bool
-adt05.lc 11:22-11:26
+11:22-11:26
     Bool
-adt05.lc 11:22-12:27
+11:22-12:27
     TList _a -> Bool
-adt05.lc 12:22-12:27
+12:22-12:27
     Bool
-adt05.lc 14:1-14:5
+14:1-14:5
     @Type -> forall a . Num a => Bool
-adt05.lc 14:8-14:15
+14:8-14:15
     forall a . TList a -> Bool
-adt05.lc 14:8-14:22
+14:8-14:22
     Bool
-adt05.lc 14:8-14:25
+14:8-14:25
     Bool -> Bool
-adt05.lc 14:8-14:39
+14:8-14:39
     Bool
-adt05.lc 14:16-14:22
+14:16-14:22
     forall a . TList a
-adt05.lc 14:23-14:25
+14:23-14:25
     Bool -> Bool -> Bool
-adt05.lc 14:26-14:32
+14:26-14:32
     forall a . TList a -> Bool
-adt05.lc 14:26-14:39
+14:26-14:39
     Bool
-adt05.lc 14:33-14:39
+14:33-14:39
     forall a . Num a => TList a
\ No newline at end of file
diff --git a/testdata/language-features/adt/gadt01.out b/testdata/language-features/adt/gadt01.out
index a88a5bec..0a4d5138 100644
--- a/testdata/language-features/adt/gadt01.out
+++ b/testdata/language-features/adt/gadt01.out
@@ -125,252 +125,252 @@ value2 = _rhs (Value2 True "s")
 value3 :: M3 Bool "t"
 value3 = _rhs (Value3 "t" True)
 ------------ tooltips
-gadt01.lc 2:6-2:7
+2:6-2:7
     Nat -> Type -> Type | Nat -> Type -> Type | Type | Type | Nat
       -> Type -> Type | Type | Type | Type
-gadt01.lc 2:6-4:25
+2:6-4:25
     Type | Type
-gadt01.lc 2:11-2:14
+2:11-2:14
     Type
-gadt01.lc 2:18-2:22
+2:18-2:22
     Type
-gadt01.lc 2:18-2:30
+2:18-2:30
     Type
-gadt01.lc 2:26-2:30
+2:26-2:30
     Type | Type
-gadt01.lc 3:3-3:6
+3:3-3:6
     forall a . a -> V 1 a | V 1 _b
-gadt01.lc 3:3-3:20
+3:3-3:20
     Type | Type | Type
-gadt01.lc 3:10-3:11
+3:10-3:11
     _b
-gadt01.lc 3:10-3:20
+3:10-3:20
     Type
-gadt01.lc 3:15-3:16
+3:15-3:16
     Nat -> Type -> Type
-gadt01.lc 3:15-3:18
+3:15-3:18
     Type -> Type
-gadt01.lc 3:15-3:20
+3:15-3:20
     Type | Type
-gadt01.lc 3:17-3:18
+3:17-3:18
     _b | _b
-gadt01.lc 3:17-3:20
+3:17-3:20
     V 1 _b -> Type
-gadt01.lc 3:19-3:20
+3:19-3:20
     Type | Type
-gadt01.lc 4:3-4:6
+4:3-4:6
     forall a . a -> a -> V 2 a | V 2 _c
-gadt01.lc 4:3-4:25
+4:3-4:25
     Type | Type | Type | Type
-gadt01.lc 4:10-4:11
+4:10-4:11
     _b
-gadt01.lc 4:10-4:25
+4:10-4:25
     Type
-gadt01.lc 4:15-4:16
+4:15-4:16
     Type
-gadt01.lc 4:15-4:25
+4:15-4:25
     Type
-gadt01.lc 4:20-4:21
+4:20-4:21
     Nat -> Type -> Type
-gadt01.lc 4:20-4:23
+4:20-4:23
     Type -> Type
-gadt01.lc 4:20-4:25
+4:20-4:25
     Type | Type
-gadt01.lc 4:22-4:23
+4:22-4:23
     _b | _b
-gadt01.lc 4:22-4:25
+4:22-4:25
     V 2 _c -> Type
-gadt01.lc 4:24-4:25
+4:24-4:25
     Type | Type
-gadt01.lc 6:6-6:7
+6:6-6:7
     Type -> String -> Type | Type -> String -> Type | Type | Type | Type
       -> String -> Type | Type | Type | Type
-gadt01.lc 6:6-7:33
+6:6-7:33
     Type
-gadt01.lc 6:11-6:15
+6:11-6:15
     Type
-gadt01.lc 6:19-6:25
+6:19-6:25
     Type
-gadt01.lc 6:19-6:33
+6:19-6:33
     Type
-gadt01.lc 6:29-6:33
+6:29-6:33
     Type | Type
-gadt01.lc 7:3-7:8
+7:3-7:8
     forall a . a -> forall (b :: String) . M a b | M _c _a
-gadt01.lc 7:3-7:33
+7:3-7:33
     Type | Type | Type | Type
-gadt01.lc 7:12-7:13
+7:12-7:13
     _b
-gadt01.lc 7:12-7:33
+7:12-7:33
     Type
-gadt01.lc 7:17-7:33
+7:17-7:33
     Type
-gadt01.lc 7:28-7:29
+7:28-7:29
     Type -> String -> Type
-gadt01.lc 7:28-7:31
+7:28-7:31
     String -> Type
-gadt01.lc 7:28-7:33
+7:28-7:33
     Type | Type
-gadt01.lc 7:30-7:31
+7:30-7:31
     Type | Type
-gadt01.lc 7:30-7:33
+7:30-7:33
     M _c _a -> Type
-gadt01.lc 7:32-7:33
+7:32-7:33
     _b | String
-gadt01.lc 9:6-9:8
+9:6-9:8
     Type -> String -> Type | Type -> String -> Type | Type | Type
       -> String -> Type | Type | Type
-gadt01.lc 9:6-10:35
+9:6-10:35
     Type | Type
-gadt01.lc 9:15-9:19
+9:15-9:19
     Type | Type | Type
-gadt01.lc 9:24-9:30
+9:24-9:30
     Type
-gadt01.lc 9:24-9:38
+9:24-9:38
     Type
-gadt01.lc 9:34-9:38
+9:34-9:38
     Type | Type
-gadt01.lc 10:3-10:9
+10:3-10:9
     forall a . a -> forall (b :: String) . M2 a b | M2 _d _a
-gadt01.lc 10:3-10:35
+10:3-10:35
     Type | Type | Type
-gadt01.lc 10:13-10:14
+10:13-10:14
     Type
-gadt01.lc 10:13-10:35
+10:13-10:35
     Type
-gadt01.lc 10:18-10:35
+10:18-10:35
     Type
-gadt01.lc 10:29-10:31
+10:29-10:31
     Type -> String -> Type
-gadt01.lc 10:29-10:33
+10:29-10:33
     String -> Type
-gadt01.lc 10:29-10:35
+10:29-10:35
     Type | Type
-gadt01.lc 10:32-10:33
+10:32-10:33
     Type
-gadt01.lc 10:34-10:35
+10:34-10:35
     _b | String
-gadt01.lc 12:6-12:8
+12:6-12:8
     Type -> String -> Type | Type -> String -> Type | Type | Type
       -> String -> Type | Type | Type
-gadt01.lc 12:6-13:35
+12:6-13:35
     Type | Type
-gadt01.lc 12:15-12:19
+12:15-12:19
     Type | Type | Type
-gadt01.lc 12:24-12:30
+12:24-12:30
     Type
-gadt01.lc 12:24-12:38
+12:24-12:38
     Type
-gadt01.lc 12:34-12:38
+12:34-12:38
     Type | Type
-gadt01.lc 13:3-13:9
+13:3-13:9
     forall a (b :: String) . a -> M3 a b | M3 _d _b
-gadt01.lc 13:3-13:35
+13:3-13:35
     Type | Type | Type
-gadt01.lc 13:13-13:35
+13:13-13:35
     Type
-gadt01.lc 13:24-13:25
+13:24-13:25
     Type
-gadt01.lc 13:24-13:35
+13:24-13:35
     Type
-gadt01.lc 13:29-13:31
+13:29-13:31
     Type -> String -> Type
-gadt01.lc 13:29-13:33
+13:29-13:33
     String -> Type
-gadt01.lc 13:29-13:35
+13:29-13:35
     Type | Type
-gadt01.lc 13:32-13:33
+13:32-13:33
     Type
-gadt01.lc 13:34-13:35
+13:34-13:35
     _c | String
-gadt01.lc 17:1-17:2
+17:1-17:2
     forall a (b :: String) . M2 a b -> a
-gadt01.lc 17:5-17:12
+17:5-17:12
     forall a
       . forall (b :: forall (c :: String) -> M2 a c -> Type)
         -> (forall (d :: a) -> forall (e :: String) . b e ('Value2 d e))
           -> forall (f :: String) . forall (g :: M2 a f) -> b f g
-gadt01.lc 17:5-17:24
+17:5-17:24
     (forall (a :: _b) -> @String -> _a) -> forall (b :: String) . M2 _b b -> _a
-gadt01.lc 17:5-17:37
+17:5-17:37
     forall (a :: String) . M2 _a a -> _a
-gadt01.lc 17:35-17:36
+17:35-17:36
     _d
-gadt01.lc 19:1-19:2
+19:1-19:2
     forall a (b :: String) . M3 a b -> a
-gadt01.lc 19:16-19:17
+19:16-19:17
     _d
-gadt01.lc 21:11-21:12
+21:11-21:12
     Type -> String -> Type
-gadt01.lc 21:11-21:17
+21:11-21:17
     String -> Type
-gadt01.lc 21:11-21:21
+21:11-21:21
     Type
-gadt01.lc 21:13-21:17
+21:13-21:17
     Type
-gadt01.lc 21:18-21:21
+21:18-21:21
     String
-gadt01.lc 22:1-22:7
+22:1-22:7
     M Bool "m"
-gadt01.lc 22:10-22:15
+22:10-22:15
     forall a . a -> forall (b :: String) . M a b
-gadt01.lc 22:10-22:20
+22:10-22:20
     forall (a :: String) . M Bool a
-gadt01.lc 22:16-22:20
+22:16-22:20
     Bool
-gadt01.lc 24:11-24:13
+24:11-24:13
     Type -> String -> Type
-gadt01.lc 24:11-24:18
+24:11-24:18
     String -> Type
-gadt01.lc 24:11-24:22
+24:11-24:22
     Type
-gadt01.lc 24:14-24:18
+24:14-24:18
     Type
-gadt01.lc 24:19-24:22
+24:19-24:22
     String
-gadt01.lc 25:1-25:7
+25:1-25:7
     M2 Bool "s"
-gadt01.lc 25:10-25:16
+25:10-25:16
     forall a . a -> forall (b :: String) . M2 a b
-gadt01.lc 25:10-25:21
+25:10-25:21
     forall (a :: String) . M2 Bool a
-gadt01.lc 25:17-25:21
+25:17-25:21
     Bool
-gadt01.lc 27:11-27:13
+27:11-27:13
     Type -> String -> Type
-gadt01.lc 27:11-27:18
+27:11-27:18
     String -> Type
-gadt01.lc 27:11-27:22
+27:11-27:22
     Type
-gadt01.lc 27:14-27:18
+27:14-27:18
     Type
-gadt01.lc 27:19-27:22
+27:19-27:22
     String
-gadt01.lc 28:1-28:7
+28:1-28:7
     M3 Bool "t"
-gadt01.lc 28:10-28:16
+28:10-28:16
     forall a (b :: String) . a -> M3 a b
-gadt01.lc 28:10-28:21
+28:10-28:21
     M3 Bool _a
-gadt01.lc 28:17-28:21
+28:17-28:21
     Bool
-gadt01.lc 30:1-30:5
+30:1-30:5
     Bool
-gadt01.lc 30:8-30:9
+30:8-30:9
     forall a (b :: String) . M2 a b -> a
-gadt01.lc 30:8-30:16
+30:8-30:16
     Bool
-gadt01.lc 30:8-30:19
+30:8-30:19
     Bool -> Bool
-gadt01.lc 30:8-30:28
+30:8-30:28
     Bool
-gadt01.lc 30:10-30:16
+30:10-30:16
     M2 Bool "s"
-gadt01.lc 30:17-30:19
+30:17-30:19
     Bool -> Bool -> Bool
-gadt01.lc 30:20-30:21
+30:20-30:21
     forall a (b :: String) . M3 a b -> a
-gadt01.lc 30:20-30:28
+30:20-30:28
     Bool
-gadt01.lc 30:22-30:28
+30:22-30:28
     M3 Bool "t"
\ No newline at end of file
diff --git a/testdata/language-features/adt/gadt01.reject.out b/testdata/language-features/adt/gadt01.reject.out
index d5a59c56..7010122f 100644
--- a/testdata/language-features/adt/gadt01.reject.out
+++ b/testdata/language-features/adt/gadt01.reject.out
@@ -3,9 +3,9 @@ illegal data definition (parameters are not uniform)
 'M3 :: Type -> String -> Type
 !illegal data definition (parameters are not uniform)
 ------------ tooltips
-gadt01.reject.lc 5:6-5:8
+5:6-5:8
     Type -> String -> Type
-gadt01.reject.lc 5:15-5:19
+5:15-5:19
     Type
-gadt01.reject.lc 5:27-5:33
+5:27-5:33
     Type | Type
\ No newline at end of file
diff --git a/testdata/language-features/adt/gadt02.reject.out b/testdata/language-features/adt/gadt02.reject.out
index 9fd5aa56..81d07dc0 100644
--- a/testdata/language-features/adt/gadt02.reject.out
+++ b/testdata/language-features/adt/gadt02.reject.out
@@ -1,3 +1,3 @@
-testdata/language-features/adt/gadt02.reject.lc:2:9:
+./testdata/language-features/adt/gadt02.reject.lc:2:9:
 unexpected 'T'
-expecting "::", "where", '=', '@', ::, end of input, or lowercase ident
+expecting "::", "where", '=', '@', ::, end of input, or lowercase ident
\ No newline at end of file
diff --git a/testdata/language-features/adt/gadt03.reject.out b/testdata/language-features/adt/gadt03.reject.out
index ee28c6db..49b41b83 100644
--- a/testdata/language-features/adt/gadt03.reject.out
+++ b/testdata/language-features/adt/gadt03.reject.out
@@ -13,46 +13,46 @@ match'M2
 'M3 :: Type -> String -> Type
 !illegal data definition (parameters are not uniform)
 ------------ tooltips
-gadt03.reject.lc 2:6-2:8
+2:6-2:8
     Type -> String -> Type | Type -> String -> Type | Type | Type
       -> String -> Type | Type | Type
-gadt03.reject.lc 2:6-3:35
+2:6-3:35
     Type | Type
-gadt03.reject.lc 2:15-2:19
+2:15-2:19
     Type | Type | Type
-gadt03.reject.lc 2:24-2:30
+2:24-2:30
     Type
-gadt03.reject.lc 2:24-2:38
+2:24-2:38
     Type
-gadt03.reject.lc 2:34-2:38
+2:34-2:38
     Type | Type
-gadt03.reject.lc 3:3-3:9
+3:3-3:9
     forall a . a -> forall (b :: String) . M2 a b | M2 _d _a
-gadt03.reject.lc 3:3-3:35
+3:3-3:35
     Type | Type | Type
-gadt03.reject.lc 3:13-3:14
+3:13-3:14
     Type
-gadt03.reject.lc 3:13-3:35
+3:13-3:35
     Type
-gadt03.reject.lc 3:18-3:35
+3:18-3:35
     Type
-gadt03.reject.lc 3:29-3:31
+3:29-3:31
     Type -> String -> Type
-gadt03.reject.lc 3:29-3:33
+3:29-3:33
     String -> Type
-gadt03.reject.lc 3:29-3:35
+3:29-3:35
     Type | Type
-gadt03.reject.lc 3:32-3:33
+3:32-3:33
     Type
-gadt03.reject.lc 3:34-3:35
+3:34-3:35
     _b | String
-gadt03.reject.lc 5:6-5:8
+5:6-5:8
     Type -> String -> Type
-gadt03.reject.lc 5:15-5:19
+5:15-5:19
     Type
-gadt03.reject.lc 5:24-5:30
+5:24-5:30
     Type
-gadt03.reject.lc 5:24-5:38
+5:24-5:38
     Type
-gadt03.reject.lc 5:34-5:38
+5:34-5:38
     Type | Type
\ No newline at end of file
diff --git a/testdata/language-features/adt/gadt04.reject.out b/testdata/language-features/adt/gadt04.reject.out
index 1d03ccc1..515f2069 100644
--- a/testdata/language-features/adt/gadt04.reject.out
+++ b/testdata/language-features/adt/gadt04.reject.out
@@ -1,7 +1,7 @@
-already defined Value at gadt04.reject.lc:6:3:
+already defined Value at ./testdata/language-features/adt/gadt04.reject.lc:6:3:
   Value :: a -> forall m . M2 a m
   ^^^^^
-and at gadt04.reject.lc:3:3:
+and at ./testdata/language-features/adt/gadt04.reject.lc:3:3:
   Value :: a -> forall m . M a m
   ^^^^^
 ------------ trace
@@ -16,71 +16,71 @@ match'M
     -> (forall b (c :: String) -> a (M b c)) -> forall d -> a d -> a d
 'M2 :: Type -> String -> Type
 Value :: forall a . a -> forall (b :: String) . M2 a b
-!already defined Value at gadt04.reject.lc:6:3:
+!already defined Value at ./testdata/language-features/adt/gadt04.reject.lc:6:3:
   Value :: a -> forall m . M2 a m
   ^^^^^
-and at gadt04.reject.lc:3:3:
+and at ./testdata/language-features/adt/gadt04.reject.lc:3:3:
   Value :: a -> forall m . M a m
   ^^^^^
 ------------ tooltips
-gadt04.reject.lc 2:6-2:7
+2:6-2:7
     Type -> String -> Type | Type -> String -> Type | Type | Type | Type
       -> String -> Type | Type | Type | Type
-gadt04.reject.lc 2:6-3:33
+2:6-3:33
     Type
-gadt04.reject.lc 2:11-2:15
+2:11-2:15
     Type
-gadt04.reject.lc 2:19-2:25
+2:19-2:25
     Type
-gadt04.reject.lc 2:19-2:33
+2:19-2:33
     Type
-gadt04.reject.lc 2:29-2:33
+2:29-2:33
     Type | Type
-gadt04.reject.lc 3:3-3:8
+3:3-3:8
     forall a . a -> forall (b :: String) . M a b | M _c _a
-gadt04.reject.lc 3:3-3:33
+3:3-3:33
     Type | Type | Type | Type
-gadt04.reject.lc 3:12-3:13
+3:12-3:13
     _b
-gadt04.reject.lc 3:12-3:33
+3:12-3:33
     Type
-gadt04.reject.lc 3:17-3:33
+3:17-3:33
     Type
-gadt04.reject.lc 3:28-3:29
+3:28-3:29
     Type -> String -> Type
-gadt04.reject.lc 3:28-3:31
+3:28-3:31
     String -> Type
-gadt04.reject.lc 3:28-3:33
+3:28-3:33
     Type | Type
-gadt04.reject.lc 3:30-3:31
+3:30-3:31
     Type | Type
-gadt04.reject.lc 3:30-3:33
+3:30-3:33
     M _c _a -> Type
-gadt04.reject.lc 3:32-3:33
+3:32-3:33
     _b | String
-gadt04.reject.lc 5:6-5:8
+5:6-5:8
     Type -> String -> Type
-gadt04.reject.lc 5:12-5:16
+5:12-5:16
     Type
-gadt04.reject.lc 5:20-5:26
+5:20-5:26
     Type
-gadt04.reject.lc 5:20-5:34
+5:20-5:34
     Type
-gadt04.reject.lc 5:30-5:34
+5:30-5:34
     Type | Type
-gadt04.reject.lc 6:12-6:13
+6:12-6:13
     _b
-gadt04.reject.lc 6:12-6:34
+6:12-6:34
     Type
-gadt04.reject.lc 6:17-6:34
+6:17-6:34
     Type
-gadt04.reject.lc 6:28-6:30
+6:28-6:30
     Type -> String -> Type
-gadt04.reject.lc 6:28-6:32
+6:28-6:32
     String -> Type
-gadt04.reject.lc 6:28-6:34
+6:28-6:34
     Type | Type
-gadt04.reject.lc 6:31-6:32
+6:31-6:32
     Type
-gadt04.reject.lc 6:33-6:34
+6:33-6:34
     _b
\ No newline at end of file
diff --git a/testdata/language-features/as-pattern/as-pattern01.out b/testdata/language-features/as-pattern/as-pattern01.out
index e4e690f5..5ec4d6ab 100644
--- a/testdata/language-features/as-pattern/as-pattern01.out
+++ b/testdata/language-features/as-pattern/as-pattern01.out
@@ -40,59 +40,59 @@ main
   = \a b c d e -> _rhs
     ((a == b) (g (fromInt a e 3) (fromInt a e 1)) (fromInt a e 5))
 ------------ tooltips
-as-pattern01.lc 1:1-1:2
+1:1-1:2
     forall a . [a] -> [a]
-as-pattern01.lc 1:14-1:15
+1:14-1:15
     _e
-as-pattern01.lc 1:14-1:16
+1:14-1:16
     [_d] -> [_d]
-as-pattern01.lc 1:14-1:17
+1:14-1:17
     [_c]
-as-pattern01.lc 1:15-1:16
+1:15-1:16
     forall a . a -> [a] -> [a]
-as-pattern01.lc 1:16-1:17
+1:16-1:17
     _e
-as-pattern01.lc 3:1-3:2
+3:1-3:2
     forall a . (Num (MatVecScalarElem a), Eq a, Num a) => a -> a -> a
-as-pattern01.lc 3:11-3:12
+3:11-3:12
     _g
-as-pattern01.lc 3:11-3:14
+3:11-3:14
     _f -> _f
-as-pattern01.lc 3:11-3:16
+3:11-3:16
     _d
-as-pattern01.lc 3:13-3:14
+3:13-3:14
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-as-pattern01.lc 3:15-3:16
+3:15-3:16
     _c
-as-pattern01.lc 7:9-7:13
+7:9-7:13
     Type
-as-pattern01.lc 8:1-8:5
+8:1-8:5
     forall a . (Eq a, Num (MatVecScalarElem a), Eq a, Num a) => Bool
-as-pattern01.lc 8:8-8:9
+8:8-8:9
     forall a . (Num (MatVecScalarElem a), Eq a, Num a) => a -> a -> a
-as-pattern01.lc 8:8-8:11
+8:8-8:11
     _e -> _e
-as-pattern01.lc 8:8-8:13
+8:8-8:13
     _f
-as-pattern01.lc 8:8-8:16
+8:8-8:16
     _e -> Bool
-as-pattern01.lc 8:8-8:18
+8:8-8:18
     Bool
-as-pattern01.lc 8:10-8:11
+8:10-8:11
     _b
-as-pattern01.lc 8:12-8:13
+8:12-8:13
     _b
-as-pattern01.lc 8:14-8:16
+8:14-8:16
     forall a . Eq a => a -> a -> Bool
-as-pattern01.lc 8:17-8:18
+8:17-8:18
     _b
 ------------ warnings
-Uncovered pattern(s) at as-pattern01.lc:1:1:
+Uncovered pattern(s) at ./testdata/language-features/as-pattern/as-pattern01.lc:1:1:
 f y@(x:xs) = x:y
 ^
 Missing case(s):
     f _ | [] <- _a
-Uncovered pattern(s) at as-pattern01.lc:3:1:
+Uncovered pattern(s) at ./testdata/language-features/as-pattern/as-pattern01.lc:3:1:
 g x@3 y = x + y
 ^
 Missing case(s):
diff --git a/testdata/language-features/as-pattern/as-pattern02.out b/testdata/language-features/as-pattern/as-pattern02.out
index 351bd9ee..d46b9cde 100644
--- a/testdata/language-features/as-pattern/as-pattern02.out
+++ b/testdata/language-features/as-pattern/as-pattern02.out
@@ -64,84 +64,84 @@ main
         [fromInt a c 1])
       (undefined ([d] -> [d] -> 'Bool) (f [fromInt d f 1]) [fromInt d f 1]))
 ------------ tooltips
-as-pattern02.lc 3:1-3:2
+3:1-3:2
     forall a . (Eq a, Num a) => [a] -> [a]
-as-pattern02.lc 3:7-4:49
+3:7-4:49
     [_c]
-as-pattern02.lc 3:12-3:13
+3:12-3:13
     _e
-as-pattern02.lc 4:24-4:49
+4:24-4:49
     [_e]
-as-pattern02.lc 4:27-4:28
+4:27-4:28
     _g
-as-pattern02.lc 4:27-4:30
+4:27-4:30
     _f -> Bool
-as-pattern02.lc 4:27-4:31
+4:27-4:31
     Bool
-as-pattern02.lc 4:27-4:41
+4:27-4:41
     [_f] -> [_f]
-as-pattern02.lc 4:28-4:30
+4:28-4:30
     forall a . Eq a => a -> a -> Bool
-as-pattern02.lc 4:30-4:31
+4:30-4:31
     _b
-as-pattern02.lc 4:37-4:41
+4:37-4:41
     [_g]
-as-pattern02.lc 4:47-4:49
+4:47-4:49
     _g
-as-pattern02.lc 6:9-6:13
+6:9-6:13
     Type
-as-pattern02.lc 7:1-7:5
+7:1-7:5
     forall a
       . Eq a
         => forall b
           . (a ~ [b], Eq b, Num b)
             => forall c . Eq c => forall d . (c ~ [d], Eq d, Num d) => Bool
-as-pattern02.lc 7:8-7:9
+7:8-7:9
     forall a . (Eq a, Num a) => [a] -> [a]
-as-pattern02.lc 7:8-7:15
+7:8-7:15
     [_d]
-as-pattern02.lc 7:8-7:18
+7:8-7:18
     [_c] -> Bool
-as-pattern02.lc 7:8-7:22
+7:8-7:22
     Bool
-as-pattern02.lc 7:8-7:25
+7:8-7:25
     Bool -> Bool
-as-pattern02.lc 7:8-7:38
+7:8-7:38
     Bool
-as-pattern02.lc 7:10-7:15
+7:10-7:15
     [_e]
-as-pattern02.lc 7:11-7:12
+7:11-7:12
     _b
-as-pattern02.lc 7:13-7:14
+7:13-7:14
     _b | [_e]
-as-pattern02.lc 7:16-7:18
+7:16-7:18
     forall a . Eq a => a -> a -> Bool
-as-pattern02.lc 7:19-7:22
+7:19-7:22
     [_d]
-as-pattern02.lc 7:20-7:21
+7:20-7:21
     _b
-as-pattern02.lc 7:23-7:25
+7:23-7:25
     Bool -> Bool -> Bool
-as-pattern02.lc 7:26-7:27
+7:26-7:27
     forall a . (Eq a, Num a) => [a] -> [a]
-as-pattern02.lc 7:26-7:31
+7:26-7:31
     [_d]
-as-pattern02.lc 7:26-7:34
+7:26-7:34
     [_c] -> Bool
-as-pattern02.lc 7:26-7:38
+7:26-7:38
     Bool
-as-pattern02.lc 7:28-7:31
+7:28-7:31
     [_d]
-as-pattern02.lc 7:29-7:30
+7:29-7:30
     _b
-as-pattern02.lc 7:32-7:34
+7:32-7:34
     forall a . Eq a => a -> a -> Bool
-as-pattern02.lc 7:35-7:38
+7:35-7:38
     [_d]
-as-pattern02.lc 7:36-7:37
+7:36-7:37
     _b
 ------------ warnings
-Uncovered pattern(s) at as-pattern02.lc:3:12:
+Uncovered pattern(s) at ./testdata/language-features/as-pattern/as-pattern02.lc:3:12:
 f e = case e of
            ^
 Missing case(s):
diff --git a/testdata/language-features/as-pattern/as-pattern02.reject.out b/testdata/language-features/as-pattern/as-pattern02.reject.out
index 2d74fd5d..54497c5e 100644
--- a/testdata/language-features/as-pattern/as-pattern02.reject.out
+++ b/testdata/language-features/as-pattern/as-pattern02.reject.out
@@ -1,8 +1,8 @@
 multiple pattern vars:
 x is defined at
-as-pattern02.reject.lc:2:3:
+./testdata/language-features/as-pattern/as-pattern02.reject.lc:2:3:
 f x@[x:xs] = x:xs
   ^
-as-pattern02.reject.lc:2:6:
+./testdata/language-features/as-pattern/as-pattern02.reject.lc:2:6:
 f x@[x:xs] = x:xs
      ^
\ No newline at end of file
diff --git a/testdata/language-features/basic-list/dotdot01.out b/testdata/language-features/basic-list/dotdot01.out
index b1e0fac8..9a9defd3 100644
--- a/testdata/language-features/basic-list/dotdot01.out
+++ b/testdata/language-features/basic-list/dotdot01.out
@@ -6,11 +6,11 @@ main = _lhs main (_rhs (fromTo (fromInt 1) (fromInt 10)))
 main :: [Float]
 main = _rhs (1.0 : fromTo (1.0 + 1.0) 10.0)
 ------------ tooltips
-dotdot01.lc 2:1-2:5
+2:1-2:5
     [Float]
-dotdot01.lc 2:8-2:15
+2:8-2:15
     [Float]
-dotdot01.lc 2:9-2:10
+2:9-2:10
     _b
-dotdot01.lc 2:12-2:14
+2:12-2:14
     _b
\ No newline at end of file
diff --git a/testdata/language-features/basic-list/list01.out b/testdata/language-features/basic-list/list01.out
index e8fabda7..c084335f 100644
--- a/testdata/language-features/basic-list/list01.out
+++ b/testdata/language-features/basic-list/list01.out
@@ -16,43 +16,43 @@ value2
 value3 :: [Char]
 value3 = _rhs ['h', 'e', 'l', 'l', 'o']
 ------------ tooltips
-list01.lc 1:1-1:7
+1:1-1:7
     forall a . [a]
-list01.lc 1:10-1:12
+1:10-1:12
     forall a . [a]
-list01.lc 2:1-2:7
+2:1-2:7
     forall a . Num a => [a]
-list01.lc 2:10-2:19
+2:10-2:19
     [_c]
-list01.lc 2:11-2:12
+2:11-2:12
     _b
-list01.lc 2:13-2:14
+2:13-2:14
     _b
-list01.lc 2:13-2:18
+2:13-2:18
     [_d]
-list01.lc 2:15-2:16
+2:15-2:16
     _b
-list01.lc 2:15-2:18
+2:15-2:18
     [_e]
-list01.lc 2:17-2:18
+2:17-2:18
     _b | [_e]
-list01.lc 3:1-3:7
+3:1-3:7
     [Char]
-list01.lc 3:10-3:31
+3:10-3:31
     [Char]
-list01.lc 3:11-3:14
+3:11-3:14
     Char
-list01.lc 3:15-3:18
+3:15-3:18
     Char
-list01.lc 3:15-3:30
+3:15-3:30
     [Char]
-list01.lc 3:19-3:22
+3:19-3:22
     Char
-list01.lc 3:19-3:30
+3:19-3:30
     [Char]
-list01.lc 3:23-3:26
+3:23-3:26
     Char
-list01.lc 3:23-3:30
+3:23-3:30
     [Char]
-list01.lc 3:27-3:30
+3:27-3:30
     Char | [Char]
\ No newline at end of file
diff --git a/testdata/language-features/basic-list/list02.out b/testdata/language-features/basic-list/list02.out
index cbec659d..9d0681f2 100644
--- a/testdata/language-features/basic-list/list02.out
+++ b/testdata/language-features/basic-list/list02.out
@@ -16,43 +16,43 @@ value2
 value3 :: [Char]
 value3 = _rhs ['h', 'e', 'l', 'l', 'o']
 ------------ tooltips
-list02.lc 1:1-1:7
+1:1-1:7
     forall a . [a]
-list02.lc 1:10-2:4
+1:10-2:4
     forall a . [a]
-list02.lc 4:1-4:7
+4:1-4:7
     forall a . Num a => [a]
-list02.lc 4:10-5:7
+4:10-5:7
     [_c]
-list02.lc 4:11-4:12
+4:11-4:12
     _b
-list02.lc 4:13-4:14
+4:13-4:14
     _b
-list02.lc 4:13-5:6
+4:13-5:6
     [_d]
-list02.lc 5:3-5:4
+5:3-5:4
     _b
-list02.lc 5:3-5:6
+5:3-5:6
     [_e]
-list02.lc 5:5-5:6
+5:5-5:6
     _b | [_e]
-list02.lc 7:1-7:7
+7:1-7:7
     [Char]
-list02.lc 8:3-13:4
+8:3-13:4
     [Char]
-list02.lc 8:5-8:8
+8:5-8:8
     Char
-list02.lc 9:5-9:8
+9:5-9:8
     Char
-list02.lc 9:5-12:8
+9:5-12:8
     [Char]
-list02.lc 10:5-10:8
+10:5-10:8
     Char
-list02.lc 10:5-12:8
+10:5-12:8
     [Char]
-list02.lc 11:5-11:8
+11:5-11:8
     Char
-list02.lc 11:5-12:8
+11:5-12:8
     [Char]
-list02.lc 12:5-12:8
+12:5-12:8
     Char | [Char]
\ No newline at end of file
diff --git a/testdata/language-features/basic-list/list03.reject.out b/testdata/language-features/basic-list/list03.reject.out
index cd099e9c..4be98b40 100644
--- a/testdata/language-features/basic-list/list03.reject.out
+++ b/testdata/language-features/basic-list/list03.reject.out
@@ -1,3 +1,3 @@
-testdata/language-features/basic-list/list03.reject.lc:2:1:
+./testdata/language-features/basic-list/list03.reject.lc:2:1:
 expecting expression
-wrong indentation
+wrong indentation
\ No newline at end of file
diff --git a/testdata/language-features/basic-list/list04.reject.out b/testdata/language-features/basic-list/list04.reject.out
index 00ca6166..b000c562 100644
--- a/testdata/language-features/basic-list/list04.reject.out
+++ b/testdata/language-features/basic-list/list04.reject.out
@@ -1,3 +1,3 @@
-testdata/language-features/basic-list/list04.reject.lc:2:1:
+./testdata/language-features/basic-list/list04.reject.lc:2:1:
 expecting expression
-wrong indentation
+wrong indentation
\ No newline at end of file
diff --git a/testdata/language-features/basic-list/list05.reject.out b/testdata/language-features/basic-list/list05.reject.out
index 15b54a98..4801e2b7 100644
--- a/testdata/language-features/basic-list/list05.reject.out
+++ b/testdata/language-features/basic-list/list05.reject.out
@@ -1,4 +1,4 @@
-testdata/language-features/basic-list/list05.reject.lc:2:1:
+./testdata/language-features/basic-list/list05.reject.lc:2:1:
 unexpected end of input
 expecting expression
-wrong indentation
+wrong indentation
\ No newline at end of file
diff --git a/testdata/language-features/basic-list/list06.reject.out b/testdata/language-features/basic-list/list06.reject.out
index 891e48f6..68775106 100644
--- a/testdata/language-features/basic-list/list06.reject.out
+++ b/testdata/language-features/basic-list/list06.reject.out
@@ -1,3 +1,3 @@
-testdata/language-features/basic-list/list06.reject.lc:1:10:
+./testdata/language-features/basic-list/list06.reject.lc:1:10:
 unexpected ','
-expecting expression
+expecting expression
\ No newline at end of file
diff --git a/testdata/language-features/basic-list/list07.reject.out b/testdata/language-features/basic-list/list07.reject.out
index 576973a9..38039104 100644
--- a/testdata/language-features/basic-list/list07.reject.out
+++ b/testdata/language-features/basic-list/list07.reject.out
@@ -10,9 +10,9 @@ with
   Char
 in []
 ------------ tooltips
-list07.reject.lc 1:10-1:11
+1:10-1:11
     _b
-list07.reject.lc 1:12-1:15
+1:12-1:15
     Float
-list07.reject.lc 1:16-1:19
+1:16-1:19
     Char
\ No newline at end of file
diff --git a/testdata/language-features/basic-list/list08.out b/testdata/language-features/basic-list/list08.out
index 68e3aaea..2f6f9a77 100644
--- a/testdata/language-features/basic-list/list08.out
+++ b/testdata/language-features/basic-list/list08.out
@@ -5,11 +5,11 @@ value = _lhs value (_rhs [fromInt 1, 1.2])
 value :: [Float]
 value = _rhs [1.0, 1.2]
 ------------ tooltips
-list08.lc 1:1-1:6
+1:1-1:6
     [Float]
-list08.lc 1:9-1:16
+1:9-1:16
     [Float]
-list08.lc 1:10-1:11
+1:10-1:11
     _b
-list08.lc 1:12-1:15
+1:12-1:15
     Float | [Float]
\ No newline at end of file
diff --git a/testdata/language-features/basic-list/list09.out b/testdata/language-features/basic-list/list09.out
index 0d09aea9..99879a64 100644
--- a/testdata/language-features/basic-list/list09.out
+++ b/testdata/language-features/basic-list/list09.out
@@ -5,15 +5,15 @@ value = _lhs value (_rhs ([fromInt 1, 1.2] :: [Float]))
 value :: [Float]
 value = _rhs [1.0, 1.2]
 ------------ tooltips
-list09.lc 1:1-1:6
+1:1-1:6
     [Float]
-list09.lc 1:9-1:16
+1:9-1:16
     [Float]
-list09.lc 1:10-1:11
+1:10-1:11
     _b
-list09.lc 1:12-1:15
+1:12-1:15
     Float | [Float]
-list09.lc 1:20-1:27
+1:20-1:27
     Type
-list09.lc 1:21-1:26
+1:21-1:26
     Type
\ No newline at end of file
diff --git a/testdata/language-features/basic-list/list10.reject.out b/testdata/language-features/basic-list/list10.reject.out
index 8cad72ab..1b9da45f 100644
--- a/testdata/language-features/basic-list/list10.reject.out
+++ b/testdata/language-features/basic-list/list10.reject.out
@@ -1,5 +1,5 @@
 type error: can not unify
-  'Internals.lc:58:6:
+  <<installed-prelude-path>>/Internals.lc:58:6:
   data Int
        ^^^
 with
@@ -7,18 +7,18 @@ with
 in []
 ------------ trace
 !type error: can not unify
-  'Internals.lc:58:6:
+  <<installed-prelude-path>>/Internals.lc:58:6:
   data Int
        ^^^
 with
   Float
 in []
 ------------ tooltips
-list10.reject.lc 1:10-1:11
+1:10-1:11
     _b
-list10.reject.lc 1:12-1:15
+1:12-1:15
     Float
-list10.reject.lc 1:20-1:25
+1:20-1:25
     Type
-list10.reject.lc 1:21-1:24
+1:21-1:24
     Type
\ No newline at end of file
diff --git a/testdata/language-features/basic-list/list11.out b/testdata/language-features/basic-list/list11.out
index 912daca2..c114b1b2 100644
--- a/testdata/language-features/basic-list/list11.out
+++ b/testdata/language-features/basic-list/list11.out
@@ -5,15 +5,15 @@ value = _lhs value (_rhs [fromInt 1])
 value :: forall a . Num a => [a]
 value = \a b -> _rhs [fromInt a b 1]
 ------------ tooltips
-list11.lc 1:1-1:6
+1:1-1:6
     forall a . Num a => [a]
-list11.lc 1:9-1:10
+1:9-1:10
     _b
-list11.lc 1:9-1:11
+1:9-1:11
     [_b] -> [_b]
-list11.lc 1:9-1:13
+1:9-1:13
     [_b]
-list11.lc 1:10-1:11
+1:10-1:11
     forall a . a -> [a] -> [a]
-list11.lc 1:11-1:13
+1:11-1:13
     forall a . [a]
\ No newline at end of file
diff --git a/testdata/language-features/basic-list/list12.out b/testdata/language-features/basic-list/list12.out
index ed67387e..0ddb0d7e 100644
--- a/testdata/language-features/basic-list/list12.out
+++ b/testdata/language-features/basic-list/list12.out
@@ -8,47 +8,47 @@ value
   = \a b -> _rhs
     [fromInt a b 1, fromInt a b 2, fromInt a b 3, fromInt a b 4, fromInt a b 5]
 ------------ tooltips
-list12.lc 1:1-1:6
+1:1-1:6
     forall a . Num a => [a]
-list12.lc 1:9-1:10
+1:9-1:10
     _b
-list12.lc 1:9-1:11
+1:9-1:11
     [_b] -> [_b]
-list12.lc 1:9-1:21
+1:9-1:21
     [_c]
-list12.lc 1:10-1:11
+1:10-1:11
     forall a . a -> [a] -> [a]
-list12.lc 1:11-1:12
+1:11-1:12
     _b
-list12.lc 1:11-1:13
+1:11-1:13
     [_b] -> [_b]
-list12.lc 1:11-1:21
+1:11-1:21
     [_d]
-list12.lc 1:12-1:13
+1:12-1:13
     forall a . a -> [a] -> [a]
-list12.lc 1:13-1:14
+1:13-1:14
     _b
-list12.lc 1:13-1:15
+1:13-1:15
     [_b] -> [_b]
-list12.lc 1:13-1:21
+1:13-1:21
     [_e]
-list12.lc 1:14-1:15
+1:14-1:15
     forall a . a -> [a] -> [a]
-list12.lc 1:15-1:16
+1:15-1:16
     _b
-list12.lc 1:15-1:17
+1:15-1:17
     [_b] -> [_b]
-list12.lc 1:15-1:21
+1:15-1:21
     [_f]
-list12.lc 1:16-1:17
+1:16-1:17
     forall a . a -> [a] -> [a]
-list12.lc 1:17-1:18
+1:17-1:18
     _b
-list12.lc 1:17-1:19
+1:17-1:19
     [_b] -> [_b]
-list12.lc 1:17-1:21
+1:17-1:21
     [_f]
-list12.lc 1:18-1:19
+1:18-1:19
     forall a . a -> [a] -> [a]
-list12.lc 1:19-1:21
+1:19-1:21
     forall a . [a]
\ No newline at end of file
diff --git a/testdata/language-features/basic-list/list13.out b/testdata/language-features/basic-list/list13.out
index 8002d692..752d6e1e 100644
--- a/testdata/language-features/basic-list/list13.out
+++ b/testdata/language-features/basic-list/list13.out
@@ -5,47 +5,47 @@ value = _lhs value (_rhs ['h', 'e', 'l', 'l', 'o'])
 value :: [Char]
 value = _rhs ['h', 'e', 'l', 'l', 'o']
 ------------ tooltips
-list13.lc 1:1-1:6
+1:1-1:6
     [Char]
-list13.lc 1:9-1:12
+1:9-1:12
     Char
-list13.lc 1:9-1:13
+1:9-1:13
     [Char] -> [Char]
-list13.lc 1:9-1:31
+1:9-1:31
     [Char]
-list13.lc 1:12-1:13
+1:12-1:13
     forall a . a -> [a] -> [a]
-list13.lc 1:13-1:16
+1:13-1:16
     Char
-list13.lc 1:13-1:17
+1:13-1:17
     [Char] -> [Char]
-list13.lc 1:13-1:31
+1:13-1:31
     [Char]
-list13.lc 1:16-1:17
+1:16-1:17
     forall a . a -> [a] -> [a]
-list13.lc 1:17-1:20
+1:17-1:20
     Char
-list13.lc 1:17-1:21
+1:17-1:21
     [Char] -> [Char]
-list13.lc 1:17-1:31
+1:17-1:31
     [Char]
-list13.lc 1:20-1:21
+1:20-1:21
     forall a . a -> [a] -> [a]
-list13.lc 1:21-1:24
+1:21-1:24
     Char
-list13.lc 1:21-1:25
+1:21-1:25
     [Char] -> [Char]
-list13.lc 1:21-1:31
+1:21-1:31
     [Char]
-list13.lc 1:24-1:25
+1:24-1:25
     forall a . a -> [a] -> [a]
-list13.lc 1:25-1:28
+1:25-1:28
     Char
-list13.lc 1:25-1:29
+1:25-1:29
     [Char] -> [Char]
-list13.lc 1:25-1:31
+1:25-1:31
     [Char]
-list13.lc 1:28-1:29
+1:28-1:29
     forall a . a -> [a] -> [a]
-list13.lc 1:29-1:31
+1:29-1:31
     forall a . [a]
\ No newline at end of file
diff --git a/testdata/language-features/basic-list/list14.reject.out b/testdata/language-features/basic-list/list14.reject.out
index ba2e1a66..597a0a78 100644
--- a/testdata/language-features/basic-list/list14.reject.out
+++ b/testdata/language-features/basic-list/list14.reject.out
@@ -2,7 +2,7 @@ type error: can not unify
   [Char]
 with
   ()
-in list14.reject.lc:1:17:
+in ./testdata/language-features/basic-list/list14.reject.lc:1:17:
 value = 'h':'i':()
                 ^^
 ------------ trace
@@ -10,21 +10,21 @@ value = 'h':'i':()
   [Char]
 with
   ()
-in list14.reject.lc:1:17:
+in ./testdata/language-features/basic-list/list14.reject.lc:1:17:
 value = 'h':'i':()
                 ^^
 ------------ tooltips
-list14.reject.lc 1:9-1:12
+1:9-1:12
     Char
-list14.reject.lc 1:9-1:13
+1:9-1:13
     [Char] -> [Char]
-list14.reject.lc 1:12-1:13
+1:12-1:13
     forall a . a -> [a] -> [a]
-list14.reject.lc 1:13-1:16
+1:13-1:16
     Char
-list14.reject.lc 1:13-1:17
+1:13-1:17
     [Char] -> [Char]
-list14.reject.lc 1:16-1:17
+1:16-1:17
     forall a . a -> [a] -> [a]
-list14.reject.lc 1:17-1:19
+1:17-1:19
     ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-list/list15.reject.out b/testdata/language-features/basic-list/list15.reject.out
index 0e7d8fb0..970aa82f 100644
--- a/testdata/language-features/basic-list/list15.reject.out
+++ b/testdata/language-features/basic-list/list15.reject.out
@@ -2,7 +2,7 @@ type error: can not unify
   Char
 with
   ()
-in list15.reject.lc:1:20:
+in ./testdata/language-features/basic-list/list15.reject.lc:1:20:
 value = 'h':'i':():[]
                    ^^
 ------------ trace
@@ -10,25 +10,25 @@ value = 'h':'i':():[]
   Char
 with
   ()
-in list15.reject.lc:1:20:
+in ./testdata/language-features/basic-list/list15.reject.lc:1:20:
 value = 'h':'i':():[]
                    ^^
 ------------ tooltips
-list15.reject.lc 1:9-1:12
+1:9-1:12
     Char
-list15.reject.lc 1:9-1:13
+1:9-1:13
     [Char] -> [Char]
-list15.reject.lc 1:12-1:13
+1:12-1:13
     forall a . a -> [a] -> [a]
-list15.reject.lc 1:13-1:16
+1:13-1:16
     Char
-list15.reject.lc 1:13-1:17
+1:13-1:17
     [Char] -> [Char]
-list15.reject.lc 1:16-1:17
+1:16-1:17
     forall a . a -> [a] -> [a]
-list15.reject.lc 1:17-1:19
+1:17-1:19
     ()
-list15.reject.lc 1:17-1:20
+1:17-1:20
     [()] -> [()]
-list15.reject.lc 1:19-1:20
+1:19-1:20
     forall a . a -> [a] -> [a]
\ No newline at end of file
diff --git a/testdata/language-features/basic-list/list16.reject.out b/testdata/language-features/basic-list/list16.reject.out
index fd2bb949..4b1a3ca1 100644
--- a/testdata/language-features/basic-list/list16.reject.out
+++ b/testdata/language-features/basic-list/list16.reject.out
@@ -2,7 +2,7 @@ type error: can not unify
   [Char]
 with
   Char
-in list16.reject.lc:1:13:
+in ./testdata/language-features/basic-list/list16.reject.lc:1:13:
 value = 'h':'i'
             ^^^
 ------------ trace
@@ -10,15 +10,15 @@ value = 'h':'i'
   [Char]
 with
   Char
-in list16.reject.lc:1:13:
+in ./testdata/language-features/basic-list/list16.reject.lc:1:13:
 value = 'h':'i'
             ^^^
 ------------ tooltips
-list16.reject.lc 1:9-1:12
+1:9-1:12
     Char
-list16.reject.lc 1:9-1:13
+1:9-1:13
     [Char] -> [Char]
-list16.reject.lc 1:12-1:13
+1:12-1:13
     forall a . a -> [a] -> [a]
-list16.reject.lc 1:13-1:16
+1:13-1:16
     Char
\ No newline at end of file
diff --git a/testdata/language-features/basic-list/listcomp01.out b/testdata/language-features/basic-list/listcomp01.out
index dc0c5204..43eff8b6 100644
--- a/testdata/language-features/basic-list/listcomp01.out
+++ b/testdata/language-features/basic-list/listcomp01.out
@@ -5,23 +5,23 @@ value = _lhs value (_rhs (concatMap (\(_ :: _) -> [()]) [(), (), (), ()]))
 value :: [()]
 value = _rhs (() : [] ++ foldr (++) [] (map (\_ -> [()]) [(), (), ()]))
 ------------ tooltips
-listcomp01.lc 1:1-1:6
+1:1-1:6
     [()]
-listcomp01.lc 1:9-1:34
+1:9-1:34
     [()]
-listcomp01.lc 1:10-1:12
+1:10-1:12
     () | [()]
-listcomp01.lc 1:20-1:33
+1:20-1:33
     [()]
-listcomp01.lc 1:21-1:23
+1:21-1:23
     ()
-listcomp01.lc 1:24-1:26
+1:24-1:26
     ()
-listcomp01.lc 1:24-1:32
+1:24-1:32
     [()]
-listcomp01.lc 1:27-1:29
+1:27-1:29
     ()
-listcomp01.lc 1:27-1:32
+1:27-1:32
     [()]
-listcomp01.lc 1:30-1:32
+1:30-1:32
     () | [()]
\ No newline at end of file
diff --git a/testdata/language-features/basic-list/listcomp02.out b/testdata/language-features/basic-list/listcomp02.out
index 497f88c0..05a95889 100644
--- a/testdata/language-features/basic-list/listcomp02.out
+++ b/testdata/language-features/basic-list/listcomp02.out
@@ -10,27 +10,27 @@ l = _rhs [(), (), (), ()]
 value :: [()]
 value = _rhs (() : [] ++ foldr (++) [] (map (\a -> [a]) [(), (), ()]))
 ------------ tooltips
-listcomp02.lc 1:1-1:2
+1:1-1:2
     [()]
-listcomp02.lc 1:5-1:18
+1:5-1:18
     [()]
-listcomp02.lc 1:6-1:8
+1:6-1:8
     ()
-listcomp02.lc 1:9-1:11
+1:9-1:11
     ()
-listcomp02.lc 1:9-1:17
+1:9-1:17
     [()]
-listcomp02.lc 1:12-1:14
+1:12-1:14
     ()
-listcomp02.lc 1:12-1:17
+1:12-1:17
     [()]
-listcomp02.lc 1:15-1:17
+1:15-1:17
     () | [()]
-listcomp02.lc 2:1-2:6
+2:1-2:6
     [()]
-listcomp02.lc 2:9-2:21
+2:9-2:21
     [()]
-listcomp02.lc 2:10-2:11
+2:10-2:11
     _d | [_b]
-listcomp02.lc 2:19-2:20
+2:19-2:20
     [()]
\ No newline at end of file
diff --git a/testdata/language-features/basic-list/listcomp03.out b/testdata/language-features/basic-list/listcomp03.out
index 85208fa3..3302b1be 100644
--- a/testdata/language-features/basic-list/listcomp03.out
+++ b/testdata/language-features/basic-list/listcomp03.out
@@ -8,27 +8,27 @@ value
 value :: [()]
 value = _rhs []
 ------------ tooltips
-listcomp03.lc 1:1-1:6
+1:1-1:6
     [()]
-listcomp03.lc 1:9-1:41
+1:9-1:41
     [()]
-listcomp03.lc 1:10-1:12
+1:10-1:12
     () | [()]
-listcomp03.lc 1:10-1:40
+1:10-1:40
     [()] -> [()] | [()]
-listcomp03.lc 1:20-1:33
+1:20-1:33
     [()]
-listcomp03.lc 1:21-1:23
+1:21-1:23
     ()
-listcomp03.lc 1:24-1:26
+1:24-1:26
     ()
-listcomp03.lc 1:24-1:32
+1:24-1:32
     [()]
-listcomp03.lc 1:27-1:29
+1:27-1:29
     ()
-listcomp03.lc 1:27-1:32
+1:27-1:32
     [()]
-listcomp03.lc 1:30-1:32
+1:30-1:32
     () | [()]
-listcomp03.lc 1:35-1:40
+1:35-1:40
     Bool
\ No newline at end of file
diff --git a/testdata/language-features/basic-list/listcomp04.out b/testdata/language-features/basic-list/listcomp04.out
index 032fdd81..8a7837d7 100644
--- a/testdata/language-features/basic-list/listcomp04.out
+++ b/testdata/language-features/basic-list/listcomp04.out
@@ -15,31 +15,31 @@ value
       : [] ++ foldr (++) [] (map (\_ -> [()]) [(), (), ()])
         ++ foldr (++) [] (map (\_ -> concatMap ' () ' () (\_ -> [()]) l) [(), (), ()]))
 ------------ tooltips
-listcomp04.lc 1:1-1:2
+1:1-1:2
     [()]
-listcomp04.lc 1:5-1:18
+1:5-1:18
     [()]
-listcomp04.lc 1:6-1:8
+1:6-1:8
     ()
-listcomp04.lc 1:9-1:11
+1:9-1:11
     ()
-listcomp04.lc 1:9-1:17
+1:9-1:17
     [()]
-listcomp04.lc 1:12-1:14
+1:12-1:14
     ()
-listcomp04.lc 1:12-1:17
+1:12-1:17
     [()]
-listcomp04.lc 1:15-1:17
+1:15-1:17
     () | [()]
-listcomp04.lc 2:1-2:6
+2:1-2:6
     [()]
-listcomp04.lc 2:9-2:30
+2:9-2:30
     [()]
-listcomp04.lc 2:10-2:12
+2:10-2:12
     () | [()]
-listcomp04.lc 2:10-2:29
+2:10-2:29
     [()]
-listcomp04.lc 2:20-2:21
+2:20-2:21
     [()]
-listcomp04.lc 2:28-2:29
+2:28-2:29
     [()]
\ No newline at end of file
diff --git a/testdata/language-features/basic-list/listcomp05.out b/testdata/language-features/basic-list/listcomp05.out
index 91c6cd09..ef5de256 100644
--- a/testdata/language-features/basic-list/listcomp05.out
+++ b/testdata/language-features/basic-list/listcomp05.out
@@ -13,19 +13,19 @@ value
 value :: [()]
 value = _rhs (u : [] ++ foldr (++) [] (map (\_ -> [u]) [()]))
 ------------ tooltips
-listcomp05.lc 1:1-1:6
+1:1-1:6
     [()]
-listcomp05.lc 1:9-1:39
+1:9-1:39
     [()]
-listcomp05.lc 1:10-1:11
+1:10-1:11
     ()
-listcomp05.lc 1:19-1:26
+1:19-1:26
     [()]
-listcomp05.lc 1:20-1:22
+1:20-1:22
     ()
-listcomp05.lc 1:23-1:25
+1:23-1:25
     () | [()]
-listcomp05.lc 1:32-1:33
+1:32-1:33
     _b | ()
-listcomp05.lc 1:36-1:38
+1:36-1:38
     ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-list/listcomp06.out b/testdata/language-features/basic-list/listcomp06.out
index 1b7db614..0a43f980 100644
--- a/testdata/language-features/basic-list/listcomp06.out
+++ b/testdata/language-features/basic-list/listcomp06.out
@@ -31,43 +31,43 @@ value2
   = _rhs
     (u : [] ++ foldr (++) [] (map (\_ -> primIfThenElse [' ()] True [u] []) [()]))
 ------------ tooltips
-listcomp06.lc 1:1-1:7
+1:1-1:7
     [()]
-listcomp06.lc 1:10-1:46
+1:10-1:46
     [()]
-listcomp06.lc 1:11-1:12
+1:11-1:12
     () | [()]
-listcomp06.lc 1:11-1:45
+1:11-1:45
     [()] -> [()]
-listcomp06.lc 1:20-1:27
+1:20-1:27
     [()]
-listcomp06.lc 1:21-1:23
+1:21-1:23
     ()
-listcomp06.lc 1:24-1:26
+1:24-1:26
     () | [()]
-listcomp06.lc 1:33-1:34
+1:33-1:34
     _b | ()
-listcomp06.lc 1:37-1:39
+1:37-1:39
     ()
-listcomp06.lc 1:41-1:45
+1:41-1:45
     Bool
-listcomp06.lc 3:1-3:7
+3:1-3:7
     [()]
-listcomp06.lc 3:10-3:46
+3:10-3:46
     [()]
-listcomp06.lc 3:11-3:12
+3:11-3:12
     ()
-listcomp06.lc 3:11-3:45
+3:11-3:45
     [()]
-listcomp06.lc 3:20-3:27
+3:20-3:27
     [()]
-listcomp06.lc 3:21-3:23
+3:21-3:23
     ()
-listcomp06.lc 3:24-3:26
+3:24-3:26
     () | [()]
-listcomp06.lc 3:29-3:33
+3:29-3:33
     Bool
-listcomp06.lc 3:39-3:40
+3:39-3:40
     _b | ()
-listcomp06.lc 3:43-3:45
+3:43-3:45
     ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-list/listcomp07.out b/testdata/language-features/basic-list/listcomp07.out
index 70ba3962..29b91178 100644
--- a/testdata/language-features/basic-list/listcomp07.out
+++ b/testdata/language-features/basic-list/listcomp07.out
@@ -54,69 +54,69 @@ value3
   = _rhs
     (u : [] ++ foldr (++) [] (map (\_ -> primIfThenElse [' ()] True [u] []) [()]))
 ------------ tooltips
-listcomp07.lc 1:1-1:7
+1:1-1:7
     [()]
-listcomp07.lc 1:10-6:11
+1:10-6:11
     [()]
-listcomp07.lc 1:12-1:13
+1:12-1:13
     ()
-listcomp07.lc 2:17-2:24
+2:17-2:24
     [()]
-listcomp07.lc 2:18-2:20
+2:18-2:20
     ()
-listcomp07.lc 2:21-2:23
+2:21-2:23
     () | [()]
-listcomp07.lc 3:16-3:17
+3:16-3:17
     _b | ()
-listcomp07.lc 3:20-3:22
+3:20-3:22
     ()
-listcomp07.lc 4:12-4:16
+4:12-4:16
     Bool
-listcomp07.lc 5:16-5:17
+5:16-5:17
     _b | ()
-listcomp07.lc 5:20-5:21
+5:20-5:21
     ()
-listcomp07.lc 8:1-8:7
+8:1-8:7
     [()]
-listcomp07.lc 8:10-12:11
+8:10-12:11
     [()]
-listcomp07.lc 8:12-8:13
+8:12-8:13
     ()
-listcomp07.lc 8:21-8:28
+8:21-8:28
     [()]
-listcomp07.lc 8:22-8:24
+8:22-8:24
     ()
-listcomp07.lc 8:25-8:27
+8:25-8:27
     () | [()]
-listcomp07.lc 9:16-9:17
+9:16-9:17
     _b | ()
-listcomp07.lc 9:20-9:22
+9:20-9:22
     ()
-listcomp07.lc 10:12-10:16
+10:12-10:16
     Bool
-listcomp07.lc 11:16-11:17
+11:16-11:17
     _b | ()
-listcomp07.lc 11:20-11:21
+11:20-11:21
     ()
-listcomp07.lc 14:1-14:7
+14:1-14:7
     [()]
-listcomp07.lc 14:10-20:3
+14:10-20:3
     [()]
-listcomp07.lc 14:12-14:13
+14:12-14:13
     ()
-listcomp07.lc 15:15-15:22
+15:15-15:22
     [()]
-listcomp07.lc 15:16-15:18
+15:16-15:18
     ()
-listcomp07.lc 15:19-15:21
+15:19-15:21
     () | [()]
-listcomp07.lc 17:2-17:3
+17:2-17:3
     _b | ()
-listcomp07.lc 17:6-17:8
+17:6-17:8
     ()
-listcomp07.lc 18:7-18:11
+18:7-18:11
     Bool
-listcomp07.lc 19:10-19:11
+19:10-19:11
     _b | ()
-listcomp07.lc 19:14-19:15
+19:14-19:15
     ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-list/listcomp08.reject.out b/testdata/language-features/basic-list/listcomp08.reject.out
index 8aa2bb7c..64f9f0be 100644
--- a/testdata/language-features/basic-list/listcomp08.reject.out
+++ b/testdata/language-features/basic-list/listcomp08.reject.out
@@ -1,22 +1,22 @@
 type error: can not unify
-  'Internals.lc:63:6:
+  <<installed-prelude-path>>/Internals.lc:63:6:
   data Bool = False | True
        ^^^^
 with
   String
-in listcomp08.reject.lc:1:23:
+in ./testdata/language-features/basic-list/listcomp08.reject.lc:1:23:
 value = [x | x <- [], "not Bool"]
                       ^^^^^^^^^^
 ------------ trace
 !type error: can not unify
-  'Internals.lc:63:6:
+  <<installed-prelude-path>>/Internals.lc:63:6:
   data Bool = False | True
        ^^^^
 with
   String
-in listcomp08.reject.lc:1:23:
+in ./testdata/language-features/basic-list/listcomp08.reject.lc:1:23:
 value = [x | x <- [], "not Bool"]
                       ^^^^^^^^^^
 ------------ tooltips
-listcomp08.reject.lc 1:23-1:33
+1:23-1:33
     String
\ No newline at end of file
diff --git a/testdata/language-features/basic-list/listcomp09.out b/testdata/language-features/basic-list/listcomp09.out
index 1c81c25f..19512a94 100644
--- a/testdata/language-features/basic-list/listcomp09.out
+++ b/testdata/language-features/basic-list/listcomp09.out
@@ -8,13 +8,13 @@ value1
 value1 :: @Type -> [() -> String]
 value1 = \_ -> _rhs []
 ------------ tooltips
-listcomp09.lc 1:1-1:7
+1:1-1:7
     @Type -> [() -> String]
-listcomp09.lc 1:10-1:36
+1:10-1:36
     [() -> String]
-listcomp09.lc 1:11-1:25
+1:11-1:25
     [() -> String]
-listcomp09.lc 1:18-1:25
+1:18-1:25
     String
-listcomp09.lc 1:33-1:35
+1:33-1:35
     forall a . [a]
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/bool01.out b/testdata/language-features/basic-values/bool01.out
index 2ff3bc18..ba701cf3 100644
--- a/testdata/language-features/basic-values/bool01.out
+++ b/testdata/language-features/basic-values/bool01.out
@@ -10,11 +10,11 @@ value1 = _rhs True
 value2 :: Bool
 value2 = _rhs False
 ------------ tooltips
-bool01.lc 1:1-1:7
+1:1-1:7
     Bool
-bool01.lc 1:10-1:14
+1:10-1:14
     Bool
-bool01.lc 2:1-2:7
+2:1-2:7
     Bool
-bool01.lc 2:10-2:15
+2:10-2:15
     Bool
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/case01.out b/testdata/language-features/basic-values/case01.out
index f807abb9..b444ef05 100644
--- a/testdata/language-features/basic-values/case01.out
+++ b/testdata/language-features/basic-values/case01.out
@@ -30,51 +30,51 @@ value5 = _rhs ()
 value6 :: ()
 value6 = _rhs ()
 ------------ tooltips
-case01.lc 1:1-1:7
+1:1-1:7
     ()
-case01.lc 1:10-1:29
+1:10-1:29
     ()
-case01.lc 1:15-1:17
+1:15-1:17
     ()
-case01.lc 1:27-1:29
+1:27-1:29
     ()
-case01.lc 3:1-3:7
+3:1-3:7
     ()
-case01.lc 3:10-4:11
+3:10-4:11
     ()
-case01.lc 3:15-3:17
+3:15-3:17
     ()
-case01.lc 4:9-4:11
+4:9-4:11
     ()
-case01.lc 6:1-6:7
+6:1-6:7
     ()
-case01.lc 7:3-8:13
+7:3-8:13
     ()
-case01.lc 7:8-7:10
+7:8-7:10
     ()
-case01.lc 8:11-8:13
+8:11-8:13
     ()
-case01.lc 10:1-10:7
+10:1-10:7
     ()
-case01.lc 11:3-13:9
+11:3-13:9
     ()
-case01.lc 11:8-11:10
+11:8-11:10
     ()
-case01.lc 13:7-13:9
+13:7-13:9
     ()
-case01.lc 15:1-15:7
+15:1-15:7
     ()
-case01.lc 16:3-19:11
+16:3-19:11
     ()
-case01.lc 16:8-16:10
+16:8-16:10
     ()
-case01.lc 19:9-19:11
+19:9-19:11
     ()
-case01.lc 21:1-21:7
+21:1-21:7
     ()
-case01.lc 22:3-23:12
+22:3-23:12
     ()
-case01.lc 22:8-22:10
+22:8-22:10
     ()
-case01.lc 23:10-23:12
+23:10-23:12
     ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/case02.out b/testdata/language-features/basic-values/case02.out
index b0a99d85..50c92c35 100644
--- a/testdata/language-features/basic-values/case02.out
+++ b/testdata/language-features/basic-values/case02.out
@@ -31,31 +31,31 @@ value2
       "1"
       ((a == d) (fromInt a e 1) (fromInt a e 2)))
 ------------ tooltips
-case02.lc 1:1-1:7
+1:1-1:7
     forall a . (Eq a, Num a) => ()
-case02.lc 1:10-3:10
+1:10-3:10
     ()
-case02.lc 1:15-1:16
+1:15-1:16
     _b
-case02.lc 2:8-2:10
+2:8-2:10
     ()
-case02.lc 2:8-3:10
+2:8-3:10
     Bool -> ()
-case02.lc 3:8-3:10
+3:8-3:10
     ()
-case02.lc 5:1-5:7
+5:1-5:7
     forall a . (Eq a, Num a, Eq a, Num a) => String
-case02.lc 5:10-8:11
+5:10-8:11
     String
-case02.lc 5:15-5:16
+5:15-5:16
     _b
-case02.lc 6:8-6:11
+6:8-6:11
     String
-case02.lc 6:8-8:11
+6:8-8:11
     Bool -> String
-case02.lc 7:8-7:11
+7:8-7:11
     String
-case02.lc 7:8-8:11
+7:8-8:11
     Bool -> String | String
-case02.lc 8:8-8:11
+8:8-8:11
     String
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/case03.reject.out b/testdata/language-features/basic-values/case03.reject.out
index 64c21552..6b8de667 100644
--- a/testdata/language-features/basic-values/case03.reject.out
+++ b/testdata/language-features/basic-values/case03.reject.out
@@ -1,22 +1,22 @@
 type error: no instance of 'Num on ???
-in case03.reject.lc:1:10:
+in ./testdata/language-features/basic-values/case03.reject.lc:1:10:
 value1 = case () of
   1 -> ()
   _ -> ()
 ------------ trace
 !type error: no instance of 'Num on ???
-in case03.reject.lc:1:10:
+in ./testdata/language-features/basic-values/case03.reject.lc:1:10:
 value1 = case () of
   1 -> ()
   _ -> ()
 ------------ tooltips
-case03.reject.lc 1:10-3:10
+1:10-3:10
     ()
-case03.reject.lc 1:15-1:17
+1:15-1:17
     ()
-case03.reject.lc 2:8-2:10
+2:8-2:10
     ()
-case03.reject.lc 2:8-3:10
+2:8-3:10
     Bool -> ()
-case03.reject.lc 3:8-3:10
+3:8-3:10
     ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/case04.reject.out b/testdata/language-features/basic-values/case04.reject.out
index 1eb0690b..849980c2 100644
--- a/testdata/language-features/basic-values/case04.reject.out
+++ b/testdata/language-features/basic-values/case04.reject.out
@@ -2,7 +2,7 @@ type error: can not unify
   ()
 with
   Char
-in case04.reject.lc:2:8:
+in ./testdata/language-features/basic-values/case04.reject.lc:2:8:
   1 -> '1'
        ^^^
 ------------ trace
@@ -10,11 +10,11 @@ in case04.reject.lc:2:8:
   ()
 with
   Char
-in case04.reject.lc:2:8:
+in ./testdata/language-features/basic-values/case04.reject.lc:2:8:
   1 -> '1'
        ^^^
 ------------ tooltips
-case04.reject.lc 2:8-2:11
+2:8-2:11
     Char
-case04.reject.lc 3:8-3:10
+3:8-3:10
     ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/case05.out b/testdata/language-features/basic-values/case05.out
index d6494cf2..6b7a4bf2 100644
--- a/testdata/language-features/basic-values/case05.out
+++ b/testdata/language-features/basic-values/case05.out
@@ -11,16 +11,16 @@ value
   = \a b c d -> _rhs
     (case'Bool (\_ -> 'Char) (undefined 'Char) '1' ((a == b) (fromInt a c 1) d))
 ------------ tooltips
-case05.lc 1:1-1:6
+1:1-1:6
     forall a . (Eq a, Num a) => a -> Char
-case05.lc 1:11-2:11
+1:11-2:11
     Char
-case05.lc 1:16-1:17
+1:16-1:17
     _e
-case05.lc 2:8-2:11
+2:8-2:11
     Char
 ------------ warnings
-Uncovered pattern(s) at case05.lc:1:16:
+Uncovered pattern(s) at ./testdata/language-features/basic-values/case05.lc:1:16:
 value x = case x of
                ^
 Missing case(s):
diff --git a/testdata/language-features/basic-values/case06.out b/testdata/language-features/basic-values/case06.out
index c69a1cbb..14288773 100644
--- a/testdata/language-features/basic-values/case06.out
+++ b/testdata/language-features/basic-values/case06.out
@@ -11,15 +11,15 @@ value
   = \a b c d -> _rhs
     (case'Bool (\_ -> 'Char) '_' '1' ((a == b) (fromInt a c 1) d))
 ------------ tooltips
-case06.lc 1:1-1:6
+1:1-1:6
     forall a . (Eq a, Num a) => a -> Char
-case06.lc 1:11-3:11
+1:11-3:11
     Char
-case06.lc 1:16-1:17
+1:16-1:17
     _e
-case06.lc 2:8-2:11
+2:8-2:11
     Char
-case06.lc 2:8-3:11
+2:8-3:11
     Bool -> Char
-case06.lc 3:8-3:11
+3:8-3:11
     Char
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/data01.out b/testdata/language-features/basic-values/data01.out
index 026fc8ac..3d11a96f 100644
--- a/testdata/language-features/basic-values/data01.out
+++ b/testdata/language-features/basic-values/data01.out
@@ -74,37 +74,37 @@ match'D1 = \a b c d -> <<type case function>>
 match'E :: forall (a :: Type -> Type) -> a E -> forall b -> a b -> a b
 match'E = \a b c d -> <<type case function>>
 ------------ tooltips
-data01.lc 1:6-1:7
+1:6-1:7
     Type | Type | Type | Type | Type | Type | Type
-data01.lc 1:6-1:13
+1:6-1:13
     Type | Type | Type
-data01.lc 1:8-1:9
+1:8-1:9
     A
-data01.lc 1:10-1:11
+1:10-1:11
     A
-data01.lc 1:12-1:13
+1:12-1:13
     A
-data01.lc 3:6-3:7
+3:6-3:7
     Type | Type | Type | Type | Type | Type | Type | Type
-data01.lc 3:6-3:22
+3:6-3:22
     Type | Type | Type
-data01.lc 3:10-3:11
+3:10-3:11
     E
-data01.lc 3:14-3:15
+3:14-3:15
     () -> E | E | Type | Type
-data01.lc 3:16-3:18
+3:16-3:18
     Type
-data01.lc 3:21-3:22
+3:21-3:22
     E
-data01.lc 5:6-5:8
+5:6-5:8
     Type | Type | Type | Type | Type | Type | Type | Type
-data01.lc 5:6-6:13
+5:6-6:13
     Type | Type | Type
-data01.lc 5:9-5:11
+5:9-5:11
     D1
-data01.lc 6:5-6:7
+6:5-6:7
     () -> D1 | D1 | Type | Type
-data01.lc 6:7-6:9
+6:7-6:9
     Type
-data01.lc 6:11-6:13
+6:11-6:13
     D1
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/data02.reject.out b/testdata/language-features/basic-values/data02.reject.out
index 79a9e6cd..2b7044fe 100644
--- a/testdata/language-features/basic-values/data02.reject.out
+++ b/testdata/language-features/basic-values/data02.reject.out
@@ -1,3 +1,3 @@
-testdata/language-features/basic-values/data02.reject.lc:1:6:
+./testdata/language-features/basic-values/data02.reject.lc:1:6:
 unexpected 'd'
-expecting uppercase ident
+expecting uppercase ident
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/data03.reject.out b/testdata/language-features/basic-values/data03.reject.out
index 2769951d..9ca460e9 100644
--- a/testdata/language-features/basic-values/data03.reject.out
+++ b/testdata/language-features/basic-values/data03.reject.out
@@ -1,3 +1,3 @@
-testdata/language-features/basic-values/data03.reject.lc:1:10:
+./testdata/language-features/basic-values/data03.reject.lc:1:10:
 unexpected 'd'
 expecting '(' or uppercase ident
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/def01.out b/testdata/language-features/basic-values/def01.out
index 77eb7749..db50c5c4 100644
--- a/testdata/language-features/basic-values/def01.out
+++ b/testdata/language-features/basic-values/def01.out
@@ -15,15 +15,15 @@ fun2 = \a b c d e _ _ _ _ _ -> _rhs 'c'
 unit :: ()
 unit = _rhs ()
 ------------ tooltips
-def01.lc 1:1-1:5
+1:1-1:5
     ()
-def01.lc 1:8-1:10
+1:8-1:10
     ()
-def01.lc 3:1-3:5
+3:1-3:5
     forall a b . Num b => a -> b
-def01.lc 3:10-3:11
+3:10-3:11
     _b
-def01.lc 5:1-5:5
+5:1-5:5
     forall a b c d e . a -> b -> c -> d -> e -> Char
-def01.lc 5:18-5:21
+5:18-5:21
     Char
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/def02.reject.out b/testdata/language-features/basic-values/def02.reject.out
index ebe02235..66e682c3 100644
--- a/testdata/language-features/basic-values/def02.reject.out
+++ b/testdata/language-features/basic-values/def02.reject.out
@@ -1,8 +1,8 @@
 multiple pattern vars:
 x is defined at
-def02.reject.lc:1:6:
+./testdata/language-features/basic-values/def02.reject.lc:1:6:
 fun1 x x = 'c'
      ^
-def02.reject.lc:1:8:
+./testdata/language-features/basic-values/def02.reject.lc:1:8:
 fun1 x x = 'c'
        ^
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/def03.out b/testdata/language-features/basic-values/def03.out
index 8b6f38a7..77a6a57e 100644
--- a/testdata/language-features/basic-values/def03.out
+++ b/testdata/language-features/basic-values/def03.out
@@ -21,16 +21,16 @@ fun
     (_rhs '1')
     ((a == d) (fromInt a e 1) f)
 ------------ tooltips
-def03.lc 1:1-1:4
+1:1-1:4
     forall a . (Eq a, Num a, Eq a, Num a) => a -> Char
-def03.lc 1:9-1:12
+1:9-1:12
     Char
-def03.lc 1:9-2:12
+1:9-2:12
     Bool -> Char
-def03.lc 2:9-2:12
+2:9-2:12
     Char | Char
 ------------ warnings
-Uncovered pattern(s) at def03.lc:1:1:
+Uncovered pattern(s) at ./testdata/language-features/basic-values/def03.lc:1:1:
 fun 1 = '1'
 fun 2 = '2'
 Missing case(s):
diff --git a/testdata/language-features/basic-values/def04.out b/testdata/language-features/basic-values/def04.out
index 08854519..785ffdac 100644
--- a/testdata/language-features/basic-values/def04.out
+++ b/testdata/language-features/basic-values/def04.out
@@ -34,27 +34,27 @@ fun2
     (_rhs '1')
     ((a == e) (fromInt a f 1) g)
 ------------ tooltips
-def04.lc 1:1-1:4
+1:1-1:4
     forall a . (Eq a, Num a, Eq a, Num a) => a -> Char
-def04.lc 1:9-1:12
+1:9-1:12
     Char
-def04.lc 1:9-3:12
+1:9-3:12
     Bool -> Char
-def04.lc 2:9-2:12
+2:9-2:12
     Char
-def04.lc 2:9-3:12
+2:9-3:12
     Bool -> Char | Char
-def04.lc 3:9-3:12
+3:9-3:12
     Char
-def04.lc 5:1-5:5
+5:1-5:5
     forall a b . (Eq a, Num a, Eq a, Num a) => a -> b -> Char
-def04.lc 5:12-5:15
+5:12-5:15
     Char
-def04.lc 5:12-7:15
+5:12-7:15
     Bool -> Char
-def04.lc 6:12-6:15
+6:12-6:15
     Char
-def04.lc 6:12-7:15
+6:12-7:15
     Bool -> Char | Char
-def04.lc 7:12-7:15
+7:12-7:15
     Char
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/def05.reject.out b/testdata/language-features/basic-values/def05.reject.out
index 2add70ca..33dd70d0 100644
--- a/testdata/language-features/basic-values/def05.reject.out
+++ b/testdata/language-features/basic-values/def05.reject.out
@@ -1,8 +1,8 @@
-testdata/language-features/basic-values/def05.reject.lc:4:1:
+./testdata/language-features/basic-values/def05.reject.lc:4:1:
 different number of arguments of fun:
-def05.reject.lc:1:1:
+./testdata/language-features/basic-values/def05.reject.lc:1:1:
 fun 1 = '1'
 ^^^
-def05.reject.lc:3:1:
+./testdata/language-features/basic-values/def05.reject.lc:3:1:
 fun = '_'
 ^^^
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/def06.reject.out b/testdata/language-features/basic-values/def06.reject.out
index 1d0402dc..bc0146e9 100644
--- a/testdata/language-features/basic-values/def06.reject.out
+++ b/testdata/language-features/basic-values/def06.reject.out
@@ -1,8 +1,8 @@
-testdata/language-features/basic-values/def06.reject.lc:5:1:
+./testdata/language-features/basic-values/def06.reject.lc:5:1:
 different number of arguments of fun2:
-def06.reject.lc:1:1:
+./testdata/language-features/basic-values/def06.reject.lc:1:1:
 fun2 1 _ = '1'
 ^^^^
-def06.reject.lc:3:1:
+./testdata/language-features/basic-values/def06.reject.lc:3:1:
 fun2 _ = '_'
 ^^^^
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/def07.reject.out b/testdata/language-features/basic-values/def07.reject.out
index 59c56627..ab876045 100644
--- a/testdata/language-features/basic-values/def07.reject.out
+++ b/testdata/language-features/basic-values/def07.reject.out
@@ -1,43 +1,43 @@
-already defined fun at def07.reject.lc:4:1:
+already defined fun at ./testdata/language-features/basic-values/def07.reject.lc:4:1:
 fun _ = '_'
 ^^^
-and at def07.reject.lc:1:1:
+and at ./testdata/language-features/basic-values/def07.reject.lc:1:1:
 fun 1 = '1'
 ^^^
 ------------ trace
 fun :: forall a . (Eq a, Num a, Eq a, Num a) => a -> Char
 fun2 :: forall a b . (Eq a, Num a) => a -> b -> Char
 fun :: forall a . a -> Char
-!already defined fun at def07.reject.lc:4:1:
+!already defined fun at ./testdata/language-features/basic-values/def07.reject.lc:4:1:
 fun _ = '_'
 ^^^
-and at def07.reject.lc:1:1:
+and at ./testdata/language-features/basic-values/def07.reject.lc:1:1:
 fun 1 = '1'
 ^^^
 ------------ tooltips
-def07.reject.lc 1:1-1:4
+1:1-1:4
     forall a . (Eq a, Num a, Eq a, Num a) => a -> Char
-def07.reject.lc 1:9-1:12
+1:9-1:12
     Char
-def07.reject.lc 1:9-2:12
+1:9-2:12
     Bool -> Char
-def07.reject.lc 2:9-2:12
+2:9-2:12
     Char | Char
-def07.reject.lc 3:1-3:5
+3:1-3:5
     forall a b . (Eq a, Num a) => a -> b -> Char
-def07.reject.lc 3:12-3:15
+3:12-3:15
     Char
-def07.reject.lc 4:1-4:4
+4:1-4:4
     forall a . a -> Char
-def07.reject.lc 4:9-4:12
+4:9-4:12
     Char
 ------------ warnings
-Uncovered pattern(s) at def07.reject.lc:1:1:
+Uncovered pattern(s) at ./testdata/language-features/basic-values/def07.reject.lc:1:1:
 fun 1 = '1'
 fun 2 = '2'
 Missing case(s):
     fun _ | False <- fromInt 1 == _a, False <- fromInt 2 == _a
-Uncovered pattern(s) at def07.reject.lc:3:1:
+Uncovered pattern(s) at ./testdata/language-features/basic-values/def07.reject.lc:3:1:
 fun2 1 _ = '1'
 ^^^^
 Missing case(s):
diff --git a/testdata/language-features/basic-values/deforder01.out b/testdata/language-features/basic-values/deforder01.out
index c1a1dec0..baed3fa7 100644
--- a/testdata/language-features/basic-values/deforder01.out
+++ b/testdata/language-features/basic-values/deforder01.out
@@ -10,11 +10,11 @@ x = _rhs '1'
 y :: Char
 y = _rhs '1'
 ------------ tooltips
-deforder01.lc 1:1-1:2
+1:1-1:2
     Char
-deforder01.lc 1:5-1:8
+1:5-1:8
     Char
-deforder01.lc 2:1-2:2
+2:1-2:2
     Char
-deforder01.lc 2:5-2:6
+2:5-2:6
     Char
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/deforder02.out b/testdata/language-features/basic-values/deforder02.out
index 3173fc2d..8965f76c 100644
--- a/testdata/language-features/basic-values/deforder02.out
+++ b/testdata/language-features/basic-values/deforder02.out
@@ -10,11 +10,11 @@ x = _rhs '1'
 y :: Char
 y = _rhs '1'
 ------------ tooltips
-deforder02.lc 1:1-1:2
+1:1-1:2
     Char
-deforder02.lc 1:5-1:6
+1:5-1:6
     Char
-deforder02.lc 2:1-2:2
+2:1-2:2
     Char
-deforder02.lc 2:5-2:8
+2:5-2:8
     Char
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/deforder03.out b/testdata/language-features/basic-values/deforder03.out
index c77dd75f..1458db3f 100644
--- a/testdata/language-features/basic-values/deforder03.out
+++ b/testdata/language-features/basic-values/deforder03.out
@@ -5,11 +5,11 @@ value = _lhs value (_rhs let a = (); b = a in '1')
 value :: Char
 value = _rhs '1'
 ------------ tooltips
-deforder03.lc 1:1-1:6
+1:1-1:6
     Char
-deforder03.lc 1:17-1:19
+1:17-1:19
     ()
-deforder03.lc 2:17-2:18
+2:17-2:18
     ()
-deforder03.lc 3:12-3:15
+3:12-3:15
     Char
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/deforder04.out b/testdata/language-features/basic-values/deforder04.out
index b30d2932..56537d49 100644
--- a/testdata/language-features/basic-values/deforder04.out
+++ b/testdata/language-features/basic-values/deforder04.out
@@ -5,11 +5,11 @@ value = _lhs value (_rhs let a = (); b = a in '1')
 value :: Char
 value = _rhs '1'
 ------------ tooltips
-deforder04.lc 1:1-1:6
+1:1-1:6
     Char
-deforder04.lc 1:17-1:18
+1:17-1:18
     ()
-deforder04.lc 2:17-2:19
+2:17-2:19
     ()
-deforder04.lc 3:12-3:15
+3:12-3:15
     Char
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/deforder05.out b/testdata/language-features/basic-values/deforder05.out
index c1b49368..32927daf 100644
--- a/testdata/language-features/basic-values/deforder05.out
+++ b/testdata/language-features/basic-values/deforder05.out
@@ -5,11 +5,11 @@ value = _lhs value (_rhs let a = (); b = a in '1')
 value :: Char
 value = _rhs '1'
 ------------ tooltips
-deforder05.lc 1:1-1:6
+1:1-1:6
     Char
-deforder05.lc 1:9-1:12
+1:9-1:12
     Char
-deforder05.lc 1:23-1:24
+1:23-1:24
     ()
-deforder05.lc 2:23-2:25
+2:23-2:25
     ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/deforder06.out b/testdata/language-features/basic-values/deforder06.out
index 7fa41792..518a2f7c 100644
--- a/testdata/language-features/basic-values/deforder06.out
+++ b/testdata/language-features/basic-values/deforder06.out
@@ -5,11 +5,11 @@ value = _lhs value (_rhs let a = (); b = a in '1')
 value :: Char
 value = _rhs '1'
 ------------ tooltips
-deforder06.lc 1:1-1:6
+1:1-1:6
     Char
-deforder06.lc 1:9-1:12
+1:9-1:12
     Char
-deforder06.lc 1:23-1:25
+1:23-1:25
     ()
-deforder06.lc 2:23-2:24
+2:23-2:24
     ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/fixity01.out b/testdata/language-features/basic-values/fixity01.out
index 50287803..c24d23fc 100644
--- a/testdata/language-features/basic-values/fixity01.out
+++ b/testdata/language-features/basic-values/fixity01.out
@@ -28,19 +28,19 @@ funL = \a b c _ -> _rhs c
 funR :: forall a b . a -> b -> a
 funR = \a b c _ -> _rhs c
 ------------ tooltips
-fixity01.lc 1:1-1:5
+1:1-1:5
     forall a b . a -> b -> a
-fixity01.lc 1:12-1:13
+1:12-1:13
     _d
-fixity01.lc 2:1-2:5
+2:1-2:5
     forall a b . a -> b -> a
-fixity01.lc 2:12-2:13
+2:12-2:13
     _d
-fixity01.lc 4:3-4:7
+4:3-4:7
     forall a b . a -> b -> a
-fixity01.lc 4:12-4:13
+4:12-4:13
     _d
-fixity01.lc 5:3-5:7
+5:3-5:7
     forall a b . a -> b -> b
-fixity01.lc 5:12-5:13
+5:12-5:13
     _b
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/fixity02.out b/testdata/language-features/basic-values/fixity02.out
index bdd35bc4..d6f3b96f 100644
--- a/testdata/language-features/basic-values/fixity02.out
+++ b/testdata/language-features/basic-values/fixity02.out
@@ -114,499 +114,499 @@ value7 = _rhs "hi"
 value8 :: ()
 value8 = _rhs ()
 ------------ tooltips
-fixity02.lc 1:1-1:5
+1:1-1:5
     forall a b . a -> b -> a
-fixity02.lc 1:12-1:13
+1:12-1:13
     _d
-fixity02.lc 2:1-2:5
+2:1-2:5
     forall a b . a -> b -> b
-fixity02.lc 2:12-2:13
+2:12-2:13
     _b
-fixity02.lc 4:3-4:5
+4:3-4:5
     forall a b . a -> b -> a
-fixity02.lc 4:10-4:11
+4:10-4:11
     _d
-fixity02.lc 5:3-5:5
+5:3-5:5
     forall a b . a -> b -> b
-fixity02.lc 5:10-5:11
+5:10-5:11
     _b
-fixity02.lc 11:1-11:7
+11:1-11:7
     Float
-fixity02.lc 11:10-11:12
+11:10-11:12
     ()
-fixity02.lc 11:10-11:15
+11:10-11:15
     _a -> _a
-fixity02.lc 11:10-11:34
+11:10-11:34
     Float
-fixity02.lc 11:13-11:15
+11:13-11:15
     forall a b . a -> b -> b
-fixity02.lc 11:16-11:19
+11:16-11:19
     Char
-fixity02.lc 11:16-11:22
+11:16-11:22
     _a -> _a
-fixity02.lc 11:16-11:34
+11:16-11:34
     Float
-fixity02.lc 11:20-11:22
+11:20-11:22
     forall a b . a -> b -> b
-fixity02.lc 11:23-11:27
+11:23-11:27
     String
-fixity02.lc 11:23-11:30
+11:23-11:30
     _a -> _a
-fixity02.lc 11:23-11:34
+11:23-11:34
     Float
-fixity02.lc 11:28-11:30
+11:28-11:30
     forall a b . a -> b -> b
-fixity02.lc 11:31-11:34
+11:31-11:34
     Float
-fixity02.lc 11:38-11:43
+11:38-11:43
     Type
-fixity02.lc 12:1-12:7
+12:1-12:7
     Float
-fixity02.lc 12:10-12:12
+12:10-12:12
     ()
-fixity02.lc 12:10-12:15
+12:10-12:15
     _a -> _a
-fixity02.lc 12:10-12:34
+12:10-12:34
     Float
-fixity02.lc 12:13-12:15
+12:13-12:15
     forall a b . a -> b -> b
-fixity02.lc 12:16-12:19
+12:16-12:19
     Char
-fixity02.lc 12:16-12:22
+12:16-12:22
     _a -> Char
-fixity02.lc 12:16-12:27
+12:16-12:27
     Char
-fixity02.lc 12:16-12:30
+12:16-12:30
     _a -> _a
-fixity02.lc 12:16-12:34
+12:16-12:34
     Float
-fixity02.lc 12:20-12:22
+12:20-12:22
     forall a b . a -> b -> a
-fixity02.lc 12:23-12:27
+12:23-12:27
     String
-fixity02.lc 12:28-12:30
+12:28-12:30
     forall a b . a -> b -> b
-fixity02.lc 12:31-12:34
+12:31-12:34
     Float
-fixity02.lc 12:38-12:43
+12:38-12:43
     Type
-fixity02.lc 13:1-13:7
+13:1-13:7
     Float
-fixity02.lc 13:10-13:12
+13:10-13:12
     ()
-fixity02.lc 13:10-13:15
+13:10-13:15
     _a -> ()
-fixity02.lc 13:10-13:19
+13:10-13:19
     ()
-fixity02.lc 13:10-13:22
+13:10-13:22
     _a -> _a
-fixity02.lc 13:10-13:34
+13:10-13:34
     Float
-fixity02.lc 13:13-13:15
+13:13-13:15
     forall a b . a -> b -> a
-fixity02.lc 13:16-13:19
+13:16-13:19
     Char
-fixity02.lc 13:20-13:22
+13:20-13:22
     forall a b . a -> b -> b
-fixity02.lc 13:23-13:27
+13:23-13:27
     String
-fixity02.lc 13:23-13:30
+13:23-13:30
     _a -> _a
-fixity02.lc 13:23-13:34
+13:23-13:34
     Float
-fixity02.lc 13:28-13:30
+13:28-13:30
     forall a b . a -> b -> b
-fixity02.lc 13:31-13:34
+13:31-13:34
     Float
-fixity02.lc 13:38-13:43
+13:38-13:43
     Type
-fixity02.lc 14:1-14:7
+14:1-14:7
     Float
-fixity02.lc 14:10-14:12
+14:10-14:12
     ()
-fixity02.lc 14:10-14:15
+14:10-14:15
     _a -> ()
-fixity02.lc 14:10-14:27
+14:10-14:27
     ()
-fixity02.lc 14:10-14:30
+14:10-14:30
     _a -> _a
-fixity02.lc 14:10-14:34
+14:10-14:34
     Float
-fixity02.lc 14:13-14:15
+14:13-14:15
     forall a b . a -> b -> a
-fixity02.lc 14:16-14:19
+14:16-14:19
     Char
-fixity02.lc 14:16-14:22
+14:16-14:22
     _a -> Char
-fixity02.lc 14:16-14:27
+14:16-14:27
     Char
-fixity02.lc 14:20-14:22
+14:20-14:22
     forall a b . a -> b -> a
-fixity02.lc 14:23-14:27
+14:23-14:27
     String
-fixity02.lc 14:28-14:30
+14:28-14:30
     forall a b . a -> b -> b
-fixity02.lc 14:31-14:34
+14:31-14:34
     Float
-fixity02.lc 14:38-14:43
+14:38-14:43
     Type
-fixity02.lc 15:1-15:7
+15:1-15:7
     String
-fixity02.lc 15:10-15:12
+15:10-15:12
     ()
-fixity02.lc 15:10-15:15
+15:10-15:15
     _a -> _a
-fixity02.lc 15:10-15:34
+15:10-15:34
     String
-fixity02.lc 15:13-15:15
+15:13-15:15
     forall a b . a -> b -> b
-fixity02.lc 15:16-15:19
+15:16-15:19
     Char
-fixity02.lc 15:16-15:22
+15:16-15:22
     _a -> _a
-fixity02.lc 15:16-15:34
+15:16-15:34
     String
-fixity02.lc 15:20-15:22
+15:20-15:22
     forall a b . a -> b -> b
-fixity02.lc 15:23-15:27
+15:23-15:27
     String
-fixity02.lc 15:23-15:30
+15:23-15:30
     _a -> String
-fixity02.lc 15:23-15:34
+15:23-15:34
     String
-fixity02.lc 15:28-15:30
+15:28-15:30
     forall a b . a -> b -> a
-fixity02.lc 15:31-15:34
+15:31-15:34
     Float
-fixity02.lc 15:38-15:44
+15:38-15:44
     Type
-fixity02.lc 16:1-16:7
+16:1-16:7
     Char
-fixity02.lc 16:10-16:12
+16:10-16:12
     ()
-fixity02.lc 16:10-16:15
+16:10-16:15
     _a -> _a
-fixity02.lc 16:10-16:34
+16:10-16:34
     Char
-fixity02.lc 16:13-16:15
+16:13-16:15
     forall a b . a -> b -> b
-fixity02.lc 16:16-16:19
+16:16-16:19
     Char
-fixity02.lc 16:16-16:22
+16:16-16:22
     _a -> Char
-fixity02.lc 16:16-16:34
+16:16-16:34
     Char
-fixity02.lc 16:20-16:22
+16:20-16:22
     forall a b . a -> b -> a
-fixity02.lc 16:23-16:27
+16:23-16:27
     String
-fixity02.lc 16:23-16:30
+16:23-16:30
     _a -> String
-fixity02.lc 16:23-16:34
+16:23-16:34
     String
-fixity02.lc 16:28-16:30
+16:28-16:30
     forall a b . a -> b -> a
-fixity02.lc 16:31-16:34
+16:31-16:34
     Float
-fixity02.lc 16:38-16:42
+16:38-16:42
     Type
-fixity02.lc 17:1-17:7
+17:1-17:7
     String
-fixity02.lc 17:10-17:12
+17:10-17:12
     ()
-fixity02.lc 17:10-17:15
+17:10-17:15
     _a -> ()
-fixity02.lc 17:10-17:19
+17:10-17:19
     ()
-fixity02.lc 17:10-17:22
+17:10-17:22
     _a -> _a
-fixity02.lc 17:10-17:34
+17:10-17:34
     String
-fixity02.lc 17:13-17:15
+17:13-17:15
     forall a b . a -> b -> a
-fixity02.lc 17:16-17:19
+17:16-17:19
     Char
-fixity02.lc 17:20-17:22
+17:20-17:22
     forall a b . a -> b -> b
-fixity02.lc 17:23-17:27
+17:23-17:27
     String
-fixity02.lc 17:23-17:30
+17:23-17:30
     _a -> String
-fixity02.lc 17:23-17:34
+17:23-17:34
     String
-fixity02.lc 17:28-17:30
+17:28-17:30
     forall a b . a -> b -> a
-fixity02.lc 17:31-17:34
+17:31-17:34
     Float
-fixity02.lc 17:38-17:44
+17:38-17:44
     Type
-fixity02.lc 18:1-18:7
+18:1-18:7
     ()
-fixity02.lc 18:10-18:12
+18:10-18:12
     ()
-fixity02.lc 18:10-18:15
+18:10-18:15
     _a -> ()
-fixity02.lc 18:10-18:34
+18:10-18:34
     ()
-fixity02.lc 18:13-18:15
+18:13-18:15
     forall a b . a -> b -> a
-fixity02.lc 18:16-18:19
+18:16-18:19
     Char
-fixity02.lc 18:16-18:22
+18:16-18:22
     _a -> Char
-fixity02.lc 18:16-18:34
+18:16-18:34
     Char
-fixity02.lc 18:20-18:22
+18:20-18:22
     forall a b . a -> b -> a
-fixity02.lc 18:23-18:27
+18:23-18:27
     String
-fixity02.lc 18:23-18:30
+18:23-18:30
     _a -> String
-fixity02.lc 18:23-18:34
+18:23-18:34
     String
-fixity02.lc 18:28-18:30
+18:28-18:30
     forall a b . a -> b -> a
-fixity02.lc 18:31-18:34
+18:31-18:34
     Float
-fixity02.lc 18:38-18:40
+18:38-18:40
     Type
-fixity02.lc 20:1-20:10
+20:1-20:10
     Float
-fixity02.lc 20:13-20:15
+20:13-20:15
     ()
-fixity02.lc 20:13-20:22
+20:13-20:22
     _a -> _a
-fixity02.lc 20:13-20:49
+20:13-20:49
     Float
-fixity02.lc 20:16-20:22
+20:16-20:22
     forall a b . a -> b -> b
-fixity02.lc 20:23-20:26
+20:23-20:26
     Char
-fixity02.lc 20:23-20:33
+20:23-20:33
     _a -> _a
-fixity02.lc 20:23-20:49
+20:23-20:49
     Float
-fixity02.lc 20:27-20:33
+20:27-20:33
     forall a b . a -> b -> b
-fixity02.lc 20:34-20:38
+20:34-20:38
     String
-fixity02.lc 20:34-20:45
+20:34-20:45
     _a -> _a
-fixity02.lc 20:34-20:49
+20:34-20:49
     Float
-fixity02.lc 20:39-20:45
+20:39-20:45
     forall a b . a -> b -> b
-fixity02.lc 20:46-20:49
+20:46-20:49
     Float
-fixity02.lc 20:53-20:58
+20:53-20:58
     Type
-fixity02.lc 21:1-21:10
+21:1-21:10
     Float
-fixity02.lc 21:13-21:15
+21:13-21:15
     ()
-fixity02.lc 21:13-21:22
+21:13-21:22
     _a -> _a
-fixity02.lc 21:13-21:49
+21:13-21:49
     Float
-fixity02.lc 21:16-21:22
+21:16-21:22
     forall a b . a -> b -> b
-fixity02.lc 21:23-21:26
+21:23-21:26
     Char
-fixity02.lc 21:23-21:33
+21:23-21:33
     _a -> Char
-fixity02.lc 21:23-21:38
+21:23-21:38
     Char
-fixity02.lc 21:23-21:45
+21:23-21:45
     _a -> _a
-fixity02.lc 21:23-21:49
+21:23-21:49
     Float
-fixity02.lc 21:27-21:33
+21:27-21:33
     forall a b . a -> b -> a
-fixity02.lc 21:34-21:38
+21:34-21:38
     String
-fixity02.lc 21:39-21:45
+21:39-21:45
     forall a b . a -> b -> b
-fixity02.lc 21:46-21:49
+21:46-21:49
     Float
-fixity02.lc 21:53-21:58
+21:53-21:58
     Type
-fixity02.lc 22:1-22:10
+22:1-22:10
     Float
-fixity02.lc 22:13-22:15
+22:13-22:15
     ()
-fixity02.lc 22:13-22:22
+22:13-22:22
     _a -> ()
-fixity02.lc 22:13-22:26
+22:13-22:26
     ()
-fixity02.lc 22:13-22:33
+22:13-22:33
     _a -> _a
-fixity02.lc 22:13-22:49
+22:13-22:49
     Float
-fixity02.lc 22:16-22:22
+22:16-22:22
     forall a b . a -> b -> a
-fixity02.lc 22:23-22:26
+22:23-22:26
     Char
-fixity02.lc 22:27-22:33
+22:27-22:33
     forall a b . a -> b -> b
-fixity02.lc 22:34-22:38
+22:34-22:38
     String
-fixity02.lc 22:34-22:45
+22:34-22:45
     _a -> _a
-fixity02.lc 22:34-22:49
+22:34-22:49
     Float
-fixity02.lc 22:39-22:45
+22:39-22:45
     forall a b . a -> b -> b
-fixity02.lc 22:46-22:49
+22:46-22:49
     Float
-fixity02.lc 22:53-22:58
+22:53-22:58
     Type
-fixity02.lc 23:1-23:10
+23:1-23:10
     Float
-fixity02.lc 23:13-23:15
+23:13-23:15
     ()
-fixity02.lc 23:13-23:22
+23:13-23:22
     _a -> ()
-fixity02.lc 23:13-23:38
+23:13-23:38
     ()
-fixity02.lc 23:13-23:45
+23:13-23:45
     _a -> _a
-fixity02.lc 23:13-23:49
+23:13-23:49
     Float
-fixity02.lc 23:16-23:22
+23:16-23:22
     forall a b . a -> b -> a
-fixity02.lc 23:23-23:26
+23:23-23:26
     Char
-fixity02.lc 23:23-23:33
+23:23-23:33
     _a -> Char
-fixity02.lc 23:23-23:38
+23:23-23:38
     Char
-fixity02.lc 23:27-23:33
+23:27-23:33
     forall a b . a -> b -> a
-fixity02.lc 23:34-23:38
+23:34-23:38
     String
-fixity02.lc 23:39-23:45
+23:39-23:45
     forall a b . a -> b -> b
-fixity02.lc 23:46-23:49
+23:46-23:49
     Float
-fixity02.lc 23:53-23:58
+23:53-23:58
     Type
-fixity02.lc 24:1-24:10
+24:1-24:10
     String
-fixity02.lc 24:13-24:15
+24:13-24:15
     ()
-fixity02.lc 24:13-24:22
+24:13-24:22
     _a -> _a
-fixity02.lc 24:13-24:49
+24:13-24:49
     String
-fixity02.lc 24:16-24:22
+24:16-24:22
     forall a b . a -> b -> b
-fixity02.lc 24:23-24:26
+24:23-24:26
     Char
-fixity02.lc 24:23-24:33
+24:23-24:33
     _a -> _a
-fixity02.lc 24:23-24:49
+24:23-24:49
     String
-fixity02.lc 24:27-24:33
+24:27-24:33
     forall a b . a -> b -> b
-fixity02.lc 24:34-24:38
+24:34-24:38
     String
-fixity02.lc 24:34-24:45
+24:34-24:45
     _a -> String
-fixity02.lc 24:34-24:49
+24:34-24:49
     String
-fixity02.lc 24:39-24:45
+24:39-24:45
     forall a b . a -> b -> a
-fixity02.lc 24:46-24:49
+24:46-24:49
     Float
-fixity02.lc 24:53-24:59
+24:53-24:59
     Type
-fixity02.lc 25:1-25:10
+25:1-25:10
     Char
-fixity02.lc 25:13-25:15
+25:13-25:15
     ()
-fixity02.lc 25:13-25:22
+25:13-25:22
     _a -> _a
-fixity02.lc 25:13-25:49
+25:13-25:49
     Char
-fixity02.lc 25:16-25:22
+25:16-25:22
     forall a b . a -> b -> b
-fixity02.lc 25:23-25:26
+25:23-25:26
     Char
-fixity02.lc 25:23-25:33
+25:23-25:33
     _a -> Char
-fixity02.lc 25:23-25:49
+25:23-25:49
     Char
-fixity02.lc 25:27-25:33
+25:27-25:33
     forall a b . a -> b -> a
-fixity02.lc 25:34-25:38
+25:34-25:38
     String
-fixity02.lc 25:34-25:45
+25:34-25:45
     _a -> String
-fixity02.lc 25:34-25:49
+25:34-25:49
     String
-fixity02.lc 25:39-25:45
+25:39-25:45
     forall a b . a -> b -> a
-fixity02.lc 25:46-25:49
+25:46-25:49
     Float
-fixity02.lc 25:53-25:57
+25:53-25:57
     Type
-fixity02.lc 26:1-26:10
+26:1-26:10
     String
-fixity02.lc 26:13-26:15
+26:13-26:15
     ()
-fixity02.lc 26:13-26:22
+26:13-26:22
     _a -> ()
-fixity02.lc 26:13-26:26
+26:13-26:26
     ()
-fixity02.lc 26:13-26:33
+26:13-26:33
     _a -> _a
-fixity02.lc 26:13-26:49
+26:13-26:49
     String
-fixity02.lc 26:16-26:22
+26:16-26:22
     forall a b . a -> b -> a
-fixity02.lc 26:23-26:26
+26:23-26:26
     Char
-fixity02.lc 26:27-26:33
+26:27-26:33
     forall a b . a -> b -> b
-fixity02.lc 26:34-26:38
+26:34-26:38
     String
-fixity02.lc 26:34-26:45
+26:34-26:45
     _a -> String
-fixity02.lc 26:34-26:49
+26:34-26:49
     String
-fixity02.lc 26:39-26:45
+26:39-26:45
     forall a b . a -> b -> a
-fixity02.lc 26:46-26:49
+26:46-26:49
     Float
-fixity02.lc 26:53-26:59
+26:53-26:59
     Type
-fixity02.lc 27:1-27:10
+27:1-27:10
     ()
-fixity02.lc 27:13-27:15
+27:13-27:15
     ()
-fixity02.lc 27:13-27:22
+27:13-27:22
     _a -> ()
-fixity02.lc 27:13-27:49
+27:13-27:49
     ()
-fixity02.lc 27:16-27:22
+27:16-27:22
     forall a b . a -> b -> a
-fixity02.lc 27:23-27:26
+27:23-27:26
     Char
-fixity02.lc 27:23-27:33
+27:23-27:33
     _a -> Char
-fixity02.lc 27:23-27:49
+27:23-27:49
     Char
-fixity02.lc 27:27-27:33
+27:27-27:33
     forall a b . a -> b -> a
-fixity02.lc 27:34-27:38
+27:34-27:38
     String
-fixity02.lc 27:34-27:45
+27:34-27:45
     _a -> String
-fixity02.lc 27:34-27:49
+27:34-27:49
     String
-fixity02.lc 27:39-27:45
+27:39-27:45
     forall a b . a -> b -> a
-fixity02.lc 27:46-27:49
+27:46-27:49
     Float
-fixity02.lc 27:53-27:55
+27:53-27:55
     Type
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/if01.out b/testdata/language-features/basic-values/if01.out
index 2af98d71..fe0b7f26 100644
--- a/testdata/language-features/basic-values/if01.out
+++ b/testdata/language-features/basic-values/if01.out
@@ -10,27 +10,27 @@ value1 = _rhs ()
 value2 :: Float
 value2 = _rhs 2.0
 ------------ tooltips
-if01.lc 1:1-1:7
+1:1-1:7
     ()
-if01.lc 1:10-1:33
+1:10-1:33
     ()
-if01.lc 1:13-1:17
+1:13-1:17
     Bool
-if01.lc 1:13-1:25
+1:13-1:25
     () -> ()
-if01.lc 1:23-1:25
+1:23-1:25
     ()
-if01.lc 1:31-1:33
+1:31-1:33
     ()
-if01.lc 2:1-2:7
+2:1-2:7
     Float
-if01.lc 2:10-2:36
+2:10-2:36
     Float
-if01.lc 2:13-2:18
+2:13-2:18
     Bool
-if01.lc 2:13-2:27
+2:13-2:27
     Float -> Float
-if01.lc 2:24-2:27
+2:24-2:27
     Float
-if01.lc 2:33-2:36
+2:33-2:36
     Float
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/if03.reject.out b/testdata/language-features/basic-values/if03.reject.out
index a5e1f6f9..e004d656 100644
--- a/testdata/language-features/basic-values/if03.reject.out
+++ b/testdata/language-features/basic-values/if03.reject.out
@@ -1,22 +1,22 @@
 type error: can not unify
-  'Internals.lc:63:6:
+  <<installed-prelude-path>>/Internals.lc:63:6:
   data Bool = False | True
        ^^^^
 with
   ()
-in if03.reject.lc:1:13:
+in ./testdata/language-features/basic-values/if03.reject.lc:1:13:
 value1 = if () then () else ()
             ^^
 ------------ trace
 !type error: can not unify
-  'Internals.lc:63:6:
+  <<installed-prelude-path>>/Internals.lc:63:6:
   data Bool = False | True
        ^^^^
 with
   ()
-in if03.reject.lc:1:13:
+in ./testdata/language-features/basic-values/if03.reject.lc:1:13:
 value1 = if () then () else ()
             ^^
 ------------ tooltips
-if03.reject.lc 1:13-1:15
+1:13-1:15
     ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/if04.reject.out b/testdata/language-features/basic-values/if04.reject.out
index 2a6b7bb5..29189955 100644
--- a/testdata/language-features/basic-values/if04.reject.out
+++ b/testdata/language-features/basic-values/if04.reject.out
@@ -2,7 +2,7 @@ type error: can not unify
   ()
 with
   Char
-in if04.reject.lc:1:31:
+in ./testdata/language-features/basic-values/if04.reject.lc:1:31:
 value1 = if True then () else '_'
                               ^^^
 ------------ trace
@@ -10,15 +10,15 @@ value1 = if True then () else '_'
   ()
 with
   Char
-in if04.reject.lc:1:31:
+in ./testdata/language-features/basic-values/if04.reject.lc:1:31:
 value1 = if True then () else '_'
                               ^^^
 ------------ tooltips
-if04.reject.lc 1:13-1:17
+1:13-1:17
     Bool
-if04.reject.lc 1:13-1:25
+1:13-1:25
     () -> ()
-if04.reject.lc 1:23-1:25
+1:23-1:25
     ()
-if04.reject.lc 1:31-1:34
+1:31-1:34
     Char
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/indentation01.out b/testdata/language-features/basic-values/indentation01.out
index d6efa98a..04db500e 100644
--- a/testdata/language-features/basic-values/indentation01.out
+++ b/testdata/language-features/basic-values/indentation01.out
@@ -10,11 +10,11 @@ tuple1 = _rhs ()
 tuple2 :: ()
 tuple2 = _rhs ()
 ------------ tooltips
-indentation01.lc 1:1-1:7
+1:1-1:7
     ()
-indentation01.lc 1:10-1:12
+1:10-1:12
     ()
-indentation01.lc 2:1-2:7
+2:1-2:7
     ()
-indentation01.lc 2:10-2:12
+2:10-2:12
     ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/indentation02.out b/testdata/language-features/basic-values/indentation02.out
index e90c05ad..d05ce8b2 100644
--- a/testdata/language-features/basic-values/indentation02.out
+++ b/testdata/language-features/basic-values/indentation02.out
@@ -10,11 +10,11 @@ tuple1 = _rhs ()
 tuple2 :: ()
 tuple2 = _rhs ()
 ------------ tooltips
-indentation02.lc 1:3-1:9
+1:3-1:9
     ()
-indentation02.lc 1:12-1:14
+1:12-1:14
     ()
-indentation02.lc 2:3-2:9
+2:3-2:9
     ()
-indentation02.lc 2:12-2:14
+2:12-2:14
     ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/indentation03.reject.out b/testdata/language-features/basic-values/indentation03.reject.out
index 5fe5403c..d7b66dd2 100644
--- a/testdata/language-features/basic-values/indentation03.reject.out
+++ b/testdata/language-features/basic-values/indentation03.reject.out
@@ -1,3 +1,3 @@
-testdata/language-features/basic-values/indentation03.reject.lc:2:10:
+./testdata/language-features/basic-values/indentation03.reject.lc:2:10:
 unexpected '='
-expecting "->", "::", "=>", "let", "where", ''', '(', '@', '[', '_', '{', end of input, expression, lambda, literal, lowercase ident, rest of expression, swizzling, symbols, or uppercase ident
+expecting "->", "::", "=>", "let", "where", ''', '(', '@', '[', '_', '{', end of input, expression, lambda, literal, lowercase ident, rest of expression, swizzling, symbols, or uppercase ident
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/indentation04.reject.out b/testdata/language-features/basic-values/indentation04.reject.out
index 8ff2d6c1..b310af6c 100644
--- a/testdata/language-features/basic-values/indentation04.reject.out
+++ b/testdata/language-features/basic-values/indentation04.reject.out
@@ -1,3 +1,3 @@
-testdata/language-features/basic-values/indentation04.reject.lc:2:2:
+./testdata/language-features/basic-values/indentation04.reject.lc:2:2:
 unexpected 't'
-expecting ''', backquoted ident, end of input, expression, lambda, literal, lowercase ident, rest of expression, symbols, or uppercase ident
+expecting ''', backquoted ident, end of input, expression, lambda, literal, lowercase ident, rest of expression, symbols, or uppercase ident
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/infix01.out b/testdata/language-features/basic-values/infix01.out
index a54cfa5c..61434142 100644
--- a/testdata/language-features/basic-values/infix01.out
+++ b/testdata/language-features/basic-values/infix01.out
@@ -10,19 +10,19 @@ fun = \a b _ _ -> _rhs ()
 value :: forall a b . a -> b -> ()
 value = \a b _ _ -> _rhs ()
 ------------ tooltips
-infix01.lc 1:1-1:4
+1:1-1:4
     forall a b . a -> b -> ()
-infix01.lc 1:11-1:13
+1:11-1:13
     ()
-infix01.lc 3:1-3:6
+3:1-3:6
     forall a b . a -> b -> ()
-infix01.lc 3:13-3:14
+3:13-3:14
     _f
-infix01.lc 3:13-3:20
+3:13-3:20
     _a -> ()
-infix01.lc 3:13-3:22
+3:13-3:22
     ()
-infix01.lc 3:15-3:20
+3:15-3:20
     forall a b . a -> b -> ()
-infix01.lc 3:21-3:22
+3:21-3:22
     _c
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/infix02.out b/testdata/language-features/basic-values/infix02.out
index 60daa154..e76f7e19 100644
--- a/testdata/language-features/basic-values/infix02.out
+++ b/testdata/language-features/basic-values/infix02.out
@@ -10,19 +10,19 @@ fun = \a b c _ _ _ -> _rhs ()
 value :: forall a b c . a -> b -> c -> ()
 value = \a b c d e -> _rhs (fun d e)
 ------------ tooltips
-infix02.lc 1:1-1:4
+1:1-1:4
     forall a b c . a -> b -> c -> ()
-infix02.lc 1:13-1:15
+1:13-1:15
     ()
-infix02.lc 3:1-3:6
+3:1-3:6
     forall a b c . a -> b -> c -> ()
-infix02.lc 3:13-3:14
+3:13-3:14
     _g
-infix02.lc 3:13-3:20
+3:13-3:20
     _b -> _a -> ()
-infix02.lc 3:13-3:22
+3:13-3:22
     _a -> ()
-infix02.lc 3:15-3:20
+3:15-3:20
     forall a b c . a -> b -> c -> ()
-infix02.lc 3:21-3:22
+3:21-3:22
     _d
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/infix03.out b/testdata/language-features/basic-values/infix03.out
index 6d105103..f7f1794d 100644
--- a/testdata/language-features/basic-values/infix03.out
+++ b/testdata/language-features/basic-values/infix03.out
@@ -33,49 +33,49 @@ d3 = \a b -> _rhs (D3 a b)
 match'D :: forall (a :: Type -> Type) -> a D -> forall b -> a b -> a b
 match'D = \a b c d -> <<type case function>>
 ------------ tooltips
-infix03.lc 1:6-1:7
+1:6-1:7
     Type | Type | Type | Type | Type | Type | Type | Type
-infix03.lc 1:6-1:18
+1:6-1:18
     Type
-infix03.lc 1:6-2:12
+1:6-2:12
     Type | Type
-infix03.lc 1:6-2:21
+1:6-2:21
     Type | Type
-infix03.lc 1:10-1:12
+1:10-1:12
     () -> () -> D | D | Type | Type | Type
-infix03.lc 1:13-1:15
+1:13-1:15
     Type
-infix03.lc 1:16-1:18
+1:16-1:18
     Type
-infix03.lc 2:10-2:12
+2:10-2:12
     () -> () -> () -> D | D | Type | Type | Type | Type
-infix03.lc 2:13-2:15
+2:13-2:15
     Type
-infix03.lc 2:16-2:18
+2:16-2:18
     Type
-infix03.lc 2:19-2:21
+2:19-2:21
     Type
-infix03.lc 4:1-4:3
+4:1-4:3
     () -> () -> D
-infix03.lc 4:10-4:11
+4:10-4:11
     _d
-infix03.lc 4:10-4:16
+4:10-4:16
     () -> D
-infix03.lc 4:10-4:18
+4:10-4:18
     D
-infix03.lc 4:12-4:16
+4:12-4:16
     () -> () -> D
-infix03.lc 4:17-4:18
+4:17-4:18
     _b
-infix03.lc 6:1-6:3
+6:1-6:3
     () -> () -> () -> D
-infix03.lc 6:10-6:11
+6:10-6:11
     _d
-infix03.lc 6:10-6:16
+6:10-6:16
     () -> () -> D
-infix03.lc 6:10-6:18
+6:10-6:18
     () -> D
-infix03.lc 6:12-6:16
+6:12-6:16
     () -> () -> () -> D
-infix03.lc 6:17-6:18
+6:17-6:18
     _b
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/infix04.reject.out b/testdata/language-features/basic-values/infix04.reject.out
index efb2c5a4..c216d697 100644
--- a/testdata/language-features/basic-values/infix04.reject.out
+++ b/testdata/language-features/basic-values/infix04.reject.out
@@ -1,3 +1,3 @@
-testdata/language-features/basic-values/infix04.reject.lc:3:14:
+./testdata/language-features/basic-values/infix04.reject.lc:3:14:
 unexpected '`'
-expecting "->", "::", "=>", "let", "where", ''', '(', '@', '[', '_', '{', backquoted ident, end of input, expression, lambda, literal, lowercase ident, rest of expression, swizzling, or uppercase ident
+expecting "->", "::", "=>", "let", "where", ''', '(', '@', '[', '_', '{', backquoted ident, end of input, expression, lambda, literal, lowercase ident, rest of expression, swizzling, or uppercase ident
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/lambda01.out b/testdata/language-features/basic-values/lambda01.out
index 0a959710..4b6fd2e8 100644
--- a/testdata/language-features/basic-values/lambda01.out
+++ b/testdata/language-features/basic-values/lambda01.out
@@ -27,19 +27,19 @@ fun4
   :: forall a b c d e f g h i . a -> b -> c -> d -> e -> f -> g -> h -> i -> ()
 fun4 = \a b c d e f g h i -> _rhs \_ _ _ _ _ _ _ _ _ -> ()
 ------------ tooltips
-lambda01.lc 1:1-1:5
+1:1-1:5
     forall a . a -> ()
-lambda01.lc 1:14-1:16
+1:14-1:16
     ()
-lambda01.lc 2:1-2:5
+2:1-2:5
     forall a . a -> ()
-lambda01.lc 2:15-2:17
+2:15-2:17
     ()
-lambda01.lc 3:1-3:5
+3:1-3:5
     forall a . a -> ()
-lambda01.lc 3:13-3:15
+3:13-3:15
     ()
-lambda01.lc 4:1-4:5
+4:1-4:5
     forall a b c d e f g h i . a -> b -> c -> d -> e -> f -> g -> h -> i -> ()
-lambda01.lc 5:28-5:30
+5:28-5:30
     ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/lambda02.reject.out b/testdata/language-features/basic-values/lambda02.reject.out
index 3c5c3ca2..72951b88 100644
--- a/testdata/language-features/basic-values/lambda02.reject.out
+++ b/testdata/language-features/basic-values/lambda02.reject.out
@@ -1,3 +1,3 @@
-testdata/language-features/basic-values/lambda02.reject.lc:1:1:
+./testdata/language-features/basic-values/lambda02.reject.lc:1:1:
 unexpected 'f'
-expecting end of input or operator definition
+expecting end of input or operator definition
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/lambda03.out b/testdata/language-features/basic-values/lambda03.out
index a50ed0d0..f19a4176 100644
--- a/testdata/language-features/basic-values/lambda03.out
+++ b/testdata/language-features/basic-values/lambda03.out
@@ -10,11 +10,11 @@ fun1 = \a b c -> _rhs \_ d _ -> d
 fun2 :: forall a b c d . a -> b -> c -> d -> a
 fun2 = \a b c d e -> _rhs \_ _ _ -> e
 ------------ tooltips
-lambda03.lc 1:1-1:5
+1:1-1:5
     forall a b c . a -> b -> c -> b
-lambda03.lc 1:22-1:23
+1:22-1:23
     _d
-lambda03.lc 2:1-2:5
+2:1-2:5
     forall a b c d . a -> b -> c -> d -> a
-lambda03.lc 2:25-2:26
+2:25-2:26
     _h
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/let01.out b/testdata/language-features/basic-values/let01.out
index 1d5684fc..bf6cefec 100644
--- a/testdata/language-features/basic-values/let01.out
+++ b/testdata/language-features/basic-values/let01.out
@@ -25,37 +25,37 @@ value4 = \a b -> _rhs (fromInt a b 1)
 value5 :: forall a . Num a => a
 value5 = \a b -> _rhs (fromInt a b 1)
 ------------ tooltips
-let01.lc 1:1-1:7
+1:1-1:7
     forall a . Num a => a
-let01.lc 1:18-1:19
+1:18-1:19
     _b
-let01.lc 1:23-1:24
+1:23-1:24
     _b
-let01.lc 3:1-3:7
+3:1-3:7
     forall a . Num a => a
-let01.lc 4:11-4:12
+4:11-4:12
     _b
-let01.lc 5:6-5:7
+5:6-5:7
     _b
-let01.lc 7:1-7:7
+7:1-7:7
     forall a . Num a => a
-let01.lc 8:11-8:12
+8:11-8:12
     _b
-let01.lc 9:11-9:14
+9:11-9:14
     Char
-let01.lc 10:6-10:7
+10:6-10:7
     _b
-let01.lc 12:1-12:7
+12:1-12:7
     forall a . Num a => a
-let01.lc 12:18-12:19
+12:18-12:19
     _b
-let01.lc 13:13-13:14
+13:13-13:14
     _b
-let01.lc 15:1-15:7
+15:1-15:7
     forall a . Num a => a
-let01.lc 15:18-15:19
+15:18-15:19
     _b
-let01.lc 16:18-16:19
+16:18-16:19
     _b
-let01.lc 17:13-17:14
+17:13-17:14
     _b
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/let02.out b/testdata/language-features/basic-values/let02.out
index 7ac6a6d8..15152bf3 100644
--- a/testdata/language-features/basic-values/let02.out
+++ b/testdata/language-features/basic-values/let02.out
@@ -11,21 +11,21 @@ value
 value :: ()
 value = _rhs ()
 ------------ tooltips
-let02.lc 1:1-1:6
+1:1-1:6
     ()
-let02.lc 2:11-2:13
+2:11-2:13
     ()
-let02.lc 3:19-3:22
+3:19-3:22
     Char
-let02.lc 3:26-3:28
+3:26-3:28
     ()
-let02.lc 5:17-5:19
+5:17-5:19
     ()
-let02.lc 6:17-6:18
+6:17-6:18
     _b
-let02.lc 7:17-7:24
+7:17-7:24
     String
-let02.lc 8:12-8:15
+8:12-8:15
     Char
-let02.lc 9:6-9:8
+9:6-9:8
     ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/literal01.out b/testdata/language-features/basic-values/literal01.out
index d7964d5e..64365818 100644
--- a/testdata/language-features/basic-values/literal01.out
+++ b/testdata/language-features/basic-values/literal01.out
@@ -40,35 +40,35 @@ stringValue1 = _rhs "Hello World"
 stringValue2 :: String
 stringValue2 = _rhs "\nHello World\tagain!\r\n"
 ------------ tooltips
-literal01.lc 1:1-1:10
+1:1-1:10
     forall a . Num a => a
-literal01.lc 1:13-1:14
+1:13-1:14
     _b
-literal01.lc 2:1-2:10
+2:1-2:10
     forall a . Num a => a
-literal01.lc 2:13-2:14
+2:13-2:14
     _b
-literal01.lc 3:1-3:10
+3:1-3:10
     forall a . Num a => a
-literal01.lc 3:13-3:18
+3:13-3:18
     _b
-literal01.lc 5:1-5:12
+5:1-5:12
     Float
-literal01.lc 5:15-5:18
+5:15-5:18
     Float
-literal01.lc 6:1-6:12
+6:1-6:12
     Float
-literal01.lc 6:15-6:22
+6:15-6:22
     Float
-literal01.lc 8:1-8:10
+8:1-8:10
     Char
-literal01.lc 8:13-8:16
+8:13-8:16
     Char
-literal01.lc 10:1-10:13
+10:1-10:13
     String
-literal01.lc 10:16-10:29
+10:16-10:29
     String
-literal01.lc 11:1-11:13
+11:1-11:13
     String
-literal01.lc 11:16-11:45
+11:16-11:45
     String
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/operator01.out b/testdata/language-features/basic-values/operator01.out
index 0a4d4546..2ad007f3 100644
--- a/testdata/language-features/basic-values/operator01.out
+++ b/testdata/language-features/basic-values/operator01.out
@@ -20,19 +20,19 @@ $$$ = \a b _ _ -> _rhs ()
 $$$# :: forall a b . a -> b -> ()
 $$$# = \a b _ _ -> _rhs ()
 ------------ tooltips
-operator01.lc 1:3-1:6
+1:3-1:6
     forall a b . a -> b -> ()
-operator01.lc 1:11-1:13
+1:11-1:13
     ()
-operator01.lc 3:3-3:6
+3:3-3:6
     forall a b . a -> b -> ()
-operator01.lc 3:8-3:10
+3:8-3:10
     ()
-operator01.lc 5:3-5:7
+5:3-5:7
     forall a b . a -> b -> ()
-operator01.lc 6:3-6:5
+6:3-6:5
     ()
-operator01.lc 8:3-8:6
+8:3-8:6
     forall a b . a -> b -> ()
-operator01.lc 8:11-8:13
+8:11-8:13
     ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/operator02.reject.out b/testdata/language-features/basic-values/operator02.reject.out
index d45a726c..f0c16207 100644
--- a/testdata/language-features/basic-values/operator02.reject.out
+++ b/testdata/language-features/basic-values/operator02.reject.out
@@ -1,29 +1,29 @@
-already defined #$# at operator02.reject.lc:3:3:
+already defined #$# at ./testdata/language-features/basic-values/operator02.reject.lc:3:3:
 a #$# b = ()
   ^^^
-and at operator02.reject.lc:1:3:
+and at ./testdata/language-features/basic-values/operator02.reject.lc:1:3:
 a #$# b = ()
   ^^^
 ------------ trace
 (#$#) :: forall a b . a -> b -> ()
 fun :: forall a . a -> ()
 (#$#) :: forall a b . a -> b -> ()
-!already defined #$# at operator02.reject.lc:3:3:
+!already defined #$# at ./testdata/language-features/basic-values/operator02.reject.lc:3:3:
 a #$# b = ()
   ^^^
-and at operator02.reject.lc:1:3:
+and at ./testdata/language-features/basic-values/operator02.reject.lc:1:3:
 a #$# b = ()
   ^^^
 ------------ tooltips
-operator02.reject.lc 1:3-1:6
+1:3-1:6
     forall a b . a -> b -> ()
-operator02.reject.lc 1:11-1:13
+1:11-1:13
     ()
-operator02.reject.lc 2:1-2:4
+2:1-2:4
     forall a . a -> ()
-operator02.reject.lc 2:9-2:11
+2:9-2:11
     ()
-operator02.reject.lc 3:3-3:6
+3:3-3:6
     forall a b . a -> b -> ()
-operator02.reject.lc 3:11-3:13
+3:11-3:13
     ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/operator03.reject.out b/testdata/language-features/basic-values/operator03.reject.out
index 33fc2e25..062e8901 100644
--- a/testdata/language-features/basic-values/operator03.reject.out
+++ b/testdata/language-features/basic-values/operator03.reject.out
@@ -1,3 +1,3 @@
-testdata/language-features/basic-values/operator03.reject.lc:1:1:
+./testdata/language-features/basic-values/operator03.reject.lc:1:1:
 unexpected 'a'
-expecting end of input or operator definition
+expecting end of input or operator definition
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/operator04.reject.out b/testdata/language-features/basic-values/operator04.reject.out
index 824c8074..8198712e 100644
--- a/testdata/language-features/basic-values/operator04.reject.out
+++ b/testdata/language-features/basic-values/operator04.reject.out
@@ -1,3 +1,3 @@
-testdata/language-features/basic-values/operator04.reject.lc:1:1:
+./testdata/language-features/basic-values/operator04.reject.lc:1:1:
 unexpected 'a'
-expecting end of input or operator definition
+expecting end of input or operator definition
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/operator05.out b/testdata/language-features/basic-values/operator05.out
index cc714c3a..de468c17 100644
--- a/testdata/language-features/basic-values/operator05.out
+++ b/testdata/language-features/basic-values/operator05.out
@@ -6,17 +6,17 @@ value1
 value1 :: ()
 value1 = _rhs ()
 ------------ tooltips
-operator05.lc 1:1-1:7
+1:1-1:7
     ()
-operator05.lc 1:24-1:26
+1:24-1:26
     ()
-operator05.lc 2:13-2:15
+2:13-2:15
     ()
-operator05.lc 2:13-2:19
+2:13-2:19
     _a -> ()
-operator05.lc 2:13-2:22
+2:13-2:22
     ()
-operator05.lc 2:16-2:19
+2:16-2:19
     forall a b . a -> b -> ()
-operator05.lc 2:20-2:22
+2:20-2:22
     ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/operator06.out b/testdata/language-features/basic-values/operator06.out
index de7def09..4f0031ce 100644
--- a/testdata/language-features/basic-values/operator06.out
+++ b/testdata/language-features/basic-values/operator06.out
@@ -6,17 +6,17 @@ value1
 value1 :: ()
 value1 = _rhs ()
 ------------ tooltips
-operator06.lc 1:1-1:7
+1:1-1:7
     ()
-operator06.lc 1:10-1:12
+1:10-1:12
     ()
-operator06.lc 1:10-1:16
+1:10-1:16
     _a -> ()
-operator06.lc 1:10-1:19
+1:10-1:19
     ()
-operator06.lc 1:13-1:16
+1:13-1:16
     forall a b . a -> b -> ()
-operator06.lc 1:17-1:19
+1:17-1:19
     ()
-operator06.lc 2:19-2:21
+2:19-2:21
     ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/operator07.reject.out b/testdata/language-features/basic-values/operator07.reject.out
index c2452fc4..cfe51f5c 100644
--- a/testdata/language-features/basic-values/operator07.reject.out
+++ b/testdata/language-features/basic-values/operator07.reject.out
@@ -1,7 +1,7 @@
 Operator precedences don't match:
-infix 5 at operator07.reject.lc:11:11:
+infix 5 at ./testdata/language-features/basic-values/operator07.reject.lc:11:11:
 main = () @&> () <@& ()
           ^^^
-infixl 5 at operator07.reject.lc:11:18:
+infixl 5 at ./testdata/language-features/basic-values/operator07.reject.lc:11:18:
 main = () @&> () <@& ()
                  ^^^
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/operator08.reject.out b/testdata/language-features/basic-values/operator08.reject.out
index 85b9a762..1f478dad 100644
--- a/testdata/language-features/basic-values/operator08.reject.out
+++ b/testdata/language-features/basic-values/operator08.reject.out
@@ -1,7 +1,7 @@
 Operator precedences don't match:
-infix 5 at operator08.reject.lc:10:6:
+infix 5 at ./testdata/language-features/basic-values/operator08.reject.lc:10:6:
 x = (@&> () <@& ())
      ^^^
-infixl 5 at operator08.reject.lc:10:13:
+infixl 5 at ./testdata/language-features/basic-values/operator08.reject.lc:10:13:
 x = (@&> () <@& ())
             ^^^
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/redefine01.reject.out b/testdata/language-features/basic-values/redefine01.reject.out
index 8f8e4dd2..2d00889e 100644
--- a/testdata/language-features/basic-values/redefine01.reject.out
+++ b/testdata/language-features/basic-values/redefine01.reject.out
@@ -1,29 +1,29 @@
-already defined unit at redefine01.reject.lc:3:1:
+already defined unit at ./testdata/language-features/basic-values/redefine01.reject.lc:3:1:
 unit = ()
 ^^^^
-and at redefine01.reject.lc:1:1:
+and at ./testdata/language-features/basic-values/redefine01.reject.lc:1:1:
 unit = ()
 ^^^^
 ------------ trace
 unit :: ()
 tuple :: ()
 unit :: ()
-!already defined unit at redefine01.reject.lc:3:1:
+!already defined unit at ./testdata/language-features/basic-values/redefine01.reject.lc:3:1:
 unit = ()
 ^^^^
-and at redefine01.reject.lc:1:1:
+and at ./testdata/language-features/basic-values/redefine01.reject.lc:1:1:
 unit = ()
 ^^^^
 ------------ tooltips
-redefine01.reject.lc 1:1-1:5
+1:1-1:5
     ()
-redefine01.reject.lc 1:8-1:10
+1:8-1:10
     ()
-redefine01.reject.lc 2:1-2:6
+2:1-2:6
     ()
-redefine01.reject.lc 2:9-2:11
+2:9-2:11
     ()
-redefine01.reject.lc 3:1-3:5
+3:1-3:5
     ()
-redefine01.reject.lc 3:8-3:10
+3:8-3:10
     ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/redefine02.reject.out b/testdata/language-features/basic-values/redefine02.reject.out
index 2d75ac18..2daaf755 100644
--- a/testdata/language-features/basic-values/redefine02.reject.out
+++ b/testdata/language-features/basic-values/redefine02.reject.out
@@ -1,9 +1,9 @@
-testdata/language-features/basic-values/redefine02.reject.lc:3:8:
+./testdata/language-features/basic-values/redefine02.reject.lc:3:8:
 expecting expression
 redefined x:
-redefine02.reject.lc:1:12:
+./testdata/language-features/basic-values/redefine02.reject.lc:1:12:
 unit = let x = ()
            ^
-redefine02.reject.lc:2:12:
+./testdata/language-features/basic-values/redefine02.reject.lc:2:12:
            x = ()
            ^
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/redefine03.reject.out b/testdata/language-features/basic-values/redefine03.reject.out
index 6cae5486..8dbe5de7 100644
--- a/testdata/language-features/basic-values/redefine03.reject.out
+++ b/testdata/language-features/basic-values/redefine03.reject.out
@@ -1,8 +1,8 @@
-testdata/language-features/basic-values/redefine03.reject.lc:4:1:
+./testdata/language-features/basic-values/redefine03.reject.lc:4:1:
 redefined x:
-redefine03.reject.lc:2:9:
+./testdata/language-features/basic-values/redefine03.reject.lc:2:9:
   where x = ()
         ^
-redefine03.reject.lc:3:9:
+./testdata/language-features/basic-values/redefine03.reject.lc:3:9:
         x = ()
         ^
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/shadowing01.out b/testdata/language-features/basic-values/shadowing01.out
index 3d67cf8e..e6fcca49 100644
--- a/testdata/language-features/basic-values/shadowing01.out
+++ b/testdata/language-features/basic-values/shadowing01.out
@@ -16,25 +16,25 @@ value
 value :: Char
 value = _rhs '7'
 ------------ tooltips
-shadowing01.lc 1:1-1:6
+1:1-1:6
     Char
-shadowing01.lc 2:11-2:14
+2:11-2:14
     Char
-shadowing01.lc 3:11-3:18
+3:11-3:18
     String
-shadowing01.lc 5:17-5:18
+5:17-5:18
     _b
-shadowing01.lc 6:17-6:21
+6:17-6:21
     Float
-shadowing01.lc 7:25-7:27
+7:25-7:27
     ()
-shadowing01.lc 8:25-8:28
+8:25-8:28
     Char
-shadowing01.lc 9:25-9:29
+9:25-9:29
     Float
-shadowing01.lc 10:20-10:27
+10:20-10:27
     String
-shadowing01.lc 11:14-11:16
+11:14-11:16
     ()
-shadowing01.lc 12:6-12:9
+12:6-12:9
     Char
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/shadowing02.out b/testdata/language-features/basic-values/shadowing02.out
index 0149e67b..f90c2b5b 100644
--- a/testdata/language-features/basic-values/shadowing02.out
+++ b/testdata/language-features/basic-values/shadowing02.out
@@ -27,37 +27,37 @@ value2 = _rhs '7'
 world :: String
 world = _rhs "world"
 ------------ tooltips
-shadowing02.lc 1:1-1:2
+1:1-1:2
     forall a . Num a => a
-shadowing02.lc 1:5-1:6
+1:5-1:6
     _b
-shadowing02.lc 2:1-2:6
+2:1-2:6
     String
-shadowing02.lc 2:9-2:16
+2:9-2:16
     String
-shadowing02.lc 3:1-3:7
+3:1-3:7
     Char
-shadowing02.lc 4:11-4:14
+4:11-4:14
     Char
-shadowing02.lc 5:11-5:18
+5:11-5:18
     String
-shadowing02.lc 6:11-6:14
+6:11-6:14
     _b
-shadowing02.lc 8:17-8:18
+8:17-8:18
     _b
-shadowing02.lc 9:17-9:21
+9:17-9:21
     Float
-shadowing02.lc 10:25-10:27
+10:25-10:27
     ()
-shadowing02.lc 11:25-11:28
+11:25-11:28
     Char
-shadowing02.lc 12:25-12:29
+12:25-12:29
     Float
-shadowing02.lc 13:25-13:26
+13:25-13:26
     forall a . Num a => a
-shadowing02.lc 14:20-14:25
+14:20-14:25
     String
-shadowing02.lc 15:14-15:16
+15:14-15:16
     ()
-shadowing02.lc 16:6-16:9
+16:6-16:9
     Char
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/shadowing03.out b/testdata/language-features/basic-values/shadowing03.out
index 1fe98417..fec1478e 100644
--- a/testdata/language-features/basic-values/shadowing03.out
+++ b/testdata/language-features/basic-values/shadowing03.out
@@ -5,7 +5,7 @@ x = _lhs x \(_ :: _) (_ :: _) -> _rhs ()
 x :: forall a b . a -> b -> ()
 x = \a b _ _ -> _rhs ()
 ------------ tooltips
-shadowing03.lc 1:1-1:2
+1:1-1:2
     forall a b . a -> b -> ()
-shadowing03.lc 1:9-1:11
+1:9-1:11
     ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/shadowing04.out b/testdata/language-features/basic-values/shadowing04.out
index 1c371cea..8a46bd9d 100644
--- a/testdata/language-features/basic-values/shadowing04.out
+++ b/testdata/language-features/basic-values/shadowing04.out
@@ -5,7 +5,7 @@ __ = _lhs __ \(_ :: _) (_ :: _) -> _rhs ()
 __ :: forall a b . a -> b -> ()
 __ = \a b _ _ -> _rhs ()
 ------------ tooltips
-shadowing04.lc 1:1-1:3
+1:1-1:3
     forall a b . a -> b -> ()
-shadowing04.lc 1:11-1:13
+1:11-1:13
     ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/tuple01.out b/testdata/language-features/basic-values/tuple01.out
index ef606dab..dd3b4d67 100644
--- a/testdata/language-features/basic-values/tuple01.out
+++ b/testdata/language-features/basic-values/tuple01.out
@@ -5,7 +5,7 @@ unit = _lhs unit (_rhs ())
 unit :: ()
 unit = _rhs ()
 ------------ tooltips
-tuple01.lc 1:1-1:5
+1:1-1:5
     ()
-tuple01.lc 1:8-1:10
+1:8-1:10
     ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/tuple02.out b/testdata/language-features/basic-values/tuple02.out
index c1561406..b906f1f6 100644
--- a/testdata/language-features/basic-values/tuple02.out
+++ b/testdata/language-features/basic-values/tuple02.out
@@ -15,43 +15,43 @@ tuple2 = _rhs ((), ())
 tuple3 :: ((String, Char), ())
 tuple3 = _rhs (("name", 'c'), ())
 ------------ tooltips
-tuple02.lc 1:1-1:7
+1:1-1:7
     forall a . Num a => (a, Float, Char, String, ())
-tuple02.lc 1:10-1:33
+1:10-1:33
     (_b, Float, Char, String, ())
-tuple02.lc 1:11-1:12
+1:11-1:12
     _b
-tuple02.lc 1:13-1:16
+1:13-1:16
     Float
-tuple02.lc 1:13-1:32
+1:13-1:32
     (Float, Char, String, ())
-tuple02.lc 1:17-1:20
+1:17-1:20
     Char
-tuple02.lc 1:17-1:32
+1:17-1:32
     (Char, String, ())
-tuple02.lc 1:21-1:29
+1:21-1:29
     String
-tuple02.lc 1:21-1:32
+1:21-1:32
     (String, ())
-tuple02.lc 1:30-1:32
+1:30-1:32
     () | ((()))
-tuple02.lc 3:1-3:7
+3:1-3:7
     ((), ())
-tuple02.lc 3:10-3:17
+3:10-3:17
     ((), ())
-tuple02.lc 3:11-3:13
+3:11-3:13
     ()
-tuple02.lc 3:14-3:16
+3:14-3:16
     () | ((()))
-tuple02.lc 5:1-5:7
+5:1-5:7
     ((String, Char), ())
-tuple02.lc 5:10-5:27
+5:10-5:27
     ((String, Char), ())
-tuple02.lc 5:11-5:23
+5:11-5:23
     (String, Char)
-tuple02.lc 5:12-5:18
+5:12-5:18
     String
-tuple02.lc 5:19-5:22
+5:19-5:22
     Char | ((Char))
-tuple02.lc 5:24-5:26
+5:24-5:26
     () | ((()))
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/typesig01.out b/testdata/language-features/basic-values/typesig01.out
index 99b776c7..9b0e093a 100644
--- a/testdata/language-features/basic-values/typesig01.out
+++ b/testdata/language-features/basic-values/typesig01.out
@@ -12,15 +12,15 @@ value1 = _rhs 'a'
 value2 :: Char
 value2 = _rhs 'a'
 ------------ tooltips
-typesig01.lc 1:11-1:15
+1:11-1:15
     Type
-typesig01.lc 2:1-2:7
+2:1-2:7
     Char
-typesig01.lc 2:10-2:13
+2:10-2:13
     Char
-typesig01.lc 4:9-4:13
+4:9-4:13
     Type
-typesig01.lc 5:1-5:7
+5:1-5:7
     Char
-typesig01.lc 5:8-5:11
+5:8-5:11
     Char
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/typesig02.out b/testdata/language-features/basic-values/typesig02.out
index 4380458d..bdf86f12 100644
--- a/testdata/language-features/basic-values/typesig02.out
+++ b/testdata/language-features/basic-values/typesig02.out
@@ -10,15 +10,15 @@ value1 = _rhs 'a'
 value2 :: Char
 value2 = _rhs 'a'
 ------------ tooltips
-typesig02.lc 1:1-1:7
+1:1-1:7
     Char
-typesig02.lc 1:10-1:13
+1:10-1:13
     Char
-typesig02.lc 1:17-1:21
+1:17-1:21
     Type
-typesig02.lc 3:1-3:7
+3:1-3:7
     Char
-typesig02.lc 3:8-3:11
+3:8-3:11
     Char
-typesig02.lc 3:13-3:17
+3:13-3:17
     Type
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/typesig03.out b/testdata/language-features/basic-values/typesig03.out
index 0ccb0844..e934b855 100644
--- a/testdata/language-features/basic-values/typesig03.out
+++ b/testdata/language-features/basic-values/typesig03.out
@@ -12,39 +12,39 @@ fun1 = \_ _ _ _ _ _ -> _rhs ()
 fun2 :: forall a b c . a -> b -> c -> ()
 fun2 = \_ _ _ _ _ _ -> _rhs ()
 ------------ tooltips
-typesig03.lc 1:9-1:10
+1:9-1:10
     _f
-typesig03.lc 1:9-1:26
+1:9-1:26
     Type | Type | Type
-typesig03.lc 1:14-1:15
+1:14-1:15
     _e
-typesig03.lc 1:14-1:26
+1:14-1:26
     Type
-typesig03.lc 1:19-1:20
+1:19-1:20
     _d
-typesig03.lc 1:19-1:26
+1:19-1:26
     Type
-typesig03.lc 1:24-1:26
+1:24-1:26
     Type | Type
-typesig03.lc 2:1-2:5
+2:1-2:5
     forall a b c . a -> b -> c -> ()
-typesig03.lc 2:14-2:16
+2:14-2:16
     ()
-typesig03.lc 4:7-4:8
+4:7-4:8
     _f
-typesig03.lc 4:7-4:18
+4:7-4:18
     Type | Type | Type
-typesig03.lc 4:10-4:11
+4:10-4:11
     _e
-typesig03.lc 4:10-4:18
+4:10-4:18
     Type
-typesig03.lc 4:13-4:14
+4:13-4:14
     _d
-typesig03.lc 4:13-4:18
+4:13-4:18
     Type
-typesig03.lc 4:16-4:18
+4:16-4:18
     Type | Type
-typesig03.lc 5:1-5:5
+5:1-5:5
     forall a b c . a -> b -> c -> ()
-typesig03.lc 5:14-5:16
+5:14-5:16
     ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/typesig04.out b/testdata/language-features/basic-values/typesig04.out
index 216b50b5..448f9dea 100644
--- a/testdata/language-features/basic-values/typesig04.out
+++ b/testdata/language-features/basic-values/typesig04.out
@@ -12,35 +12,35 @@ fun1 = \_ _ _ _ _ -> _rhs ()
 fun2 :: forall a b c . a -> (b -> c) -> ()
 fun2 = \_ _ _ _ _ -> _rhs ()
 ------------ tooltips
-typesig04.lc 1:9-1:10
+1:9-1:10
     _f
-typesig04.lc 1:9-1:28
+1:9-1:28
     Type | Type | Type
-typesig04.lc 1:14-1:28
+1:14-1:28
     Type
-typesig04.lc 1:15-1:16
+1:15-1:16
     _e
-typesig04.lc 1:20-1:21
+1:20-1:21
     _d | Type
-typesig04.lc 1:26-1:28
+1:26-1:28
     Type | Type
-typesig04.lc 2:1-2:5
+2:1-2:5
     forall a b c . a -> (b -> c) -> ()
-typesig04.lc 2:12-2:14
+2:12-2:14
     ()
-typesig04.lc 4:7-4:8
+4:7-4:8
     _f
-typesig04.lc 4:7-4:20
+4:7-4:20
     Type | Type | Type
-typesig04.lc 4:10-4:20
+4:10-4:20
     Type
-typesig04.lc 4:11-4:12
+4:11-4:12
     _e
-typesig04.lc 4:14-4:15
+4:14-4:15
     _d | Type
-typesig04.lc 4:18-4:20
+4:18-4:20
     Type | Type
-typesig04.lc 5:1-5:5
+5:1-5:5
     forall a b c . a -> (b -> c) -> ()
-typesig04.lc 5:12-5:14
+5:12-5:14
     ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/typesig05.out b/testdata/language-features/basic-values/typesig05.out
index 68ed5a37..d93eaa07 100644
--- a/testdata/language-features/basic-values/typesig05.out
+++ b/testdata/language-features/basic-values/typesig05.out
@@ -32,67 +32,67 @@ value3 = _rhs 'a'
 value4 :: String
 value4 = _rhs "b"
 ------------ tooltips
-typesig05.lc 1:1-1:5
+1:1-1:5
     forall a b . a -> b -> a
-typesig05.lc 1:12-1:13
+1:12-1:13
     _d
-typesig05.lc 2:1-2:5
+2:1-2:5
     forall a b . a -> b -> b
-typesig05.lc 2:12-2:13
+2:12-2:13
     _b
-typesig05.lc 4:1-4:7
+4:1-4:7
     Char
-typesig05.lc 4:10-4:14
+4:10-4:14
     forall a b . a -> b -> a
-typesig05.lc 4:10-4:18
+4:10-4:18
     _a -> Char
-typesig05.lc 4:10-4:22
+4:10-4:22
     Char
-typesig05.lc 4:15-4:18
+4:15-4:18
     Char
-typesig05.lc 4:19-4:22
+4:19-4:22
     String
-typesig05.lc 4:26-4:30
+4:26-4:30
     Type
-typesig05.lc 5:1-5:7
+5:1-5:7
     String
-typesig05.lc 5:10-5:14
+5:10-5:14
     forall a b . a -> b -> b
-typesig05.lc 5:10-5:18
+5:10-5:18
     _a -> _a
-typesig05.lc 5:10-5:22
+5:10-5:22
     String
-typesig05.lc 5:15-5:18
+5:15-5:18
     Char
-typesig05.lc 5:19-5:22
+5:19-5:22
     String
-typesig05.lc 5:26-5:32
+5:26-5:32
     Type
-typesig05.lc 7:11-7:15
+7:11-7:15
     Type
-typesig05.lc 8:1-8:7
+8:1-8:7
     Char
-typesig05.lc 8:10-8:14
+8:10-8:14
     forall a b . a -> b -> a
-typesig05.lc 8:10-8:18
+8:10-8:18
     _a -> Char
-typesig05.lc 8:10-8:22
+8:10-8:22
     Char
-typesig05.lc 8:15-8:18
+8:15-8:18
     Char
-typesig05.lc 8:19-8:22
+8:19-8:22
     String
-typesig05.lc 10:11-10:17
+10:11-10:17
     Type
-typesig05.lc 11:1-11:7
+11:1-11:7
     String
-typesig05.lc 11:10-11:14
+11:10-11:14
     forall a b . a -> b -> b
-typesig05.lc 11:10-11:18
+11:10-11:18
     _a -> _a
-typesig05.lc 11:10-11:22
+11:10-11:22
     String
-typesig05.lc 11:15-11:18
+11:15-11:18
     Char
-typesig05.lc 11:19-11:22
+11:19-11:22
     String
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/typesig06.out b/testdata/language-features/basic-values/typesig06.out
index c0d085a4..eac324c3 100644
--- a/testdata/language-features/basic-values/typesig06.out
+++ b/testdata/language-features/basic-values/typesig06.out
@@ -20,39 +20,39 @@ value1 = _rhs "hi"
 value2 :: String
 value2 = _rhs "hi"
 ------------ tooltips
-typesig06.lc 1:1-1:5
+1:1-1:5
     forall a b . a -> b -> a
-typesig06.lc 1:12-1:13
+1:12-1:13
     _d
-typesig06.lc 2:3-2:5
+2:3-2:5
     forall a b . a -> b -> a
-typesig06.lc 2:10-2:11
+2:10-2:11
     _d
-typesig06.lc 4:1-4:7
+4:1-4:7
     String
-typesig06.lc 4:10-4:14
+4:10-4:14
     String
-typesig06.lc 4:10-4:17
+4:10-4:17
     _a -> String
-typesig06.lc 4:10-4:21
+4:10-4:21
     String
-typesig06.lc 4:15-4:17
+4:15-4:17
     forall a b . a -> b -> a
-typesig06.lc 4:18-4:21
+4:18-4:21
     Float
-typesig06.lc 4:25-4:31
+4:25-4:31
     Type
-typesig06.lc 5:1-5:7
+5:1-5:7
     String
-typesig06.lc 5:10-5:14
+5:10-5:14
     String
-typesig06.lc 5:10-5:21
+5:10-5:21
     _a -> String
-typesig06.lc 5:10-5:25
+5:10-5:25
     String
-typesig06.lc 5:15-5:21
+5:15-5:21
     forall a b . a -> b -> a
-typesig06.lc 5:22-5:25
+5:22-5:25
     Float
-typesig06.lc 5:29-5:35
+5:29-5:35
     Type
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/typesig07.out b/testdata/language-features/basic-values/typesig07.out
index 61b2b2ec..4e46209b 100644
--- a/testdata/language-features/basic-values/typesig07.out
+++ b/testdata/language-features/basic-values/typesig07.out
@@ -36,37 +36,37 @@ value4 = \_ _ -> _rhs ()
 value6 :: () -> () -> ()
 value6 = \_ _ -> _rhs ()
 ------------ tooltips
-typesig07.lc 1:27-1:30
+1:27-1:30
     Type | Type | Type
-typesig07.lc 3:1-3:7
+3:1-3:7
     Int
-typesig07.lc 3:10-3:11
+3:10-3:11
     _b
-typesig07.lc 4:1-4:7
+4:1-4:7
     Int
-typesig07.lc 4:10-4:11
+4:10-4:11
     _b
-typesig07.lc 5:1-5:7
+5:1-5:7
     Int
-typesig07.lc 5:10-5:11
+5:10-5:11
     _b
-typesig07.lc 8:12-8:14
+8:12-8:14
     Type | Type | Type
-typesig07.lc 8:18-8:20
+8:18-8:20
     Type | Type | Type
-typesig07.lc 8:18-8:26
+8:18-8:26
     Type | Type | Type
-typesig07.lc 8:24-8:26
+8:24-8:26
     Type | Type | Type | Type | Type | Type
-typesig07.lc 10:1-10:7
+10:1-10:7
     () -> () -> ()
-typesig07.lc 10:14-10:16
+10:14-10:16
     ()
-typesig07.lc 11:3-11:6
+11:3-11:6
     () -> () -> ()
-typesig07.lc 11:11-11:13
+11:11-11:13
     ()
-typesig07.lc 12:1-12:7
+12:1-12:7
     () -> () -> ()
-typesig07.lc 12:14-12:16
+12:14-12:16
     ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/typesig08.reject.out b/testdata/language-features/basic-values/typesig08.reject.out
index 99f1866b..3b56a757 100644
--- a/testdata/language-features/basic-values/typesig08.reject.out
+++ b/testdata/language-features/basic-values/typesig08.reject.out
@@ -1,3 +1,3 @@
-testdata/language-features/basic-values/typesig08.reject.lc:1:1:
+./testdata/language-features/basic-values/typesig08.reject.lc:1:1:
 unexpected 'v'
-expecting end of input or typed ident
+expecting end of input or typed ident
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/typesig09.reject.out b/testdata/language-features/basic-values/typesig09.reject.out
index 6d788b9c..590d00a8 100644
--- a/testdata/language-features/basic-values/typesig09.reject.out
+++ b/testdata/language-features/basic-values/typesig09.reject.out
@@ -1,3 +1,3 @@
-testdata/language-features/basic-values/typesig09.reject.lc:1:1:
+./testdata/language-features/basic-values/typesig09.reject.lc:1:1:
 unexpected 'v'
-expecting end of input or typed ident
+expecting end of input or typed ident
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/typesyn01.out b/testdata/language-features/basic-values/typesyn01.out
index df1cfb53..78069fe1 100644
--- a/testdata/language-features/basic-values/typesyn01.out
+++ b/testdata/language-features/basic-values/typesyn01.out
@@ -5,7 +5,7 @@ main is not found
 'MyUnit :: Type
 'MyUnit = _rhs ' ()
 ------------ tooltips
-typesyn01.lc 1:6-1:12
+1:6-1:12
     Type
-typesyn01.lc 1:15-1:17
+1:15-1:17
     Type
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/typesyn02.out b/testdata/language-features/basic-values/typesyn02.out
index 60d36933..6d92fe96 100644
--- a/testdata/language-features/basic-values/typesyn02.out
+++ b/testdata/language-features/basic-values/typesyn02.out
@@ -11,21 +11,21 @@ fun = _lhs fun \(_ :: _) (a :: _) -> hlistNilCase _ (_rhs ()) a
 fun :: forall a . a -> MyUnit -> ()
 fun = \_ _ a -> hlistNilCase ' () (_rhs ()) a
 ------------ tooltips
-typesyn02.lc 1:6-1:12
+1:6-1:12
     Type
-typesyn02.lc 1:15-1:17
+1:15-1:17
     Type
-typesyn02.lc 3:8-3:9
+3:8-3:9
     _b
-typesyn02.lc 3:8-3:29
+3:8-3:29
     Type
-typesyn02.lc 3:13-3:19
+3:13-3:19
     Type
-typesyn02.lc 3:13-3:29
+3:13-3:29
     Type
-typesyn02.lc 3:23-3:29
+3:23-3:29
     Type | Type
-typesyn02.lc 4:1-4:4
+4:1-4:4
     forall a . a -> MyUnit -> ()
-typesyn02.lc 4:12-4:14
+4:12-4:14
     () | ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/typesyn03.reject.out b/testdata/language-features/basic-values/typesyn03.reject.out
index 692e020f..c93411e6 100644
--- a/testdata/language-features/basic-values/typesyn03.reject.out
+++ b/testdata/language-features/basic-values/typesyn03.reject.out
@@ -1,24 +1,24 @@
-already defined 'MyUnit at typesyn03.reject.lc:2:6:
+already defined 'MyUnit at ./testdata/language-features/basic-values/typesyn03.reject.lc:2:6:
 type MyUnit = ()
      ^^^^^^
-and at typesyn03.reject.lc:1:6:
+and at ./testdata/language-features/basic-values/typesyn03.reject.lc:1:6:
 type MyUnit = ()
      ^^^^^^
 ------------ trace
 'MyUnit :: Type
 'MyUnit :: Type
-!already defined 'MyUnit at typesyn03.reject.lc:2:6:
+!already defined 'MyUnit at ./testdata/language-features/basic-values/typesyn03.reject.lc:2:6:
 type MyUnit = ()
      ^^^^^^
-and at typesyn03.reject.lc:1:6:
+and at ./testdata/language-features/basic-values/typesyn03.reject.lc:1:6:
 type MyUnit = ()
      ^^^^^^
 ------------ tooltips
-typesyn03.reject.lc 1:6-1:12
+1:6-1:12
     Type
-typesyn03.reject.lc 1:15-1:17
+1:15-1:17
     Type
-typesyn03.reject.lc 2:6-2:12
+2:6-2:12
     Type
-typesyn03.reject.lc 2:15-2:17
+2:15-2:17
     Type
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/typesyn04.reject.out b/testdata/language-features/basic-values/typesyn04.reject.out
index 3ad7f8a7..3979ab13 100644
--- a/testdata/language-features/basic-values/typesyn04.reject.out
+++ b/testdata/language-features/basic-values/typesyn04.reject.out
@@ -1,24 +1,24 @@
-already defined 'MyUnit at typesyn04.reject.lc:2:6:
+already defined 'MyUnit at ./testdata/language-features/basic-values/typesyn04.reject.lc:2:6:
 type MyUnit = ()
      ^^^^^^
-and at typesyn04.reject.lc:1:6:
+and at ./testdata/language-features/basic-values/typesyn04.reject.lc:1:6:
 type MyUnit = ()
      ^^^^^^
 ------------ trace
 'MyUnit :: Type
 'MyUnit :: Type
-!already defined 'MyUnit at typesyn04.reject.lc:2:6:
+!already defined 'MyUnit at ./testdata/language-features/basic-values/typesyn04.reject.lc:2:6:
 type MyUnit = ()
      ^^^^^^
-and at typesyn04.reject.lc:1:6:
+and at ./testdata/language-features/basic-values/typesyn04.reject.lc:1:6:
 type MyUnit = ()
      ^^^^^^
 ------------ tooltips
-typesyn04.reject.lc 1:6-1:12
+1:6-1:12
     Type
-typesyn04.reject.lc 1:15-1:17
+1:15-1:17
     Type
-typesyn04.reject.lc 2:6-2:12
+2:6-2:12
     Type
-typesyn04.reject.lc 2:15-2:17
+2:15-2:17
     Type
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/where01.out b/testdata/language-features/basic-values/where01.out
index 4c44def7..0f84625e 100644
--- a/testdata/language-features/basic-values/where01.out
+++ b/testdata/language-features/basic-values/where01.out
@@ -55,75 +55,75 @@ value8 = _rhs ()
 value9 :: ()
 value9 = _rhs ()
 ------------ tooltips
-where01.lc 1:1-1:7
+1:1-1:7
     ()
-where01.lc 1:10-1:12
+1:10-1:12
     ()
-where01.lc 1:23-1:25
+1:23-1:25
     ()
-where01.lc 3:1-3:7
+3:1-3:7
     ()
-where01.lc 3:10-3:11
+3:10-3:11
     ()
-where01.lc 4:12-4:14
+4:12-4:14
     ()
-where01.lc 6:1-6:7
+6:1-6:7
     ()
-where01.lc 6:10-6:11
+6:10-6:11
     ()
-where01.lc 7:12-7:14
+7:12-7:14
     ()
-where01.lc 8:12-8:14
+8:12-8:14
     ()
-where01.lc 10:1-10:7
+10:1-10:7
     ()
-where01.lc 10:10-10:11
+10:10-10:11
     ()
-where01.lc 12:6-12:8
+12:6-12:8
     ()
-where01.lc 13:6-13:8
+13:6-13:8
     ()
-where01.lc 15:1-15:7
+15:1-15:7
     ()
-where01.lc 15:10-15:11
+15:10-15:11
     ()
-where01.lc 17:7-17:9
+17:7-17:9
     ()
-where01.lc 18:7-18:9
+18:7-18:9
     ()
-where01.lc 20:1-20:7
+20:1-20:7
     ()
-where01.lc 20:10-20:12
+20:10-20:12
     ()
-where01.lc 22:1-22:7
+22:1-22:7
     ()
-where01.lc 22:10-22:12
+22:10-22:12
     ()
-where01.lc 25:1-25:7
+25:1-25:7
     ()
-where01.lc 25:10-25:12
+25:10-25:12
     ()
-where01.lc 30:1-30:7
+30:1-30:7
     ()
-where01.lc 30:10-30:11
+30:10-30:11
     ()
-where01.lc 34:7-34:9
+34:7-34:9
     ()
-where01.lc 35:7-35:9
+35:7-35:9
     ()
-where01.lc 37:1-37:8
+37:1-37:8
     ()
-where01.lc 37:11-37:12
+37:11-37:12
     ()
-where01.lc 39:6-39:8
+39:6-39:8
     ()
-where01.lc 40:6-40:8
+40:6-40:8
     ()
-where01.lc 42:1-42:8
+42:1-42:8
     ()
-where01.lc 42:11-42:12
+42:11-42:12
     ()
-where01.lc 43:6-43:8
+43:6-43:8
     ()
-where01.lc 44:6-44:8
+44:6-44:8
     ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/where02.reject.out b/testdata/language-features/basic-values/where02.reject.out
index 3a8033a4..b9458151 100644
--- a/testdata/language-features/basic-values/where02.reject.out
+++ b/testdata/language-features/basic-values/where02.reject.out
@@ -1,3 +1,3 @@
-testdata/language-features/basic-values/where02.reject.lc:4:5:
+./testdata/language-features/basic-values/where02.reject.lc:4:5:
 unexpected '='
-expecting "->", "::", "=>", "let", "where", ''', '(', '@', '[', '_', '{', end of input, expression, lambda, literal, lowercase ident, rest of expression, swizzling, symbols, or uppercase ident
+expecting "->", "::", "=>", "let", "where", ''', '(', '@', '[', '_', '{', end of input, expression, lambda, literal, lowercase ident, rest of expression, swizzling, symbols, or uppercase ident
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/where03.reject.out b/testdata/language-features/basic-values/where03.reject.out
index a2898961..acaf1fc0 100644
--- a/testdata/language-features/basic-values/where03.reject.out
+++ b/testdata/language-features/basic-values/where03.reject.out
@@ -1,3 +1,3 @@
-testdata/language-features/basic-values/where03.reject.lc:4:2:
+./testdata/language-features/basic-values/where03.reject.lc:4:2:
 unexpected 'y'
-expecting ''', backquoted ident, end of input, expression, lambda, literal, lowercase ident, rest of expression, symbols, or uppercase ident
+expecting ''', backquoted ident, end of input, expression, lambda, literal, lowercase ident, rest of expression, symbols, or uppercase ident
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/where04.out b/testdata/language-features/basic-values/where04.out
index 06d51b41..41b46fda 100644
--- a/testdata/language-features/basic-values/where04.out
+++ b/testdata/language-features/basic-values/where04.out
@@ -15,27 +15,27 @@ value2 = _rhs ()
 value3 :: ()
 value3 = _rhs ()
 ------------ tooltips
-where04.lc 1:1-1:7
+1:1-1:7
     ()
-where04.lc 1:18-1:19
+1:18-1:19
     ()
-where04.lc 1:30-1:32
+1:30-1:32
     ()
-where04.lc 1:36-1:37
+1:36-1:37
     ()
-where04.lc 3:1-3:7
+3:1-3:7
     ()
-where04.lc 3:18-3:19
+3:18-3:19
     ()
-where04.lc 4:25-4:27
+4:25-4:27
     ()
-where04.lc 5:13-5:14
+5:13-5:14
     ()
-where04.lc 7:1-7:7
+7:1-7:7
     ()
-where04.lc 7:18-7:19
+7:18-7:19
     ()
-where04.lc 9:19-9:21
+9:19-9:21
     ()
-where04.lc 10:13-10:14
+10:13-10:14
     ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/where05.out b/testdata/language-features/basic-values/where05.out
index e371d656..c8a2e0a7 100644
--- a/testdata/language-features/basic-values/where05.out
+++ b/testdata/language-features/basic-values/where05.out
@@ -48,59 +48,59 @@ value4
   = \a b c -> _rhs
     (case'Bool (\_ -> ' ()) () () ((a == b) (fromInt a c 1) (fromInt a c 1)))
 ------------ tooltips
-where05.lc 1:1-1:7
+1:1-1:7
     forall a . (Eq a, Num a) => ()
-where05.lc 1:10-3:10
+1:10-3:10
     ()
-where05.lc 1:15-1:16
+1:15-1:16
     _b
-where05.lc 2:8-2:9
+2:8-2:9
     ()
-where05.lc 2:8-3:10
+2:8-3:10
     Bool -> ()
-where05.lc 2:20-2:22
+2:20-2:22
     ()
-where05.lc 3:8-3:10
+3:8-3:10
     ()
-where05.lc 5:1-5:7
+5:1-5:7
     forall a . (Eq a, Num a) => ()
-where05.lc 5:10-8:10
+5:10-8:10
     ()
-where05.lc 5:15-5:16
+5:15-5:16
     _b
-where05.lc 6:8-6:9
+6:8-6:9
     ()
-where05.lc 6:8-8:10
+6:8-8:10
     Bool -> ()
-where05.lc 7:14-7:16
+7:14-7:16
     ()
-where05.lc 8:8-8:10
+8:8-8:10
     ()
-where05.lc 10:1-10:7
+10:1-10:7
     forall a . (Eq a, Num a) => ()
-where05.lc 10:10-14:10
+10:10-14:10
     ()
-where05.lc 10:15-10:16
+10:15-10:16
     _b
-where05.lc 11:8-11:9
+11:8-11:9
     ()
-where05.lc 11:8-14:10
+11:8-14:10
     Bool -> ()
-where05.lc 13:8-13:10
+13:8-13:10
     ()
-where05.lc 14:8-14:10
+14:8-14:10
     ()
-where05.lc 16:1-16:7
+16:1-16:7
     forall a . (Eq a, Num a) => ()
-where05.lc 16:10-18:10
+16:10-18:10
     ()
-where05.lc 16:15-16:16
+16:15-16:16
     _b
-where05.lc 17:8-17:9
+17:8-17:9
     ()
-where05.lc 17:8-18:10
+17:8-18:10
     Bool -> ()
-where05.lc 18:8-18:10
+18:8-18:10
     ()
-where05.lc 21:6-21:8
+21:6-21:8
     ()
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/where06.reject.out b/testdata/language-features/basic-values/where06.reject.out
index 8040bdc1..7368bf61 100644
--- a/testdata/language-features/basic-values/where06.reject.out
+++ b/testdata/language-features/basic-values/where06.reject.out
@@ -1,8 +1,8 @@
-testdata/language-features/basic-values/where06.reject.lc:7:1:
+./testdata/language-features/basic-values/where06.reject.lc:7:1:
 redefined x:
-where06.reject.lc:3:1:
+./testdata/language-features/basic-values/where06.reject.lc:3:1:
 x = y where
 ^
-where06.reject.lc:5:1:
+./testdata/language-features/basic-values/where06.reject.lc:5:1:
 x = 'c'
 ^
\ No newline at end of file
diff --git a/testdata/language-features/basic-values/wildcard01.out b/testdata/language-features/basic-values/wildcard01.out
index 0bc8489b..2e1a67d8 100644
--- a/testdata/language-features/basic-values/wildcard01.out
+++ b/testdata/language-features/basic-values/wildcard01.out
@@ -5,7 +5,7 @@ funUnit = _lhs funUnit \(_ :: _) -> _rhs ()
 funUnit :: forall a . a -> ()
 funUnit = \a _ -> _rhs ()
 ------------ tooltips
-wildcard01.lc 1:1-1:8
+1:1-1:8
     forall a . a -> ()
-wildcard01.lc 1:13-1:15
+1:13-1:15
     ()
\ No newline at end of file
diff --git a/testdata/language-features/comment/comment05.reject.out b/testdata/language-features/comment/comment05.reject.out
index 2fc5904f..bafd31d8 100644
--- a/testdata/language-features/comment/comment05.reject.out
+++ b/testdata/language-features/comment/comment05.reject.out
@@ -1,3 +1,3 @@
-testdata/language-features/comment/comment05.reject.lc:4:1:
+./testdata/language-features/comment/comment05.reject.lc:4:1:
 unexpected '-'
-expecting "class", "data", "infix", "infixl", "infixr", "instance", "type", end of input, lhs, operator definition, pattern, or typed ident
+expecting "class", "data", "infix", "infixl", "infixr", "instance", "type", end of input, lhs, operator definition, pattern, or typed ident
\ No newline at end of file
diff --git a/testdata/language-features/guard/guard01.out b/testdata/language-features/guard/guard01.out
index 45729a6c..79091e71 100644
--- a/testdata/language-features/guard/guard01.out
+++ b/testdata/language-features/guard/guard01.out
@@ -5,11 +5,11 @@ value = _lhs value (case'Bool (\(_ :: _) -> _) (_rhs undefined) (_rhs ()) True)
 value :: ()
 value = _rhs ()
 ------------ tooltips
-guard01.lc 1:1-1:6
+1:1-1:6
     ()
-guard01.lc 1:9-1:13
+1:9-1:13
     Bool
-guard01.lc 1:9-1:18
+1:9-1:18
     ()
-guard01.lc 1:16-1:18
+1:16-1:18
     ()
\ No newline at end of file
diff --git a/testdata/language-features/guard/guard02.reject.out b/testdata/language-features/guard/guard02.reject.out
index 9b6a2e7a..8b40594b 100644
--- a/testdata/language-features/guard/guard02.reject.out
+++ b/testdata/language-features/guard/guard02.reject.out
@@ -2,7 +2,7 @@ type error: can not unify
   String
 with
   ()
-in guard02.reject.lc:2:12:
+in ./testdata/language-features/guard/guard02.reject.lc:2:12:
   | True = ()
            ^^
 ------------ trace
@@ -10,15 +10,15 @@ in guard02.reject.lc:2:12:
   String
 with
   ()
-in guard02.reject.lc:2:12:
+in ./testdata/language-features/guard/guard02.reject.lc:2:12:
   | True = ()
            ^^
 ------------ tooltips
-guard02.reject.lc 2:12-2:14
+2:12-2:14
     ()
-guard02.reject.lc 3:5-3:10
+3:5-3:10
     Bool
-guard02.reject.lc 3:5-3:15
+3:5-3:15
     String
-guard02.reject.lc 3:13-3:15
+3:13-3:15
     String
\ No newline at end of file
diff --git a/testdata/language-features/guard/guard03.out b/testdata/language-features/guard/guard03.out
index 7885a6f1..4560a41e 100644
--- a/testdata/language-features/guard/guard03.out
+++ b/testdata/language-features/guard/guard03.out
@@ -12,19 +12,19 @@ value
 value :: String
 value = _rhs "True"
 ------------ tooltips
-guard03.lc 1:1-1:6
+1:1-1:6
     String
-guard03.lc 2:5-2:9
+2:5-2:9
     Bool
-guard03.lc 2:5-3:20
+2:5-3:20
     String
-guard03.lc 2:12-2:18
+2:12-2:18
     String
-guard03.lc 2:12-3:20
+2:12-3:20
     Bool -> String
-guard03.lc 3:5-3:10
+3:5-3:10
     Bool
-guard03.lc 3:5-3:20
+3:5-3:20
     String
-guard03.lc 3:13-3:20
+3:13-3:20
     String
\ No newline at end of file
diff --git a/testdata/language-features/guard/guard04.out b/testdata/language-features/guard/guard04.out
index ca03fda8..012104a0 100644
--- a/testdata/language-features/guard/guard04.out
+++ b/testdata/language-features/guard/guard04.out
@@ -6,15 +6,15 @@ value
 value :: String
 value = _rhs "True"
 ------------ tooltips
-guard04.lc 1:1-1:6
+1:1-1:6
     String
-guard04.lc 2:5-2:9
+2:5-2:9
     Bool
-guard04.lc 2:5-3:24
+2:5-3:24
     String
-guard04.lc 2:12-2:18
+2:12-2:18
     String
-guard04.lc 2:12-3:24
+2:12-3:24
     Bool -> String
-guard04.lc 3:17-3:24
+3:17-3:24
     String
\ No newline at end of file
diff --git a/testdata/language-features/guard/guard05.reject.out b/testdata/language-features/guard/guard05.reject.out
index 4bd522c3..e424e7d1 100644
--- a/testdata/language-features/guard/guard05.reject.out
+++ b/testdata/language-features/guard/guard05.reject.out
@@ -1,24 +1,24 @@
 type error: can not unify
-  'Internals.lc:63:6:
+  <<installed-prelude-path>>/Internals.lc:63:6:
   data Bool = False | True
        ^^^^
 with
   ()
-in guard05.reject.lc:1:9:
+in ./testdata/language-features/guard/guard05.reject.lc:1:9:
 value | () = "wrong"
         ^^
 ------------ trace
 !type error: can not unify
-  'Internals.lc:63:6:
+  <<installed-prelude-path>>/Internals.lc:63:6:
   data Bool = False | True
        ^^^^
 with
   ()
-in guard05.reject.lc:1:9:
+in ./testdata/language-features/guard/guard05.reject.lc:1:9:
 value | () = "wrong"
         ^^
 ------------ tooltips
-guard05.reject.lc 1:9-1:11
+1:9-1:11
     ()
-guard05.reject.lc 1:14-1:21
+1:14-1:21
     String
\ No newline at end of file
diff --git a/testdata/language-features/guard/guard06.out b/testdata/language-features/guard/guard06.out
index a3a9c465..861f0958 100644
--- a/testdata/language-features/guard/guard06.out
+++ b/testdata/language-features/guard/guard06.out
@@ -5,7 +5,7 @@ value = _lhs value (_rhs ())
 value :: ()
 value = _rhs ()
 ------------ tooltips
-guard06.lc 1:1-1:6
+1:1-1:6
     ()
-guard06.lc 1:21-1:23
+1:21-1:23
     ()
\ No newline at end of file
diff --git a/testdata/language-features/guard/guard07.out b/testdata/language-features/guard/guard07.out
index 5aa760b0..9798e8fb 100644
--- a/testdata/language-features/guard/guard07.out
+++ b/testdata/language-features/guard/guard07.out
@@ -12,19 +12,19 @@ value
 value :: String
 value = _rhs "True"
 ------------ tooltips
-guard07.lc 1:1-1:6
+1:1-1:6
     String
-guard07.lc 1:7-1:11
+1:7-1:11
     Bool
-guard07.lc 1:7-2:20
+1:7-2:20
     String
-guard07.lc 1:12-1:18
+1:12-1:18
     String
-guard07.lc 1:12-2:20
+1:12-2:20
     Bool -> String
-guard07.lc 2:7-2:12
+2:7-2:12
     Bool
-guard07.lc 2:7-2:20
+2:7-2:20
     String
-guard07.lc 2:13-2:20
+2:13-2:20
     String
\ No newline at end of file
diff --git a/testdata/language-features/guard/guard08.out b/testdata/language-features/guard/guard08.out
index 1a4835fa..420591e9 100644
--- a/testdata/language-features/guard/guard08.out
+++ b/testdata/language-features/guard/guard08.out
@@ -12,19 +12,19 @@ value
 value :: String
 value = _rhs "True"
 ------------ tooltips
-guard08.lc 1:1-1:6
+1:1-1:6
     String
-guard08.lc 1:7-1:11
+1:7-1:11
     Bool
-guard08.lc 1:7-1:32
+1:7-1:32
     String
-guard08.lc 1:12-1:18
+1:12-1:18
     String
-guard08.lc 1:12-1:32
+1:12-1:32
     Bool -> String
-guard08.lc 1:19-1:24
+1:19-1:24
     Bool
-guard08.lc 1:19-1:32
+1:19-1:32
     String
-guard08.lc 1:25-1:32
+1:25-1:32
     String
\ No newline at end of file
diff --git a/testdata/language-features/guard/guard09.out b/testdata/language-features/guard/guard09.out
index bb429584..fd7ab9c5 100644
--- a/testdata/language-features/guard/guard09.out
+++ b/testdata/language-features/guard/guard09.out
@@ -12,19 +12,19 @@ value
 value :: String
 value = _rhs "True"
 ------------ tooltips
-guard09.lc 1:1-1:6
+1:1-1:6
     String
-guard09.lc 1:7-1:11
+1:7-1:11
     Bool
-guard09.lc 1:7-2:16
+1:7-2:16
     String
-guard09.lc 1:12-1:18
+1:12-1:18
     String
-guard09.lc 1:12-2:16
+1:12-2:16
     Bool -> String
-guard09.lc 2:3-2:8
+2:3-2:8
     Bool
-guard09.lc 2:3-2:16
+2:3-2:16
     String
-guard09.lc 2:9-2:16
+2:9-2:16
     String
\ No newline at end of file
diff --git a/testdata/language-features/guard/guard10.reject.out b/testdata/language-features/guard/guard10.reject.out
index 54362d2a..75235ae7 100644
--- a/testdata/language-features/guard/guard10.reject.out
+++ b/testdata/language-features/guard/guard10.reject.out
@@ -1,3 +1,3 @@
-testdata/language-features/guard/guard10.reject.lc:2:1:
+./testdata/language-features/guard/guard10.reject.lc:2:1:
 unexpected '|'
-expecting "class", "data", "infix", "infixl", "infixr", "instance", "type", ''', backquoted ident, end of input, expression, lambda, lhs, literal, lowercase ident, operator definition, pattern, rest of expression, symbols, typed ident, or uppercase ident
+expecting "class", "data", "infix", "infixl", "infixr", "instance", "type", ''', backquoted ident, end of input, expression, lambda, lhs, literal, lowercase ident, operator definition, pattern, rest of expression, symbols, typed ident, or uppercase ident
\ No newline at end of file
diff --git a/testdata/language-features/guard/guard11.out b/testdata/language-features/guard/guard11.out
index 5331cf7a..0d6c951d 100644
--- a/testdata/language-features/guard/guard11.out
+++ b/testdata/language-features/guard/guard11.out
@@ -8,15 +8,15 @@ fun
 fun :: Bool -> String
 fun = \a -> case'Bool (\_ -> 'String) (_rhs "False") (_rhs "True") a
 ------------ tooltips
-guard11.lc 1:1-1:4
+1:1-1:4
     Bool -> String
-guard11.lc 2:5-2:6
+2:5-2:6
     _b
-guard11.lc 2:5-3:24
+2:5-3:24
     String
-guard11.lc 2:9-2:15
+2:9-2:15
     String
-guard11.lc 2:9-3:24
+2:9-3:24
     Bool -> String
-guard11.lc 3:17-3:24
+3:17-3:24
     String
\ No newline at end of file
diff --git a/testdata/language-features/guard/guard12.reject.out b/testdata/language-features/guard/guard12.reject.out
index 62e7ef65..c6c21a4f 100644
--- a/testdata/language-features/guard/guard12.reject.out
+++ b/testdata/language-features/guard/guard12.reject.out
@@ -2,7 +2,7 @@ type error: can not unify
   Char
 with
   ()
-in guard12.reject.lc:1:13:
+in ./testdata/language-features/guard/guard12.reject.lc:1:13:
 fun x | x = () | otherwise = 'a'
             ^^
 ------------ trace
@@ -10,11 +10,11 @@ fun x | x = () | otherwise = 'a'
   Char
 with
   ()
-in guard12.reject.lc:1:13:
+in ./testdata/language-features/guard/guard12.reject.lc:1:13:
 fun x | x = () | otherwise = 'a'
             ^^
 ------------ tooltips
-guard12.reject.lc 1:13-1:15
+1:13-1:15
     ()
-guard12.reject.lc 1:30-1:33
+1:30-1:33
     Char
\ No newline at end of file
diff --git a/testdata/language-features/guard/guard13.out b/testdata/language-features/guard/guard13.out
index 9926ad37..2d379878 100644
--- a/testdata/language-features/guard/guard13.out
+++ b/testdata/language-features/guard/guard13.out
@@ -5,15 +5,15 @@ fun = _lhs fun \(a :: _) -> case'Bool (\(_ :: _) -> _) (_rhs ()) (_rhs ()) a
 fun :: Bool -> ()
 fun = \a -> case'Bool (\_ -> ' ()) (_rhs ()) (_rhs ()) a
 ------------ tooltips
-guard13.lc 1:1-1:4
+1:1-1:4
     Bool -> ()
-guard13.lc 1:7-1:8
+1:7-1:8
     _b
-guard13.lc 1:7-1:24
+1:7-1:24
     ()
-guard13.lc 1:9-1:11
+1:9-1:11
     ()
-guard13.lc 1:9-1:24
+1:9-1:24
     Bool -> ()
-guard13.lc 1:22-1:24
+1:22-1:24
     ()
\ No newline at end of file
diff --git a/testdata/language-features/guard/guard14.out b/testdata/language-features/guard/guard14.out
index 800e6870..86d74f1b 100644
--- a/testdata/language-features/guard/guard14.out
+++ b/testdata/language-features/guard/guard14.out
@@ -9,17 +9,17 @@ value
 value :: ()
 value = _rhs ()
 ------------ tooltips
-guard14.lc 1:1-1:6
+1:1-1:6
     ()
-guard14.lc 1:17-1:21
+1:17-1:21
     Bool
-guard14.lc 1:17-2:31
+1:17-2:31
     ()
-guard14.lc 1:24-1:26
+1:24-1:26
     ()
-guard14.lc 1:24-2:31
+1:24-2:31
     Bool -> ()
-guard14.lc 2:29-2:31
+2:29-2:31
     ()
-guard14.lc 3:12-3:14
+3:12-3:14
     ()
\ No newline at end of file
diff --git a/testdata/language-features/guard/guard15.out b/testdata/language-features/guard/guard15.out
index 316411db..05dbbba2 100644
--- a/testdata/language-features/guard/guard15.out
+++ b/testdata/language-features/guard/guard15.out
@@ -9,17 +9,17 @@ value
 value :: ()
 value = _rhs ()
 ------------ tooltips
-guard15.lc 1:1-1:6
+1:1-1:6
     ()
-guard15.lc 1:9-1:11
+1:9-1:11
     ()
-guard15.lc 2:13-2:17
+2:13-2:17
     Bool
-guard15.lc 2:13-3:27
+2:13-3:27
     ()
-guard15.lc 2:20-2:22
+2:20-2:22
     ()
-guard15.lc 2:20-3:27
+2:20-3:27
     Bool -> ()
-guard15.lc 3:25-3:27
+3:25-3:27
     ()
\ No newline at end of file
diff --git a/testdata/language-features/guard/guard16.out b/testdata/language-features/guard/guard16.out
index d616cb60..8b637dbf 100644
--- a/testdata/language-features/guard/guard16.out
+++ b/testdata/language-features/guard/guard16.out
@@ -16,19 +16,19 @@ value
   = \a b c -> _rhs
     (case'Bool (\_ -> ' ()) () () ((a == b) (fromInt a c 1) (fromInt a c 1)))
 ------------ tooltips
-guard16.lc 1:1-1:6
+1:1-1:6
     forall a . (Eq a, Num a) => ()
-guard16.lc 1:9-3:10
+1:9-3:10
     ()
-guard16.lc 1:14-1:15
+1:14-1:15
     _b
-guard16.lc 2:7-2:11
+2:7-2:11
     Bool
-guard16.lc 2:7-3:10
+2:7-3:10
     ()
-guard16.lc 2:15-2:17
+2:15-2:17
     ()
-guard16.lc 2:15-3:10
+2:15-3:10
     Bool -> ()
-guard16.lc 3:8-3:10
+3:8-3:10
     () | ()
\ No newline at end of file
diff --git a/testdata/language-features/module/Hello01.out b/testdata/language-features/module/Hello01.out
index acb7ff5c..24057e87 100644
--- a/testdata/language-features/module/Hello01.out
+++ b/testdata/language-features/module/Hello01.out
@@ -10,11 +10,11 @@ hello = _rhs "hello"
 world :: String
 world = _rhs "world"
 ------------ tooltips
-Hello01.lc 3:1-3:6
+3:1-3:6
     String
-Hello01.lc 3:9-3:16
+3:9-3:16
     String
-Hello01.lc 4:1-4:6
+4:1-4:6
     String
-Hello01.lc 4:9-4:16
+4:9-4:16
     String
\ No newline at end of file
diff --git a/testdata/language-features/module/Hello02.out b/testdata/language-features/module/Hello02.out
index 8fc92bd1..50eb6598 100644
--- a/testdata/language-features/module/Hello02.out
+++ b/testdata/language-features/module/Hello02.out
@@ -7,11 +7,11 @@ world = _lhs world (_rhs "world")
 hello :: String
 hello = _rhs "hello"
 ------------ tooltips
-Hello02.lc 3:1-3:6
+3:1-3:6
     String
-Hello02.lc 3:9-3:16
+3:9-3:16
     String
-Hello02.lc 4:1-4:6
+4:1-4:6
     String
-Hello02.lc 4:9-4:16
+4:9-4:16
     String
\ No newline at end of file
diff --git a/testdata/language-features/module/Hello03.out b/testdata/language-features/module/Hello03.out
index d74b2cc3..60b2a9ab 100644
--- a/testdata/language-features/module/Hello03.out
+++ b/testdata/language-features/module/Hello03.out
@@ -7,11 +7,11 @@ value = _lhs value (_rhs 12.2)
 greeting :: Char
 greeting = _rhs 'G'
 ------------ tooltips
-Hello03.lc 7:1-7:9
+7:1-7:9
     Char
-Hello03.lc 7:12-7:15
+7:12-7:15
     Char
-Hello03.lc 9:1-9:6
+9:1-9:6
     Float
-Hello03.lc 9:9-9:13
+9:9-9:13
     Float
\ No newline at end of file
diff --git a/testdata/language-features/module/ModulePackage/SubModule01.out b/testdata/language-features/module/ModulePackage/SubModule01.out
index bed90636..07cd0750 100644
--- a/testdata/language-features/module/ModulePackage/SubModule01.out
+++ b/testdata/language-features/module/ModulePackage/SubModule01.out
@@ -5,7 +5,7 @@ hello = _lhs hello (_rhs "Hello")
 hello :: String
 hello = _rhs "Hello"
 ------------ tooltips
-ModulePackage.SubModule01.lc 3:1-3:6
+3:1-3:6
     String
-ModulePackage.SubModule01.lc 3:9-3:16
+3:9-3:16
     String
\ No newline at end of file
diff --git a/testdata/language-features/module/Moduledef02.reject.out b/testdata/language-features/module/Moduledef02.reject.out
index 5ee63b0c..cdb02fc8 100644
--- a/testdata/language-features/module/Moduledef02.reject.out
+++ b/testdata/language-features/module/Moduledef02.reject.out
@@ -1,3 +1,3 @@
-testdata/language-features/module/Moduledef02.reject.lc:2:1:
+./testdata/language-features/module/Moduledef02.reject.lc:2:1:
 unexpected end of input
-expecting "where" or '('
+expecting "where" or '('
\ No newline at end of file
diff --git a/testdata/language-features/module/Moduledef03.reject.out b/testdata/language-features/module/Moduledef03.reject.out
index 848d1159..401c93b1 100644
--- a/testdata/language-features/module/Moduledef03.reject.out
+++ b/testdata/language-features/module/Moduledef03.reject.out
@@ -1,3 +1,3 @@
-testdata/language-features/module/Moduledef03.reject.lc:1:8:
+./testdata/language-features/module/Moduledef03.reject.lc:1:8:
 unexpected 'm'
-expecting module name
+expecting module name
\ No newline at end of file
diff --git a/testdata/language-features/module/Moduledef04.reject.out b/testdata/language-features/module/Moduledef04.reject.out
index d3fa3e4d..3a581b7c 100644
--- a/testdata/language-features/module/Moduledef04.reject.out
+++ b/testdata/language-features/module/Moduledef04.reject.out
@@ -1,3 +1,3 @@
-testdata/language-features/module/Moduledef04.reject.lc:1:8:
+./testdata/language-features/module/Moduledef04.reject.lc:1:8:
 unexpected 'm'
-expecting module name
+expecting module name
\ No newline at end of file
diff --git a/testdata/language-features/module/Moduledef05.reject.out b/testdata/language-features/module/Moduledef05.reject.out
index 8dac151c..89576ae1 100644
--- a/testdata/language-features/module/Moduledef05.reject.out
+++ b/testdata/language-features/module/Moduledef05.reject.out
@@ -1,3 +1,3 @@
-testdata/language-features/module/Moduledef05.reject.lc:3:1:
+./testdata/language-features/module/Moduledef05.reject.lc:3:1:
 unexpected 'h'
-expecting "where" or '('
+expecting "where" or '('
\ No newline at end of file
diff --git a/testdata/language-features/module/Moduledef06.out b/testdata/language-features/module/Moduledef06.out
index fbbd66bd..8ed81522 100644
--- a/testdata/language-features/module/Moduledef06.out
+++ b/testdata/language-features/module/Moduledef06.out
@@ -5,7 +5,7 @@ hello = _lhs hello (_rhs "hello")
 hello :: String
 hello = _rhs "hello"
 ------------ tooltips
-Moduledef06.lc 3:1-3:6
+3:1-3:6
     String
-Moduledef06.lc 3:9-3:16
+3:9-3:16
     String
\ No newline at end of file
diff --git a/testdata/language-features/module/Moduledef07.out b/testdata/language-features/module/Moduledef07.out
index e10af01e..e45b96a6 100644
--- a/testdata/language-features/module/Moduledef07.out
+++ b/testdata/language-features/module/Moduledef07.out
@@ -5,7 +5,7 @@ hello = _lhs hello (_rhs "hello")
 hello :: String
 hello = _rhs "hello"
 ------------ tooltips
-Moduledef07.lc 5:1-5:6
+5:1-5:6
     String
-Moduledef07.lc 5:9-5:16
+5:9-5:16
     String
\ No newline at end of file
diff --git a/testdata/language-features/module/Moduledef08.out b/testdata/language-features/module/Moduledef08.out
index 1c936e9a..858c0668 100644
--- a/testdata/language-features/module/Moduledef08.out
+++ b/testdata/language-features/module/Moduledef08.out
@@ -3,7 +3,7 @@ main is not found
 hello = _lhs hello (_rhs "hello")
 ------------ core code
 ------------ tooltips
-Moduledef08.lc 5:1-5:6
+5:1-5:6
     String
-Moduledef08.lc 5:9-5:16
+5:9-5:16
     String
\ No newline at end of file
diff --git a/testdata/language-features/module/Moduledef09.out b/testdata/language-features/module/Moduledef09.out
index 63b912b4..fdd77dba 100644
--- a/testdata/language-features/module/Moduledef09.out
+++ b/testdata/language-features/module/Moduledef09.out
@@ -7,11 +7,11 @@ world = _lhs world (_rhs "world")
 hello :: String
 hello = _rhs "hello"
 ------------ tooltips
-Moduledef09.lc 5:1-5:6
+5:1-5:6
     String
-Moduledef09.lc 5:9-5:16
+5:9-5:16
     String
-Moduledef09.lc 6:1-6:6
+6:1-6:6
     String
-Moduledef09.lc 6:9-6:16
+6:9-6:16
     String
\ No newline at end of file
diff --git a/testdata/language-features/module/Moduledef10.out b/testdata/language-features/module/Moduledef10.out
index 21db80a9..03882e97 100644
--- a/testdata/language-features/module/Moduledef10.out
+++ b/testdata/language-features/module/Moduledef10.out
@@ -12,15 +12,15 @@ hello = _rhs "hello"
 world :: String
 world = _rhs "world"
 ------------ tooltips
-Moduledef10.lc 6:1-6:6
+6:1-6:6
     String
-Moduledef10.lc 6:9-6:16
+6:9-6:16
     String
-Moduledef10.lc 7:1-7:6
+7:1-7:6
     String
-Moduledef10.lc 7:9-7:16
+7:9-7:16
     String
-Moduledef10.lc 9:1-9:6
+9:1-9:6
     ()
-Moduledef10.lc 9:9-9:11
+9:9-9:11
     ()
\ No newline at end of file
diff --git a/testdata/language-features/module/Moduledef11.reject.out b/testdata/language-features/module/Moduledef11.reject.out
index 43c5b5b5..ab059e4a 100644
--- a/testdata/language-features/module/Moduledef11.reject.out
+++ b/testdata/language-features/module/Moduledef11.reject.out
@@ -1,3 +1,3 @@
-testdata/language-features/module/Moduledef11.reject.lc:1:8:
+./testdata/language-features/module/Moduledef11.reject.lc:1:8:
 unexpected '1'
-expecting module name
+expecting module name
\ No newline at end of file
diff --git a/testdata/language-features/module/Moduledef12.reject.out b/testdata/language-features/module/Moduledef12.reject.out
index f1098d5f..2f423e0d 100644
--- a/testdata/language-features/module/Moduledef12.reject.out
+++ b/testdata/language-features/module/Moduledef12.reject.out
@@ -1,3 +1,3 @@
-testdata/language-features/module/Moduledef12.reject.lc:1:8:
+./testdata/language-features/module/Moduledef12.reject.lc:1:8:
 unexpected '&'
-expecting module name
+expecting module name
\ No newline at end of file
diff --git a/testdata/language-features/module/Moduledef13.out b/testdata/language-features/module/Moduledef13.out
index a9c45ef0..8ed81522 100644
--- a/testdata/language-features/module/Moduledef13.out
+++ b/testdata/language-features/module/Moduledef13.out
@@ -5,7 +5,7 @@ hello = _lhs hello (_rhs "hello")
 hello :: String
 hello = _rhs "hello"
 ------------ tooltips
-Moduledef13.lc 3:1-3:6
+3:1-3:6
     String
-Moduledef13.lc 3:9-3:16
+3:9-3:16
     String
\ No newline at end of file
diff --git a/testdata/language-features/module/TypeSyn01Mod.out b/testdata/language-features/module/TypeSyn01Mod.out
index 1c298139..00fac4e2 100644
--- a/testdata/language-features/module/TypeSyn01Mod.out
+++ b/testdata/language-features/module/TypeSyn01Mod.out
@@ -5,7 +5,7 @@ main is not found
 'MyUnit :: Type
 'MyUnit = _rhs ' ()
 ------------ tooltips
-TypeSyn01Mod.lc 2:6-2:12
+2:6-2:12
     Type
-TypeSyn01Mod.lc 2:15-2:17
+2:15-2:17
     Type
\ No newline at end of file
diff --git a/testdata/language-features/module/import01.out b/testdata/language-features/module/import01.out
index 7cde97f0..fd0a802c 100644
--- a/testdata/language-features/module/import01.out
+++ b/testdata/language-features/module/import01.out
@@ -5,7 +5,7 @@ x = _lhs x (_rhs hello)
 x :: String
 x = _rhs "hello"
 ------------ tooltips
-import01.lc 3:1-3:2
+3:1-3:2
     String
-import01.lc 3:5-3:10
+3:5-3:10
     String
\ No newline at end of file
diff --git a/testdata/language-features/module/import02.reject.out b/testdata/language-features/module/import02.reject.out
index a11dd56b..7877218f 100644
--- a/testdata/language-features/module/import02.reject.out
+++ b/testdata/language-features/module/import02.reject.out
@@ -1,7 +1,7 @@
-can't find: hello2 in import02.reject.lc:4:5:
+can't find: hello2 in ./testdata/language-features/module/import02.reject.lc:4:5:
 x = hello2
     ^^^^^^
 ------------ trace
-!can't find: hello2 in import02.reject.lc:4:5:
+!can't find: hello2 in ./testdata/language-features/module/import02.reject.lc:4:5:
 x = hello2
     ^^^^^^
\ No newline at end of file
diff --git a/testdata/language-features/module/import03.reject.out b/testdata/language-features/module/import03.reject.out
index fcb67a0d..432500ab 100644
--- a/testdata/language-features/module/import03.reject.out
+++ b/testdata/language-features/module/import03.reject.out
@@ -1,7 +1,7 @@
-can't find: world in import03.reject.lc:3:5:
+can't find: world in ./testdata/language-features/module/import03.reject.lc:3:5:
 x = world
     ^^^^^
 ------------ trace
-!can't find: world in import03.reject.lc:3:5:
+!can't find: world in ./testdata/language-features/module/import03.reject.lc:3:5:
 x = world
     ^^^^^
\ No newline at end of file
diff --git a/testdata/language-features/module/import04.reject.out b/testdata/language-features/module/import04.reject.out
index a8fdc52b..255c4921 100644
--- a/testdata/language-features/module/import04.reject.out
+++ b/testdata/language-features/module/import04.reject.out
@@ -1,19 +1,19 @@
-already defined hello at import04.reject.lc:4:1:
+already defined hello at ./testdata/language-features/module/import04.reject.lc:4:1:
 hello = "hello"
 ^^^^^
-and at Hello01.lc:3:1:
+and at ./testdata/language-features/module/Hello01.lc:3:1:
 hello = "hello"
 ^^^^^
 ------------ trace
 hello :: String
-!already defined hello at import04.reject.lc:4:1:
+!already defined hello at ./testdata/language-features/module/import04.reject.lc:4:1:
 hello = "hello"
 ^^^^^
-and at Hello01.lc:3:1:
+and at ./testdata/language-features/module/Hello01.lc:3:1:
 hello = "hello"
 ^^^^^
 ------------ tooltips
-import04.reject.lc 4:1-4:6
+4:1-4:6
     String
-import04.reject.lc 4:9-4:16
+4:9-4:16
     String
\ No newline at end of file
diff --git a/testdata/language-features/module/import05.out b/testdata/language-features/module/import05.out
index 447a1356..451a8d2d 100644
--- a/testdata/language-features/module/import05.out
+++ b/testdata/language-features/module/import05.out
@@ -6,9 +6,9 @@ x = _lhs x (_rhs hello)
 x :: String
 x = _rhs "hello"
 ------------ tooltips
-import05.lc 3:6-3:12
+3:6-3:12
     Type
-import05.lc 4:1-4:2
+4:1-4:2
     String
-import05.lc 4:5-4:10
+4:5-4:10
     String
\ No newline at end of file
diff --git a/testdata/language-features/module/import06.out b/testdata/language-features/module/import06.out
index 1b15a725..d4fdc1b8 100644
--- a/testdata/language-features/module/import06.out
+++ b/testdata/language-features/module/import06.out
@@ -10,11 +10,11 @@ hello = _rhs ()
 x :: String
 x = _rhs "world"
 ------------ tooltips
-import06.lc 3:1-3:6
+3:1-3:6
     ()
-import06.lc 3:9-3:11
+3:9-3:11
     ()
-import06.lc 4:1-4:2
+4:1-4:2
     String
-import06.lc 4:5-4:10
+4:5-4:10
     String
\ No newline at end of file
diff --git a/testdata/language-features/module/import07.out b/testdata/language-features/module/import07.out
index 2b35602f..d4fdc1b8 100644
--- a/testdata/language-features/module/import07.out
+++ b/testdata/language-features/module/import07.out
@@ -10,11 +10,11 @@ hello = _rhs ()
 x :: String
 x = _rhs "world"
 ------------ tooltips
-import07.lc 3:1-3:6
+3:1-3:6
     ()
-import07.lc 3:9-3:11
+3:9-3:11
     ()
-import07.lc 4:1-4:2
+4:1-4:2
     String
-import07.lc 4:5-4:10
+4:5-4:10
     String
\ No newline at end of file
diff --git a/testdata/language-features/module/import08.out b/testdata/language-features/module/import08.out
index 8b4270f1..20ee0142 100644
--- a/testdata/language-features/module/import08.out
+++ b/testdata/language-features/module/import08.out
@@ -23,25 +23,25 @@ value = _rhs ()
 w :: String
 w = _rhs "world"
 ------------ tooltips
-import08.lc 3:1-3:6
+3:1-3:6
     ()
-import08.lc 3:9-3:11
+3:9-3:11
     ()
-import08.lc 5:6-5:10
+5:6-5:10
     Type
-import08.lc 6:1-6:2
+6:1-6:2
     Char
-import08.lc 6:5-6:13
+6:5-6:13
     Char
-import08.lc 8:6-8:12
+8:6-8:12
     Type
-import08.lc 9:1-9:2
+9:1-9:2
     String
-import08.lc 9:5-9:10
+9:5-9:10
     String
-import08.lc 11:6-11:12
+11:6-11:12
     Type
-import08.lc 12:1-12:2
+12:1-12:2
     String
-import08.lc 12:5-12:10
+12:5-12:10
     String
\ No newline at end of file
diff --git a/testdata/language-features/module/import09.out b/testdata/language-features/module/import09.out
index 0e478d9c..d9202fc5 100644
--- a/testdata/language-features/module/import09.out
+++ b/testdata/language-features/module/import09.out
@@ -6,17 +6,17 @@ fun = _lhs fun \(_ :: _) (a :: _) -> hlistNilCase _ (_rhs ()) a
 fun :: forall a . a -> MyUnit -> ()
 fun = \_ _ a -> hlistNilCase ' () (_rhs ()) a
 ------------ tooltips
-import09.lc 3:8-3:9
+3:8-3:9
     _b
-import09.lc 3:8-3:29
+3:8-3:29
     Type
-import09.lc 3:13-3:19
+3:13-3:19
     Type
-import09.lc 3:13-3:29
+3:13-3:29
     Type
-import09.lc 3:23-3:29
+3:23-3:29
     Type | Type
-import09.lc 4:1-4:4
+4:1-4:4
     forall a . a -> MyUnit -> ()
-import09.lc 4:12-4:14
+4:12-4:14
     () | ()
\ No newline at end of file
diff --git a/testdata/language-features/module/import10.reject.out b/testdata/language-features/module/import10.reject.out
index c243d0d1..1f1167b1 100644
--- a/testdata/language-features/module/import10.reject.out
+++ b/testdata/language-features/module/import10.reject.out
@@ -1,19 +1,19 @@
-already defined 'MyUnit at import10.reject.lc:3:6:
+already defined 'MyUnit at ./testdata/language-features/module/import10.reject.lc:3:6:
 type MyUnit = ()
      ^^^^^^
-and at TypeSyn01Mod.lc:2:6:
+and at ./testdata/language-features/module/TypeSyn01Mod.lc:2:6:
 type MyUnit = ()
      ^^^^^^
 ------------ trace
 'MyUnit :: Type
-!already defined 'MyUnit at import10.reject.lc:3:6:
+!already defined 'MyUnit at ./testdata/language-features/module/import10.reject.lc:3:6:
 type MyUnit = ()
      ^^^^^^
-and at TypeSyn01Mod.lc:2:6:
+and at ./testdata/language-features/module/TypeSyn01Mod.lc:2:6:
 type MyUnit = ()
      ^^^^^^
 ------------ tooltips
-import10.reject.lc 3:6-3:12
+3:6-3:12
     Type
-import10.reject.lc 3:15-3:17
+3:15-3:17
     Type
\ No newline at end of file
diff --git a/testdata/language-features/module/import11.reject.out b/testdata/language-features/module/import11.reject.out
index 102d4bd8..6b9c0c33 100644
--- a/testdata/language-features/module/import11.reject.out
+++ b/testdata/language-features/module/import11.reject.out
@@ -1,19 +1,19 @@
-already defined 'MyUnit at import11.reject.lc:3:6:
+already defined 'MyUnit at ./testdata/language-features/module/import11.reject.lc:3:6:
 type MyUnit = ()
      ^^^^^^
-and at TypeSyn01Mod.lc:2:6:
+and at ./testdata/language-features/module/TypeSyn01Mod.lc:2:6:
 type MyUnit = ()
      ^^^^^^
 ------------ trace
 'MyUnit :: Type
-!already defined 'MyUnit at import11.reject.lc:3:6:
+!already defined 'MyUnit at ./testdata/language-features/module/import11.reject.lc:3:6:
 type MyUnit = ()
      ^^^^^^
-and at TypeSyn01Mod.lc:2:6:
+and at ./testdata/language-features/module/TypeSyn01Mod.lc:2:6:
 type MyUnit = ()
      ^^^^^^
 ------------ tooltips
-import11.reject.lc 3:6-3:12
+3:6-3:12
     Type
-import11.reject.lc 3:15-3:17
+3:15-3:17
     Type
\ No newline at end of file
diff --git a/testdata/language-features/module/import12.out b/testdata/language-features/module/import12.out
index 90b4ef05..8442401d 100644
--- a/testdata/language-features/module/import12.out
+++ b/testdata/language-features/module/import12.out
@@ -5,7 +5,7 @@ fun = _lhs fun (_rhs hello)
 fun :: String
 fun = _rhs "hello"
 ------------ tooltips
-import12.lc 4:1-4:4
+4:1-4:4
     String
-import12.lc 4:7-4:12
+4:7-4:12
     String
\ No newline at end of file
diff --git a/testdata/language-features/module/import13.out b/testdata/language-features/module/import13.out
index 014905e9..8442401d 100644
--- a/testdata/language-features/module/import13.out
+++ b/testdata/language-features/module/import13.out
@@ -5,7 +5,7 @@ fun = _lhs fun (_rhs hello)
 fun :: String
 fun = _rhs "hello"
 ------------ tooltips
-import13.lc 4:1-4:4
+4:1-4:4
     String
-import13.lc 4:7-4:12
+4:7-4:12
     String
\ No newline at end of file
diff --git a/testdata/language-features/module/import14.out b/testdata/language-features/module/import14.out
index 19ad67b9..8442401d 100644
--- a/testdata/language-features/module/import14.out
+++ b/testdata/language-features/module/import14.out
@@ -5,7 +5,7 @@ fun = _lhs fun (_rhs hello)
 fun :: String
 fun = _rhs "hello"
 ------------ tooltips
-import14.lc 4:1-4:4
+4:1-4:4
     String
-import14.lc 4:7-4:12
+4:7-4:12
     String
\ No newline at end of file
diff --git a/testdata/language-features/module/import15.out b/testdata/language-features/module/import15.out
index 77f60f7b..73fae429 100644
--- a/testdata/language-features/module/import15.out
+++ b/testdata/language-features/module/import15.out
@@ -5,7 +5,7 @@ fun = _lhs fun (_rhs hello)
 fun :: String
 fun = _rhs "Hello"
 ------------ tooltips
-import15.lc 3:1-3:4
+3:1-3:4
     String
-import15.lc 3:7-3:12
+3:7-3:12
     String
\ No newline at end of file
diff --git a/testdata/language-features/pattern/caseWhere.out b/testdata/language-features/pattern/caseWhere.out
index ca80120c..b5a7cf6e 100644
--- a/testdata/language-features/pattern/caseWhere.out
+++ b/testdata/language-features/pattern/caseWhere.out
@@ -10,17 +10,17 @@ main
 main :: Bool
 main = _rhs True
 ------------ tooltips
-caseWhere.lc 4:1-4:5
+4:1-4:5
     Bool
-caseWhere.lc 4:8-7:14
+4:8-7:14
     Bool
-caseWhere.lc 4:13-4:17
+4:13-4:17
     Bool
-caseWhere.lc 5:9-5:10
+5:9-5:10
     _c
-caseWhere.lc 5:9-5:15
+5:9-5:15
     Bool
-caseWhere.lc 5:14-5:15
+5:14-5:15
     _d
-caseWhere.lc 7:13-7:14
+7:13-7:14
     _b
\ No newline at end of file
diff --git a/testdata/language-features/pattern/pattern01.out b/testdata/language-features/pattern/pattern01.out
index 38067549..4cd9e949 100644
--- a/testdata/language-features/pattern/pattern01.out
+++ b/testdata/language-features/pattern/pattern01.out
@@ -44,35 +44,35 @@ fun3
 fun4 :: () -> Char
 fun4 = \a -> hlistNilCase 'Char (_rhs '0') a
 ------------ tooltips
-pattern01.lc 1:1-1:5
+1:1-1:5
     forall a . (Eq a, Num a) => a -> Char
-pattern01.lc 1:10-1:13
+1:10-1:13
     Char
-pattern01.lc 1:10-2:13
+1:10-2:13
     Bool -> Char
-pattern01.lc 2:10-2:13
+2:10-2:13
     Char
-pattern01.lc 4:1-4:5
+4:1-4:5
     String -> Char
-pattern01.lc 4:12-4:15
+4:12-4:15
     Char
-pattern01.lc 4:12-5:13
+4:12-5:13
     Bool -> Char
-pattern01.lc 5:10-5:13
+5:10-5:13
     Char
-pattern01.lc 7:1-7:5
+7:1-7:5
     Char -> Char
-pattern01.lc 7:12-7:15
+7:12-7:15
     Char
-pattern01.lc 7:12-8:13
+7:12-8:13
     Bool -> Char
-pattern01.lc 8:10-8:13
+8:10-8:13
     Char
-pattern01.lc 10:1-10:5
+10:1-10:5
     () -> Char
-pattern01.lc 10:11-10:14
+10:11-10:14
     Char
 ------------ warnings
-Source code is not reachable: pattern01.lc:11:10:
+Source code is not reachable: ./testdata/language-features/pattern/pattern01.lc:11:10:
 fun4 _ = '_'
          ^^^
\ No newline at end of file
diff --git a/testdata/language-features/pattern/pattern02.reject.out b/testdata/language-features/pattern/pattern02.reject.out
index 1faf6d91..ac26e09a 100644
--- a/testdata/language-features/pattern/pattern02.reject.out
+++ b/testdata/language-features/pattern/pattern02.reject.out
@@ -1,3 +1,3 @@
-Constructor X is not defined at pattern02.reject.lc:4:3:
+Constructor X is not defined at ./testdata/language-features/pattern/pattern02.reject.lc:4:3:
 f X = 3
   ^
\ No newline at end of file
diff --git a/testdata/language-features/pattern/patternGuard.out b/testdata/language-features/pattern/patternGuard.out
index 58c5e666..f7e7f468 100644
--- a/testdata/language-features/pattern/patternGuard.out
+++ b/testdata/language-features/pattern/patternGuard.out
@@ -19,28 +19,28 @@ main
 main :: Bool
 main = _rhs True
 ------------ tooltips
-patternGuard.lc 4:1-4:5
+4:1-4:5
     Bool
-patternGuard.lc 4:8-5:56
+4:8-5:56
     Bool
-patternGuard.lc 4:13-4:17
+4:13-4:17
     Bool
-patternGuard.lc 5:18-5:23
+5:18-5:23
     Bool
-patternGuard.lc 5:18-5:56
+5:18-5:56
     Bool
-patternGuard.lc 5:33-5:34
+5:33-5:34
     _b
-patternGuard.lc 5:33-5:56
+5:33-5:56
     Bool
-patternGuard.lc 5:44-5:48
+5:44-5:48
     Bool
-patternGuard.lc 5:44-5:56
+5:44-5:56
     Bool
-patternGuard.lc 5:52-5:56
+5:52-5:56
     Bool
 ------------ warnings
-Uncovered pattern(s) at patternGuard.lc:4:13:
+Uncovered pattern(s) at ./testdata/language-features/pattern/patternGuard.lc:4:13:
 main = case True of
             ^^^^
 Missing case(s):
diff --git a/testdata/language-features/pattern/uncovered.out b/testdata/language-features/pattern/uncovered.out
index 9d531171..10f0c7c4 100644
--- a/testdata/language-features/pattern/uncovered.out
+++ b/testdata/language-features/pattern/uncovered.out
@@ -171,37 +171,37 @@ h
       b)
     a
 ------------ tooltips
-uncovered.lc 2:1-2:2
+2:1-2:2
     forall a . Num a => Bool -> Bool -> Bool -> a
-uncovered.lc 2:18-2:19
+2:18-2:19
     _b
-uncovered.lc 2:18-3:19
+2:18-3:19
     Bool -> _c | _c
-uncovered.lc 2:18-4:19
+2:18-4:19
     Bool -> _c
-uncovered.lc 3:18-3:19
+3:18-3:19
     _b | _b | _b | _c
-uncovered.lc 3:18-4:19
+3:18-4:19
     Bool -> _c | _b
-uncovered.lc 4:18-4:19
+4:18-4:19
     _b
-uncovered.lc 6:1-6:2
+6:1-6:2
     [Bool] -> Bool
-uncovered.lc 6:25-6:30
+6:25-6:30
     Bool | Bool | Bool | Bool | Bool | Bool | Bool
-uncovered.lc 8:1-8:2
+8:1-8:2
     [[Bool]] -> Bool
-uncovered.lc 8:23-8:27
+8:23-8:27
     Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool
 ------------ warnings
-Uncovered pattern(s) at uncovered.lc:2:1:
+Uncovered pattern(s) at ./testdata/language-features/pattern/uncovered.lc:2:1:
 f _ True False = 0
 f False _ True = 1
 f True False _ = 2
 Missing case(s):
     f False False False
     f True True True
-Uncovered pattern(s) at uncovered.lc:6:1:
+Uncovered pattern(s) at ./testdata/language-features/pattern/uncovered.lc:6:1:
 g [True, False, True] = False
 ^
 Missing case(s):
@@ -212,7 +212,7 @@ Missing case(s):
     g (True : False : False : _)
     g (True : False : True : _ : _)
     g (True : True : _)
-Uncovered pattern(s) at uncovered.lc:8:1:
+Uncovered pattern(s) at ./testdata/language-features/pattern/uncovered.lc:8:1:
 h [[True], [False]] = True
 ^
 Missing case(s):
diff --git a/testdata/language-features/pattern/unreachable.out b/testdata/language-features/pattern/unreachable.out
index 050bb5b5..b409a387 100644
--- a/testdata/language-features/pattern/unreachable.out
+++ b/testdata/language-features/pattern/unreachable.out
@@ -5,11 +5,11 @@ f = _lhs f \(_ :: _) -> _rhs "hello"
 f :: forall a . a -> String
 f = \a _ -> _rhs "hello"
 ------------ tooltips
-unreachable.lc 4:1-4:2
+4:1-4:2
     forall a . a -> String
-unreachable.lc 4:7-4:14
+4:7-4:14
     String
 ------------ warnings
-Source code is not reachable: unreachable.lc:5:7:
+Source code is not reachable: ./testdata/language-features/pattern/unreachable.lc:5:7:
 f _ = "world"
       ^^^^^^^
\ No newline at end of file
diff --git a/testdata/language-features/pattern/viewPattern.out b/testdata/language-features/pattern/viewPattern.out
index 6ac0ac61..fc6f76ca 100644
--- a/testdata/language-features/pattern/viewPattern.out
+++ b/testdata/language-features/pattern/viewPattern.out
@@ -14,24 +14,24 @@ id = \a b -> _rhs b
 main :: Bool
 main = _rhs True
 ------------ tooltips
-viewPattern.lc 4:1-4:3
+4:1-4:3
     forall a . a -> a
-viewPattern.lc 4:8-4:9
+4:8-4:9
     _b
-viewPattern.lc 6:1-6:5
+6:1-6:5
     Bool
-viewPattern.lc 6:8-7:25
+6:8-7:25
     Bool
-viewPattern.lc 6:13-6:17
+6:13-6:17
     Bool
-viewPattern.lc 7:6-7:8
+7:6-7:8
     forall a . a -> a | _b
-viewPattern.lc 7:6-7:25
+7:6-7:25
     Bool
-viewPattern.lc 7:21-7:25
+7:21-7:25
     Bool
 ------------ warnings
-Uncovered pattern(s) at viewPattern.lc:6:13:
+Uncovered pattern(s) at ./testdata/language-features/pattern/viewPattern.lc:6:13:
 main = case True of
             ^^^^
 Missing case(s):
diff --git a/testdata/language-features/pragma/pragma05.reject.out b/testdata/language-features/pragma/pragma05.reject.out
index 8e9ffaed..00e66f76 100644
--- a/testdata/language-features/pragma/pragma05.reject.out
+++ b/testdata/language-features/pragma/pragma05.reject.out
@@ -1,2 +1,2 @@
-testdata/language-features/pragma/pragma05.reject.lc:1:20:
-language extension expected instead of ABCDEF
+./testdata/language-features/pragma/pragma05.reject.lc:1:20:
+language extension expected instead of ABCDEF
\ No newline at end of file
diff --git a/testdata/language-features/pragma/pragma06.reject.out b/testdata/language-features/pragma/pragma06.reject.out
index 13427392..726d1bfe 100644
--- a/testdata/language-features/pragma/pragma06.reject.out
+++ b/testdata/language-features/pragma/pragma06.reject.out
@@ -1,2 +1,2 @@
-testdata/language-features/pragma/pragma06.reject.lc:1:18:
-language extension expected instead of abcd
+./testdata/language-features/pragma/pragma06.reject.lc:1:18:
+language extension expected instead of abcd
\ No newline at end of file
diff --git a/testdata/language-features/recursion/mutualConst.out b/testdata/language-features/recursion/mutualConst.out
index 62272011..8580bb8c 100644
--- a/testdata/language-features/recursion/mutualConst.out
+++ b/testdata/language-features/recursion/mutualConst.out
@@ -117,72 +117,72 @@ xy = primFix _ \a -> _rhs (False : snd a, True : fst a)
 y :: [Bool]
 y = _rhs (True : fst xy)
 ------------ tooltips
-mutualConst.lc 4:1-4:4
+4:1-4:4
     forall a b . (a, b) -> a
-mutualConst.lc 4:14-4:15
+4:14-4:15
     _k | _h | _d
-mutualConst.lc 5:1-5:4
+5:1-5:4
     forall a b . (a, b) -> b
-mutualConst.lc 5:14-5:15
+5:14-5:15
     _f | _c | _c
-mutualConst.lc 7:1-7:3
+7:1-7:3
     ([Bool], [Bool])
-mutualConst.lc 7:6-7:44
+7:6-7:44
     [Bool] -> ([Bool], [Bool])
-mutualConst.lc 7:6-7:53
+7:6-7:53
     ([Bool], [Bool])
-mutualConst.lc 7:15-7:34
+7:15-7:34
     ([Bool], [Bool])
-mutualConst.lc 7:16-7:21
+7:16-7:21
     Bool
-mutualConst.lc 7:16-7:22
+7:16-7:22
     [Bool] -> [Bool]
-mutualConst.lc 7:16-7:24
+7:16-7:24
     [Bool]
-mutualConst.lc 7:21-7:22
+7:21-7:22
     forall a . a -> [a] -> [a]
-mutualConst.lc 7:23-7:24
+7:23-7:24
     _c
-mutualConst.lc 7:26-7:30
+7:26-7:30
     Bool
-mutualConst.lc 7:26-7:31
+7:26-7:31
     [Bool] -> [Bool]
-mutualConst.lc 7:26-7:33
+7:26-7:33
     [Bool] | (([Bool]))
-mutualConst.lc 7:30-7:31
+7:30-7:31
     forall a . a -> [a] -> [a]
-mutualConst.lc 7:32-7:33
+7:32-7:33
     _e
-mutualConst.lc 7:37-7:40
+7:37-7:40
     forall a b . (a, b) -> a
-mutualConst.lc 7:37-7:43
+7:37-7:43
     _b
-mutualConst.lc 7:41-7:43
+7:41-7:43
     _d
-mutualConst.lc 7:46-7:49
+7:46-7:49
     forall a b . (a, b) -> b
-mutualConst.lc 7:46-7:52
+7:46-7:52
     [Bool]
-mutualConst.lc 7:50-7:52
+7:50-7:52
     ([Bool], [Bool])
-mutualConst.lc 9:2-9:3
+9:2-9:3
     _k | _h | _d | [Bool]
-mutualConst.lc 9:2-9:6
+9:2-9:6
     ([Bool], [Bool]) | ([Bool], [Bool]) | ([Bool], [Bool])
-mutualConst.lc 9:5-9:6
+9:5-9:6
     _f | _c | _c | [Bool]
-mutualConst.lc 9:10-9:12
+9:10-9:12
     ([Bool], [Bool])
-mutualConst.lc 11:1-11:5
+11:1-11:5
     Bool
-mutualConst.lc 11:8-12:34
+11:8-12:34
     Bool
-mutualConst.lc 11:13-11:14
+11:13-11:14
     [Bool]
-mutualConst.lc 12:30-12:34
+12:30-12:34
     Bool | Bool | Bool | Bool | Bool | Bool
 ------------ warnings
-Uncovered pattern(s) at mutualConst.lc:11:13:
+Uncovered pattern(s) at ./testdata/language-features/recursion/mutualConst.lc:11:13:
 main = case x of
             ^
 Missing case(s):
diff --git a/testdata/language-features/recursion/mutualFunc.out b/testdata/language-features/recursion/mutualFunc.out
index 91217651..3f951467 100644
--- a/testdata/language-features/recursion/mutualFunc.out
+++ b/testdata/language-features/recursion/mutualFunc.out
@@ -67,41 +67,41 @@ g = \a -> case'Bool (\_ -> 'Bool) (_rhs (f a)) (_rhs True) a
 main :: Bool
 main = _rhs True
 ------------ tooltips
-mutualFunc.lc 4:1-4:2
+4:1-4:2
     _f | _c | _c | _f | _c | _c | Bool -> Bool
-mutualFunc.lc 4:1-7:2
+4:1-7:2
     _b | _e | (_e, _d) | (Bool -> Bool, Bool -> Bool) | (Bool -> Bool
     , Bool -> Bool) | (Bool -> Bool, Bool -> Bool) | (Bool -> Bool
     , Bool -> Bool) | (Bool -> Bool, Bool -> Bool)
-mutualFunc.lc 4:10-4:11
+4:10-4:11
     Bool -> _a
-mutualFunc.lc 4:10-4:17
+4:10-4:17
     _a
-mutualFunc.lc 4:10-5:17
+4:10-5:17
     Bool -> _a | ((Bool -> _a))
-mutualFunc.lc 4:10-8:10
+4:10-8:10
     (Bool -> Bool, Bool -> _a)
-mutualFunc.lc 4:12-4:17
+4:12-4:17
     Bool
-mutualFunc.lc 5:11-5:12
+5:11-5:12
     _i
-mutualFunc.lc 5:13-5:17
+5:13-5:17
     Bool
-mutualFunc.lc 7:1-7:2
+7:1-7:2
     _k | _h | _d | _k | _h | _d | Bool -> Bool
-mutualFunc.lc 7:10-7:14
+7:10-7:14
     Bool
-mutualFunc.lc 7:10-8:10
+7:10-8:10
     Bool -> Bool
-mutualFunc.lc 8:7-8:8
+8:7-8:8
     _h
-mutualFunc.lc 8:9-8:10
+8:9-8:10
     _f
-mutualFunc.lc 10:1-10:5
+10:1-10:5
     Bool
-mutualFunc.lc 10:8-10:9
+10:8-10:9
     Bool -> Bool
-mutualFunc.lc 10:8-10:14
+10:8-10:14
     Bool
-mutualFunc.lc 10:10-10:14
+10:10-10:14
     Bool
\ No newline at end of file
diff --git a/testdata/language-features/recursion/mutualRec.out b/testdata/language-features/recursion/mutualRec.out
index aada1a7d..e802e888 100644
--- a/testdata/language-features/recursion/mutualRec.out
+++ b/testdata/language-features/recursion/mutualRec.out
@@ -89,45 +89,45 @@ x = _rhs (False : y)
 y :: [Bool]
 y = _rhs (True : x)
 ------------ tooltips
-mutualRec.lc 4:1-4:2
+4:1-4:2
     _f | _c | _c | _f | _c | _c | [Bool]
-mutualRec.lc 4:1-5:2
+4:1-5:2
     _b | _e | (_e, _d) | ([Bool], [Bool]) | ([Bool], [Bool]) | ([Bool]
     , [Bool]) | ([Bool], [Bool]) | ([Bool], [Bool])
-mutualRec.lc 4:5-4:10
+4:5-4:10
     Bool
-mutualRec.lc 4:5-4:11
+4:5-4:11
     [Bool] -> [Bool]
-mutualRec.lc 4:5-4:13
+4:5-4:13
     [Bool] | (([Bool]))
-mutualRec.lc 4:5-5:12
+4:5-5:12
     ([Bool], [Bool])
-mutualRec.lc 4:10-4:11
+4:10-4:11
     forall a . a -> [a] -> [a]
-mutualRec.lc 4:12-4:13
+4:12-4:13
     _e
-mutualRec.lc 5:1-5:2
+5:1-5:2
     _k | _h | _d | _k | _h | _d | [Bool]
-mutualRec.lc 5:5-5:9
+5:5-5:9
     Bool
-mutualRec.lc 5:5-5:10
+5:5-5:10
     [Bool] -> [Bool]
-mutualRec.lc 5:5-5:12
+5:5-5:12
     [Bool]
-mutualRec.lc 5:9-5:10
+5:9-5:10
     forall a . a -> [a] -> [a]
-mutualRec.lc 5:11-5:12
+5:11-5:12
     _d
-mutualRec.lc 7:1-7:5
+7:1-7:5
     Bool
-mutualRec.lc 7:8-8:34
+7:8-8:34
     Bool
-mutualRec.lc 7:13-7:14
+7:13-7:14
     [Bool]
-mutualRec.lc 8:30-8:34
+8:30-8:34
     Bool | Bool | Bool | Bool | Bool | Bool
 ------------ warnings
-Uncovered pattern(s) at mutualRec.lc:7:13:
+Uncovered pattern(s) at ./testdata/language-features/recursion/mutualRec.lc:7:13:
 main = case x of
             ^
 Missing case(s):
diff --git a/testdata/language-features/recursion/simplerec01.out b/testdata/language-features/recursion/simplerec01.out
index 892eebfc..aa6fa74b 100644
--- a/testdata/language-features/recursion/simplerec01.out
+++ b/testdata/language-features/recursion/simplerec01.out
@@ -20,13 +20,13 @@ fun
       (_rhs 'a')
       ((a == c) (fromInt a d 0) f)
 ------------ tooltips
-simplerec01.lc 1:1-1:4
+1:1-1:4
     forall a . (Num a, Eq a, Num a) => a -> Char
-simplerec01.lc 1:9-1:12
+1:9-1:12
     Char
-simplerec01.lc 1:9-2:14
+1:9-2:14
     Bool -> Char
-simplerec01.lc 2:9-2:12
+2:9-2:12
     _e
-simplerec01.lc 2:13-2:14
+2:13-2:14
     _b
\ No newline at end of file
diff --git a/testdata/language-features/recursion/simplerec02.out b/testdata/language-features/recursion/simplerec02.out
index 21d25b22..ce6b7316 100644
--- a/testdata/language-features/recursion/simplerec02.out
+++ b/testdata/language-features/recursion/simplerec02.out
@@ -19,15 +19,15 @@ value
 value :: ()
 value = _rhs ()
 ------------ tooltips
-simplerec02.lc 1:1-1:6
+1:1-1:6
     ()
-simplerec02.lc 1:21-1:24
+1:21-1:24
     Char
-simplerec02.lc 1:21-2:26
+1:21-2:26
     Bool -> Char
-simplerec02.lc 2:21-2:24
+2:21-2:24
     _e
-simplerec02.lc 2:25-2:26
+2:25-2:26
     _b
-simplerec02.lc 3:12-3:14
+3:12-3:14
     ()
\ No newline at end of file
diff --git a/testdata/language-features/recursion/simplerec03.out b/testdata/language-features/recursion/simplerec03.out
index eb7bf3cc..593f6f14 100644
--- a/testdata/language-features/recursion/simplerec03.out
+++ b/testdata/language-features/recursion/simplerec03.out
@@ -19,15 +19,15 @@ value
 value :: ()
 value = _rhs ()
 ------------ tooltips
-simplerec03.lc 1:1-1:6
+1:1-1:6
     ()
-simplerec03.lc 1:9-1:11
+1:9-1:11
     ()
-simplerec03.lc 3:13-3:16
+3:13-3:16
     Char
-simplerec03.lc 3:13-4:18
+3:13-4:18
     Bool -> Char
-simplerec03.lc 4:13-4:16
+4:13-4:16
     _e
-simplerec03.lc 4:17-4:18
+4:17-4:18
     _b
\ No newline at end of file
diff --git a/testdata/language-features/section/section01.out b/testdata/language-features/section/section01.out
index 3120b023..c6142ab2 100644
--- a/testdata/language-features/section/section01.out
+++ b/testdata/language-features/section/section01.out
@@ -15,23 +15,23 @@ value1 = \a b c -> _rhs \d -> c !@! d
 value2 :: forall a b . a -> b -> ()
 value2 = \a b c -> _rhs \d -> d !@! c
 ------------ tooltips
-section01.lc 1:3-1:6
+1:3-1:6
     forall a b . a -> b -> ()
-section01.lc 1:11-1:13
+1:11-1:13
     ()
-section01.lc 3:1-3:7
+3:1-3:7
     forall a b . a -> b -> ()
-section01.lc 3:13-3:14
+3:13-3:14
     _f
-section01.lc 3:13-3:18
+3:13-3:18
     _a -> ()
-section01.lc 3:15-3:18
+3:15-3:18
     forall a b . a -> b -> ()
-section01.lc 5:1-5:7
+5:1-5:7
     forall a b . a -> b -> ()
-section01.lc 5:13-5:16
+5:13-5:16
     forall a b . a -> b -> ()
-section01.lc 5:13-5:18
+5:13-5:18
     ()
-section01.lc 5:17-5:18
+5:17-5:18
     _e
\ No newline at end of file
diff --git a/testdata/let.out b/testdata/let.out
index 8e0c0166..4fc851e1 100644
--- a/testdata/let.out
+++ b/testdata/let.out
@@ -10,17 +10,17 @@ f = \a b -> _rhs b
 id :: forall a . a -> a
 id = \a b -> _rhs b
 ------------ tooltips
-let.lc 4:1-4:3
+4:1-4:3
     forall a . a -> a
-let.lc 4:8-4:9
+4:8-4:9
     _b
-let.lc 6:1-6:2
+6:1-6:2
     forall a . a -> a
-let.lc 6:15-6:17
+6:15-6:17
     forall a . a -> a
-let.lc 6:15-6:19
+6:15-6:19
     _b
-let.lc 6:18-6:19
+6:18-6:19
     _c
-let.lc 6:23-6:24
+6:23-6:24
     _c
\ No newline at end of file
diff --git a/testdata/letIndent.out b/testdata/letIndent.out
index 3264a9a3..54c1229e 100644
--- a/testdata/letIndent.out
+++ b/testdata/letIndent.out
@@ -5,11 +5,11 @@ fun = _lhs fun \(a :: _) -> _rhs let b = fromInt 1; c = fromInt 2 in a
 fun :: forall a . a -> a
 fun = \a b -> _rhs b
 ------------ tooltips
-letIndent.lc 2:1-2:4
+2:1-2:4
     forall a . a -> a
-letIndent.lc 3:10-3:11
+3:10-3:11
     _b
-letIndent.lc 4:10-4:11
+4:10-4:11
     _b
-letIndent.lc 5:7-5:8
+5:7-5:8
     _d
\ No newline at end of file
diff --git a/testdata/listcompr01.out b/testdata/listcompr01.out
index 9ac873c7..88ae7e7d 100644
--- a/testdata/listcompr01.out
+++ b/testdata/listcompr01.out
@@ -49,48 +49,48 @@ a
 main :: Bool
 main = _rhs True
 ------------ tooltips
-listcompr01.lc 1:6-1:21
+1:6-1:21
     Type
-listcompr01.lc 1:7-1:20
+1:7-1:20
     Type
-listcompr01.lc 1:8-1:13
+1:8-1:13
     Type
-listcompr01.lc 1:8-1:19
+1:8-1:19
     [Type]
-listcompr01.lc 1:14-1:19
+1:14-1:19
     Type | [Type]
-listcompr01.lc 2:1-2:2
+2:1-2:2
     [(Float, Float)]
-listcompr01.lc 2:5-2:35
+2:5-2:35
     [(Float, Float)]
-listcompr01.lc 2:6-2:11
+2:6-2:11
     (_f, _c) | [(_e, _b)]
-listcompr01.lc 2:6-2:34
+2:6-2:34
     [(_b, Float)]
-listcompr01.lc 2:7-2:8
+2:7-2:8
     _i
-listcompr01.lc 2:9-2:10
+2:9-2:10
     _f | ((_c))
-listcompr01.lc 2:17-2:22
+2:17-2:22
     [Float]
-listcompr01.lc 2:18-2:21
+2:18-2:21
     Float
-listcompr01.lc 2:29-2:34
+2:29-2:34
     [Float]
-listcompr01.lc 2:30-2:33
+2:30-2:33
     Float
-listcompr01.lc 4:9-4:13
+4:9-4:13
     Type
-listcompr01.lc 5:1-5:5
+5:1-5:5
     Bool
-listcompr01.lc 5:8-6:29
+5:8-6:29
     Bool
-listcompr01.lc 5:13-5:14
+5:13-5:14
     [(Float, Float)]
-listcompr01.lc 6:25-6:29
+6:25-6:29
     Bool | Bool | Bool | Bool | Bool | Bool | Bool
 ------------ warnings
-Uncovered pattern(s) at listcompr01.lc:5:13:
+Uncovered pattern(s) at ./testdata/listcompr01.lc:5:13:
 main = case a of
             ^
 Missing case(s):
diff --git a/testdata/listcompr01.reject.out b/testdata/listcompr01.reject.out
index 9984d166..4a83b569 100644
--- a/testdata/listcompr01.reject.out
+++ b/testdata/listcompr01.reject.out
@@ -1,3 +1,3 @@
-testdata/listcompr01.reject.lc:6:42:
+./testdata/listcompr01.reject.lc:6:42:
 unexpected ','
-expecting "->", "::", "=>", "let", "where", ''', '(', '@', '[', '_', '{', '~', backquoted ident, end of input, expression, lambda, literal, lowercase ident, rest of expression, swizzling, symbols, or uppercase ident
+expecting "->", "::", "=>", "let", "where", ''', '(', '@', '[', '_', '{', '~', backquoted ident, end of input, expression, lambda, literal, lowercase ident, rest of expression, swizzling, symbols, or uppercase ident
\ No newline at end of file
diff --git a/testdata/listcompr02.out b/testdata/listcompr02.out
index c0099443..0f270749 100644
--- a/testdata/listcompr02.out
+++ b/testdata/listcompr02.out
@@ -121,68 +121,68 @@ a
 main :: Bool
 main = _rhs True
 ------------ tooltips
-listcompr02.lc 1:6-1:21
+1:6-1:21
     Type
-listcompr02.lc 1:7-1:20
+1:7-1:20
     Type
-listcompr02.lc 1:8-1:13
+1:8-1:13
     Type
-listcompr02.lc 1:8-1:19
+1:8-1:19
     [Type]
-listcompr02.lc 1:14-1:19
+1:14-1:19
     Type | [Type]
-listcompr02.lc 2:1-2:2
+2:1-2:2
     [(Float, Float)]
-listcompr02.lc 2:5-2:51
+2:5-2:51
     [(Float, Float)]
-listcompr02.lc 2:6-2:17
+2:6-2:17
     (_g, _g) | [(_e, _e)]
-listcompr02.lc 2:6-2:50
+2:6-2:50
     [(_d, _d)]
-listcompr02.lc 2:7-2:8
+2:7-2:8
     _k
-listcompr02.lc 2:7-2:10
+2:7-2:10
     MatVecScalarElem _j -> _j
-listcompr02.lc 2:7-2:11
+2:7-2:11
     _h
-listcompr02.lc 2:8-2:10
+2:8-2:10
     forall a . Num (MatVecScalarElem a) => a -> MatVecScalarElem a -> a
-listcompr02.lc 2:10-2:11
+2:10-2:11
     _f
-listcompr02.lc 2:12-2:13
+2:12-2:13
     _k
-listcompr02.lc 2:12-2:15
+2:12-2:15
     MatVecScalarElem _j -> _j
-listcompr02.lc 2:12-2:16
+2:12-2:16
     _i | ((_g))
-listcompr02.lc 2:13-2:15
+2:13-2:15
     forall a . Num (MatVecScalarElem a) => a -> MatVecScalarElem a -> a
-listcompr02.lc 2:15-2:16
+2:15-2:16
     MatVecScalarElem _i
-listcompr02.lc 2:23-2:33
+2:23-2:33
     [Float]
-listcompr02.lc 2:24-2:27
+2:24-2:27
     Float
-listcompr02.lc 2:29-2:32
+2:29-2:32
     Float | [Float]
-listcompr02.lc 2:40-2:50
+2:40-2:50
     [Float]
-listcompr02.lc 2:41-2:44
+2:41-2:44
     Float
-listcompr02.lc 2:46-2:49
+2:46-2:49
     Float | [Float]
-listcompr02.lc 4:9-4:13
+4:9-4:13
     Type
-listcompr02.lc 5:1-5:5
+5:1-5:5
     Bool
-listcompr02.lc 5:8-6:59
+5:8-6:59
     Bool
-listcompr02.lc 5:13-5:14
+5:13-5:14
     [(Float, Float)]
-listcompr02.lc 6:55-6:59
+6:55-6:59
     Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool
 ------------ warnings
-Uncovered pattern(s) at listcompr02.lc:5:13:
+Uncovered pattern(s) at ./testdata/listcompr02.lc:5:13:
 main = case a of
             ^
 Missing case(s):
diff --git a/testdata/listcompr03.out b/testdata/listcompr03.out
index 0b270aaa..b74b2815 100644
--- a/testdata/listcompr03.out
+++ b/testdata/listcompr03.out
@@ -121,78 +121,78 @@ a
 main :: Bool
 main = _rhs True
 ------------ tooltips
-listcompr03.lc 1:6-1:21
+1:6-1:21
     Type
-listcompr03.lc 1:7-1:20
+1:7-1:20
     Type
-listcompr03.lc 1:8-1:13
+1:8-1:13
     Type
-listcompr03.lc 1:8-1:19
+1:8-1:19
     [Type]
-listcompr03.lc 1:14-1:19
+1:14-1:19
     Type | [Type]
-listcompr03.lc 2:1-2:2
+2:1-2:2
     [(Float, Float)]
-listcompr03.lc 2:6-2:20
+2:6-2:20
     (Float, Float) | [(Float, Float)]
-listcompr03.lc 2:6-2:63
+2:6-2:63
     [(Float, Float)]
-listcompr03.lc 2:7-2:8
+2:7-2:8
     Float
-listcompr03.lc 2:7-2:10
+2:7-2:10
     MatVecScalarElem Float -> Float
-listcompr03.lc 2:7-2:11
+2:7-2:11
     Float
-listcompr03.lc 2:7-2:13
+2:7-2:13
     MatVecScalarElem Float -> Float
-listcompr03.lc 2:7-2:14
+2:7-2:14
     Float
-listcompr03.lc 2:8-2:10
+2:8-2:10
     forall a . Num (MatVecScalarElem a) => a -> MatVecScalarElem a -> a
-listcompr03.lc 2:10-2:11
+2:10-2:11
     _j
-listcompr03.lc 2:11-2:13
+2:11-2:13
     forall a . Num (MatVecScalarElem a) => a -> MatVecScalarElem a -> a
-listcompr03.lc 2:13-2:14
+2:13-2:14
     _e
-listcompr03.lc 2:15-2:16
+2:15-2:16
     Float
-listcompr03.lc 2:15-2:18
+2:15-2:18
     MatVecScalarElem Float -> Float
-listcompr03.lc 2:15-2:19
+2:15-2:19
     Float | ((Float))
-listcompr03.lc 2:16-2:18
+2:16-2:18
     forall a . Num (MatVecScalarElem a) => a -> MatVecScalarElem a -> a
-listcompr03.lc 2:18-2:19
+2:18-2:19
     Float
-listcompr03.lc 2:25-2:26
+2:25-2:26
     _b | Float
-listcompr03.lc 2:29-2:32
+2:29-2:32
     Float
-listcompr03.lc 2:38-2:46
+2:38-2:46
     [Float]
-listcompr03.lc 2:39-2:42
+2:39-2:42
     Float
-listcompr03.lc 2:44-2:45
+2:44-2:45
     Float | [Float]
-listcompr03.lc 2:53-2:63
+2:53-2:63
     [Float]
-listcompr03.lc 2:54-2:57
+2:54-2:57
     Float
-listcompr03.lc 2:59-2:62
+2:59-2:62
     Float | [Float]
-listcompr03.lc 4:9-4:13
+4:9-4:13
     Type
-listcompr03.lc 5:1-5:5
+5:1-5:5
     Bool
-listcompr03.lc 5:8-6:59
+5:8-6:59
     Bool
-listcompr03.lc 5:13-5:14
+5:13-5:14
     [(Float, Float)]
-listcompr03.lc 6:55-6:59
+6:55-6:59
     Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool | Bool
 ------------ warnings
-Uncovered pattern(s) at listcompr03.lc:5:13:
+Uncovered pattern(s) at ./testdata/listcompr03.lc:5:13:
 main = case a of
             ^
 Missing case(s):
diff --git a/testdata/listcompr04.out b/testdata/listcompr04.out
index d0f5639d..83fbb25e 100644
--- a/testdata/listcompr04.out
+++ b/testdata/listcompr04.out
@@ -40,46 +40,46 @@ a = _rhs (1.0 *! k : [] ++ foldr (++) [] (map (\a -> [a *! k]) [k]))
 main :: Bool
 main = _rhs True
 ------------ tooltips
-listcompr04.lc 1:6-1:13
+1:6-1:13
     Type
-listcompr04.lc 1:7-1:12
+1:7-1:12
     Type
-listcompr04.lc 2:1-2:2
+2:1-2:2
     [Float]
-listcompr04.lc 2:6-2:7
+2:6-2:7
     _f
-listcompr04.lc 2:6-2:9
+2:6-2:9
     MatVecScalarElem _e -> _e
-listcompr04.lc 2:6-2:10
+2:6-2:10
     _e | [_d]
-listcompr04.lc 2:6-2:36
+2:6-2:36
     [Float]
-listcompr04.lc 2:7-2:9
+2:7-2:9
     forall a . Num (MatVecScalarElem a) => a -> MatVecScalarElem a -> a
-listcompr04.lc 2:9-2:10
+2:9-2:10
     Float
-listcompr04.lc 2:15-2:16
+2:15-2:16
     _b | Float
-listcompr04.lc 2:19-2:22
+2:19-2:22
     Float
-listcompr04.lc 2:28-2:36
+2:28-2:36
     [Float]
-listcompr04.lc 2:29-2:32
+2:29-2:32
     Float
-listcompr04.lc 2:34-2:35
+2:34-2:35
     Float | [Float]
-listcompr04.lc 4:9-4:13
+4:9-4:13
     Type
-listcompr04.lc 5:1-5:5
+5:1-5:5
     Bool
-listcompr04.lc 5:8-6:28
+5:8-6:28
     Bool
-listcompr04.lc 5:13-5:14
+5:13-5:14
     [Float]
-listcompr04.lc 6:24-6:28
+6:24-6:28
     Bool | Bool | Bool | Bool | Bool
 ------------ warnings
-Uncovered pattern(s) at listcompr04.lc:5:13:
+Uncovered pattern(s) at ./testdata/listcompr04.lc:5:13:
 main = case a of
             ^
 Missing case(s):
diff --git a/testdata/listcompr05.out b/testdata/listcompr05.out
index df96666f..8c25c77a 100644
--- a/testdata/listcompr05.out
+++ b/testdata/listcompr05.out
@@ -73,68 +73,68 @@ isZero
 main :: Bool
 main = _rhs True
 ------------ tooltips
-listcompr05.lc 1:11-1:16
+1:11-1:16
     Type
-listcompr05.lc 1:20-1:24
+1:20-1:24
     Type | Type
-listcompr05.lc 2:1-2:7
+2:1-2:7
     Float -> Bool
-listcompr05.lc 2:14-2:18
+2:14-2:18
     Bool
-listcompr05.lc 2:14-3:17
+2:14-3:17
     Bool -> Bool | Bool
-listcompr05.lc 3:12-3:17
+3:12-3:17
     Bool
-listcompr05.lc 5:6-5:13
+5:6-5:13
     Type
-listcompr05.lc 5:7-5:12
+5:7-5:12
     Type
-listcompr05.lc 6:1-6:2
+6:1-6:2
     [Float]
-listcompr05.lc 6:5-6:51
+6:5-6:51
     [Float]
-listcompr05.lc 6:6-6:7
+6:6-6:7
     Float
-listcompr05.lc 6:6-6:9
+6:6-6:9
     MatVecScalarElem Float -> Float
-listcompr05.lc 6:6-6:10
+6:6-6:10
     Float | [Float]
-listcompr05.lc 6:6-6:50
+6:6-6:50
     [Float] -> [Float] | [Float] | [Float]
-listcompr05.lc 6:7-6:9
+6:7-6:9
     forall a . Num (MatVecScalarElem a) => a -> MatVecScalarElem a -> a
-listcompr05.lc 6:9-6:10
+6:9-6:10
     _d
-listcompr05.lc 6:16-6:25
+6:16-6:25
     [Float]
-listcompr05.lc 6:17-6:20
+6:17-6:20
     Float
-listcompr05.lc 6:21-6:24
+6:21-6:24
     Float | [Float]
-listcompr05.lc 6:32-6:41
+6:32-6:41
     [Float]
-listcompr05.lc 6:33-6:36
+6:33-6:36
     Float
-listcompr05.lc 6:37-6:40
+6:37-6:40
     Float | [Float]
-listcompr05.lc 6:42-6:48
+6:42-6:48
     Float -> Bool
-listcompr05.lc 6:42-6:50
+6:42-6:50
     Bool
-listcompr05.lc 6:49-6:50
+6:49-6:50
     _g
-listcompr05.lc 8:9-8:13
+8:9-8:13
     Type
-listcompr05.lc 9:1-9:5
+9:1-9:5
     Bool
-listcompr05.lc 9:8-10:27
+9:8-10:27
     Bool
-listcompr05.lc 9:13-9:14
+9:13-9:14
     [Float]
-listcompr05.lc 10:23-10:27
+10:23-10:27
     Bool | Bool | Bool | Bool | Bool
 ------------ warnings
-Uncovered pattern(s) at listcompr05.lc:9:13:
+Uncovered pattern(s) at ./testdata/listcompr05.lc:9:13:
 main = case a of
             ^
 Missing case(s):
diff --git a/testdata/localfun.out b/testdata/localfun.out
index 7027bc5f..627b8c67 100644
--- a/testdata/localfun.out
+++ b/testdata/localfun.out
@@ -17,45 +17,45 @@ f = \a b -> _rhs (g a)
 main :: Bool
 main = _rhs True
 ------------ tooltips
-localfun.lc 3:1-3:2
+3:1-3:2
     Bool -> Bool -> Bool
-localfun.lc 3:9-3:10
+3:9-3:10
     Bool -> Bool
-localfun.lc 3:9-3:12
+3:9-3:12
     Bool
-localfun.lc 3:11-3:12
+3:11-3:12
     _d
-localfun.lc 5:14-5:18
+5:14-5:18
     Bool
-localfun.lc 5:14-6:16
+5:14-6:16
     Bool -> Bool
-localfun.lc 6:15-6:16
+6:15-6:16
     _e
-localfun.lc 8:1-8:5
+8:1-8:5
     Bool
-localfun.lc 8:8-8:9
+8:8-8:9
     Bool -> Bool -> Bool
-localfun.lc 8:8-8:14
+8:8-8:14
     Bool -> Bool
-localfun.lc 8:8-8:20
+8:8-8:20
     Bool
-localfun.lc 8:8-8:23
+8:8-8:23
     Bool -> Bool
-localfun.lc 8:8-8:36
+8:8-8:36
     Bool
-localfun.lc 8:10-8:14
+8:10-8:14
     Bool
-localfun.lc 8:15-8:20
+8:15-8:20
     Bool
-localfun.lc 8:21-8:23
+8:21-8:23
     Bool -> Bool -> Bool
-localfun.lc 8:24-8:25
+8:24-8:25
     Bool -> Bool -> Bool
-localfun.lc 8:24-8:31
+8:24-8:31
     Bool -> Bool
-localfun.lc 8:24-8:36
+8:24-8:36
     Bool
-localfun.lc 8:26-8:31
+8:26-8:31
     Bool
-localfun.lc 8:32-8:36
+8:32-8:36
     Bool
\ No newline at end of file
diff --git a/testdata/localfun2.out b/testdata/localfun2.out
index 5c043c9b..f6ac91b6 100644
--- a/testdata/localfun2.out
+++ b/testdata/localfun2.out
@@ -54,37 +54,37 @@ split
           (b e)))
       c
 ------------ tooltips
-localfun2.lc 4:1-4:6
+4:1-4:6
     forall a . [a] -> ([a], [a])
-localfun2.lc 4:12-4:20
+4:12-4:20
     ([_b], [_a])
-localfun2.lc 4:12-5:55
+4:12-5:55
     [_b] -> ([_b], [_a])
-localfun2.lc 4:13-4:15
+4:13-4:15
     forall a . [a]
-localfun2.lc 4:17-4:19
+4:17-4:19
     forall a . [a] | (([_a]))
-localfun2.lc 5:17-5:28
+5:17-5:28
     ([_i], _c)
-localfun2.lc 5:18-5:19
+5:18-5:19
     _m
-localfun2.lc 5:18-5:20
+5:18-5:20
     [_l] -> [_l]
-localfun2.lc 5:18-5:23
+5:18-5:23
     [_j]
-localfun2.lc 5:19-5:20
+5:19-5:20
     forall a . a -> [a] -> [a]
-localfun2.lc 5:21-5:23
+5:21-5:23
     _d
-localfun2.lc 5:25-5:27
+5:25-5:27
     _f | ((_c))
-localfun2.lc 5:37-5:39
+5:37-5:39
     _k | _h | _d
-localfun2.lc 5:37-5:43
+5:37-5:43
     _d | (_e, _d)
-localfun2.lc 5:41-5:43
+5:41-5:43
     _f | _c | _c
-localfun2.lc 5:47-5:52
+5:47-5:52
     _i
-localfun2.lc 5:53-5:55
+5:53-5:55
     [_h]
\ No newline at end of file
diff --git a/testdata/loopIssue.out b/testdata/loopIssue.out
index 62e4cf1f..e5c03d9c 100644
--- a/testdata/loopIssue.out
+++ b/testdata/loopIssue.out
@@ -89,106 +89,106 @@ repeat = primFix _ \a b -> _rhs (typeAnn b : a b)
 repeatT :: [Bool]
 repeatT = primFix _ \a -> _rhs (True : a)
 ------------ tooltips
-loopIssue.lc 5:6-5:9
+5:6-5:9
     Type | Type | Type | Type | Type | Type
-loopIssue.lc 5:6-5:15
+5:6-5:15
     Type
-loopIssue.lc 5:12-5:15
+5:12-5:15
     Inf -> Inf | Inf | Type | Type
-loopIssue.lc 5:16-5:19
+5:16-5:19
     Type
-loopIssue.lc 7:1-7:4
+7:1-7:4
     Inf
-loopIssue.lc 7:7-7:10
+7:7-7:10
     Inf -> Inf
-loopIssue.lc 7:7-7:14
+7:7-7:14
     Inf
-loopIssue.lc 7:11-7:14
+7:11-7:14
     Inf
-loopIssue.lc 9:1-9:6
+9:1-9:6
     Bool
-loopIssue.lc 9:9-10:18
+9:9-10:18
     Bool
-loopIssue.lc 9:14-9:17
+9:14-9:17
     Inf
-loopIssue.lc 10:14-10:18
+10:14-10:18
     Bool
-loopIssue.lc 13:1-13:5
+13:1-13:5
     Inf
-loopIssue.lc 13:8-13:11
+13:8-13:11
     Inf
-loopIssue.lc 15:2-15:3
+15:2-15:3
     Int -> Int -> Int
-loopIssue.lc 15:7-15:17
+15:7-15:17
     Int -> Int -> Int
-loopIssue.lc 17:1-17:7
+17:1-17:7
     Bool -> [Bool]
-loopIssue.lc 17:12-17:24
+17:12-17:24
     [Bool] -> [Bool]
-loopIssue.lc 17:12-17:33
+17:12-17:33
     [Bool]
-loopIssue.lc 17:13-17:14
+17:13-17:14
     _b
-loopIssue.lc 17:13-17:22
+17:13-17:22
     Bool
-loopIssue.lc 17:18-17:22
+17:18-17:22
     Type
-loopIssue.lc 17:23-17:24
+17:23-17:24
     forall a . a -> [a] -> [a]
-loopIssue.lc 17:25-17:31
+17:25-17:31
     _c
-loopIssue.lc 17:32-17:33
+17:32-17:33
     Bool
-loopIssue.lc 19:1-19:8
+19:1-19:8
     [Bool]
-loopIssue.lc 19:11-19:15
+19:11-19:15
     Bool
-loopIssue.lc 19:11-19:16
+19:11-19:16
     [Bool] -> [Bool]
-loopIssue.lc 19:11-19:24
+19:11-19:24
     [Bool]
-loopIssue.lc 19:15-19:16
+19:15-19:16
     forall a . a -> [a] -> [a]
-loopIssue.lc 19:17-19:24
+19:17-19:24
     [Bool]
-loopIssue.lc 22:1-22:7
+22:1-22:7
     [Bool]
-loopIssue.lc 22:10-22:17
+22:10-22:17
     [Bool]
-loopIssue.lc 26:8-26:10
+26:8-26:10
     forall a . [a] -> Int -> a
-loopIssue.lc 26:15-26:16
+26:15-26:16
     _e
-loopIssue.lc 26:15-27:28
+26:15-27:28
     Bool -> _d | _c
-loopIssue.lc 27:17-27:19
+27:17-27:19
     [_h]
-loopIssue.lc 27:20-27:22
+27:20-27:22
     _k
-loopIssue.lc 27:24-27:25
+27:24-27:25
     _k
-loopIssue.lc 27:24-27:26
+27:24-27:26
     Int -> Int
-loopIssue.lc 27:24-27:27
+27:24-27:27
     Int
-loopIssue.lc 27:25-27:26
+27:25-27:26
     Int -> Int -> Int
-loopIssue.lc 27:26-27:27
+27:26-27:27
     _b
-loopIssue.lc 29:1-29:5
+29:1-29:5
     Bool
-loopIssue.lc 30:5-30:11
+30:5-30:11
     [Bool]
-loopIssue.lc 30:5-30:14
+30:5-30:14
     Int -> Bool
-loopIssue.lc 30:5-30:17
+30:5-30:17
     Bool
-loopIssue.lc 30:12-30:14
+30:12-30:14
     forall a . [a] -> Int -> a
-loopIssue.lc 30:15-30:17
+30:15-30:17
     _b
 ------------ warnings
-Uncovered pattern(s) at loopIssue.lc:26:8:
+Uncovered pattern(s) at ./testdata/loopIssue.lc:26:8:
 (x: _) !! 0 = x
 (_ : xs) !! n = xs !! (n-1)
 Missing case(s):
diff --git a/testdata/nameclash01.reject.out b/testdata/nameclash01.reject.out
index a2183345..645d906c 100644
--- a/testdata/nameclash01.reject.out
+++ b/testdata/nameclash01.reject.out
@@ -1,3 +1,3 @@
-Constructor FrameBuffer is not defined at nameclash01.reject.lc:2:9:
+Constructor FrameBuffer is not defined at ./testdata/nameclash01.reject.lc:2:9:
     let FrameBuffer = FrameBuffer (colorImage1 1.0)
         ^^^^^^^^^^^
\ No newline at end of file
diff --git a/testdata/performance/Material.out b/testdata/performance/Material.out
index 3fddcea1..58a16c18 100644
--- a/testdata/performance/Material.out
+++ b/testdata/performance/Material.out
@@ -1148,425 +1148,425 @@ saTextureUniform :: StageAttrs -> String
 saTextureUniform
   = \a -> case'StageAttrs (\_ -> 'String) (\_ _ _ _ _ _ _ _ _ _ b -> _rhs b) a
 ------------ tooltips
-Material.lc 7:18-7:23
+7:18-7:23
     Type
-Material.lc 8:1-8:14
+8:1-8:14
     Float
-Material.lc 8:17-8:18
+8:17-8:18
     _b
-Material.lc 10:6-10:12
+10:6-10:12
     Type | Type | Type | Type | Type | Type
-Material.lc 10:6-11:13
+10:6-11:13
     Type
-Material.lc 10:6-15:39
+10:6-15:39
     Type | Type | Type
-Material.lc 11:7-11:13
+11:7-11:13
     Vec 4 Float
       -> Vec 4 Float
         -> Vec 3 Float
           -> Vec 4 Float -> Entity | Entity | Type | Type | Type | Type | Type
-Material.lc 12:7-12:20
+12:7-12:20
     Entity -> VecS Float 4
-Material.lc 12:28-12:31
+12:28-12:31
     Nat -> Type -> Type
-Material.lc 12:28-12:33
+12:28-12:33
     Type -> Type
-Material.lc 12:28-12:39
+12:28-12:39
     Type
-Material.lc 12:32-12:33
+12:32-12:33
     _b
-Material.lc 12:34-12:39
+12:34-12:39
     Type
-Material.lc 13:7-13:21
+13:7-13:21
     Entity -> VecS Float 4
-Material.lc 13:28-13:31
+13:28-13:31
     Nat -> Type -> Type
-Material.lc 13:28-13:33
+13:28-13:33
     Type -> Type
-Material.lc 13:28-13:39
+13:28-13:39
     Type
-Material.lc 13:32-13:33
+13:32-13:33
     _b
-Material.lc 13:34-13:39
+13:34-13:39
     Type
-Material.lc 14:7-14:16
+14:7-14:16
     Entity -> VecS Float 3
-Material.lc 14:28-14:31
+14:28-14:31
     Nat -> Type -> Type
-Material.lc 14:28-14:33
+14:28-14:33
     Type -> Type
-Material.lc 14:28-14:39
+14:28-14:39
     Type
-Material.lc 14:32-14:33
+14:32-14:33
     _b
-Material.lc 14:34-14:39
+14:34-14:39
     Type
-Material.lc 15:7-15:18
+15:7-15:18
     Entity -> VecS Float 4
-Material.lc 15:28-15:31
+15:28-15:31
     Nat -> Type -> Type
-Material.lc 15:28-15:33
+15:28-15:33
     Type -> Type
-Material.lc 15:28-15:39
+15:28-15:39
     Type
-Material.lc 15:32-15:33
+15:32-15:33
     _b
-Material.lc 15:34-15:39
+15:34-15:39
     Type
-Material.lc 18:6-18:14
+18:6-18:14
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 18:6-24:15
+18:6-24:15
     Type | Type | Type | Type | Type | Type
-Material.lc 19:7-19:13
+19:7-19:13
     WaveType
-Material.lc 20:7-20:18
+20:7-20:18
     WaveType
-Material.lc 21:7-21:16
+21:7-21:16
     WaveType
-Material.lc 22:7-22:18
+22:7-22:18
     WaveType
-Material.lc 23:7-23:25
+23:7-23:25
     WaveType
-Material.lc 24:7-24:15
+24:7-24:15
     WaveType
-Material.lc 27:6-27:10
+27:6-27:10
     Type | Type | Type | Type | Type | Type
-Material.lc 27:6-27:17
+27:6-27:17
     Type
-Material.lc 27:6-27:50
+27:6-27:50
     Type | Type | Type | Type
-Material.lc 27:13-27:17
+27:13-27:17
     WaveType
       -> Float
         -> Float
           -> Float -> Float -> Wave | Wave | Type | Type | Type | Type | Type | Type
-Material.lc 27:18-27:26
+27:18-27:26
     Type
-Material.lc 27:27-27:32
+27:27-27:32
     Type
-Material.lc 27:33-27:38
+27:33-27:38
     Type
-Material.lc 27:39-27:44
+27:39-27:44
     Type
-Material.lc 27:45-27:50
+27:45-27:50
     Type
-Material.lc 29:6-29:12
+29:6-29:12
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 29:6-32:32
+29:6-32:32
     Type | Type
-Material.lc 29:6-33:32
+29:6-33:32
     Type
-Material.lc 29:6-34:27
+29:6-34:27
     Type
-Material.lc 29:6-44:13
+29:6-44:13
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 29:6-44:24
+29:6-44:24
     Type
-Material.lc 30:7-30:19
+30:7-30:19
     Deform
-Material.lc 31:7-31:20
+31:7-31:20
     Deform
-Material.lc 32:7-32:14
+32:7-32:14
     Float -> Float -> Float -> Deform | Deform | Type | Type | Type | Type
-Material.lc 32:15-32:20
+32:15-32:20
     Type
-Material.lc 32:21-32:26
+32:21-32:26
     Type
-Material.lc 32:27-32:32
+32:27-32:32
     Type
-Material.lc 33:7-33:13
+33:7-33:13
     Vec 3 Float -> Wave -> Deform | Deform | Type | Type | Type
-Material.lc 33:15-33:18
+33:15-33:18
     Nat -> Type -> Type
-Material.lc 33:15-33:20
+33:15-33:20
     Type -> Type
-Material.lc 33:15-33:26
+33:15-33:26
     Type
-Material.lc 33:19-33:20
+33:19-33:20
     _b
-Material.lc 33:21-33:26
+33:21-33:26
     Type
-Material.lc 33:28-33:32
+33:28-33:32
     Type
-Material.lc 34:7-34:15
+34:7-34:15
     Float -> Float -> Deform | Deform | Type | Type | Type
-Material.lc 34:16-34:21
+34:16-34:21
     Type
-Material.lc 34:22-34:27
+34:22-34:27
     Type
-Material.lc 35:7-35:25
+35:7-35:25
     Deform
-Material.lc 36:7-36:14
+36:7-36:14
     Deform
-Material.lc 37:7-37:14
+37:7-37:14
     Deform
-Material.lc 38:7-38:14
+38:7-38:14
     Deform
-Material.lc 39:7-39:14
+39:7-39:14
     Deform
-Material.lc 40:7-40:14
+40:7-40:14
     Deform
-Material.lc 41:7-41:14
+41:7-41:14
     Deform
-Material.lc 42:7-42:14
+42:7-42:14
     Deform
-Material.lc 43:7-43:14
+43:7-43:14
     Deform
-Material.lc 44:7-44:13
+44:7-44:13
     Float -> Wave -> Deform | Deform | Type | Type | Type
-Material.lc 44:14-44:19
+44:14-44:19
     Type
-Material.lc 44:20-44:24
+44:20-44:24
     Type
-Material.lc 47:6-47:14
+47:6-47:14
     Type | Type | Type | Type | Type | Type | Type
-Material.lc 47:6-50:18
+47:6-50:18
     Type | Type | Type
-Material.lc 48:7-48:20
+48:7-48:20
     CullType
-Material.lc 49:7-49:19
+49:7-49:19
     CullType
-Material.lc 50:7-50:18
+50:7-50:18
     CullType
-Material.lc 53:6-53:15
+53:6-53:15
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 53:6-64:13
+53:6-64:13
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 54:7-54:17
+54:7-54:17
     Blending'
-Material.lc 55:7-55:17
+55:7-55:17
     Blending'
-Material.lc 56:7-56:12
+56:7-56:12
     Blending'
-Material.lc 57:7-57:25
+57:7-57:25
     Blending'
-Material.lc 58:7-58:25
+58:7-58:25
     Blending'
-Material.lc 59:7-59:25
+59:7-59:25
     Blending'
-Material.lc 60:7-60:25
+60:7-60:25
     Blending'
-Material.lc 61:7-61:17
+61:7-61:17
     Blending'
-Material.lc 62:7-62:25
+62:7-62:25
     Blending'
-Material.lc 63:7-63:17
+63:7-63:17
     Blending'
-Material.lc 64:7-64:13
+64:7-64:13
     Blending'
-Material.lc 67:6-67:12
+67:6-67:12
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 67:6-69:34
+67:6-69:34
     Type | Type
-Material.lc 67:6-78:20
+67:6-78:20
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 68:7-68:15
+68:7-68:15
     Wave -> RGBGen | RGBGen | Type | Type
-Material.lc 68:16-68:20
+68:16-68:20
     Type
-Material.lc 69:7-69:16
+69:7-69:16
     Float -> Float -> Float -> RGBGen | RGBGen | Type | Type | Type | Type
-Material.lc 69:17-69:22
+69:17-69:22
     Type
-Material.lc 69:23-69:28
+69:23-69:28
     Type
-Material.lc 69:29-69:34
+69:29-69:34
     Type
-Material.lc 70:7-70:19
+70:7-70:19
     RGBGen
-Material.lc 71:7-71:27
+71:7-71:27
     RGBGen
-Material.lc 72:7-72:17
+72:7-72:17
     RGBGen
-Material.lc 73:7-73:25
+73:7-73:25
     RGBGen
-Material.lc 74:7-74:22
+74:7-74:22
     RGBGen
-Material.lc 75:7-75:17
+75:7-75:17
     RGBGen
-Material.lc 76:7-76:26
+76:7-76:26
     RGBGen
-Material.lc 77:7-77:25
+77:7-77:25
     RGBGen
-Material.lc 78:7-78:20
+78:7-78:20
     RGBGen
-Material.lc 81:6-81:14
+81:6-81:14
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 81:6-90:23
+81:6-90:23
     Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 82:7-82:13
+82:7-82:13
     Wave -> AlphaGen | AlphaGen | Type | Type
-Material.lc 82:14-82:18
+82:14-82:18
     Type
-Material.lc 83:7-83:14
+83:7-83:14
     Float -> AlphaGen | AlphaGen | Type | Type
-Material.lc 83:15-83:20
+83:15-83:20
     Type
-Material.lc 84:7-84:15
+84:7-84:15
     AlphaGen
-Material.lc 85:7-85:17
+85:7-85:17
     AlphaGen
-Material.lc 86:7-86:15
+86:7-86:15
     AlphaGen
-Material.lc 87:7-87:23
+87:7-87:23
     AlphaGen
-Material.lc 88:7-88:15
+88:7-88:15
     AlphaGen
-Material.lc 89:7-89:25
+89:7-89:25
     AlphaGen
-Material.lc 90:7-90:23
+90:7-90:23
     AlphaGen
-Material.lc 93:6-93:11
+93:6-93:11
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 93:6-97:44
+93:6-97:44
     Type
-Material.lc 93:6-98:19
+93:6-98:19
     Type | Type | Type | Type | Type
-Material.lc 94:7-94:14
+94:7-94:14
     TCGen
-Material.lc 95:7-95:18
+95:7-95:18
     TCGen
-Material.lc 96:7-96:21
+96:7-96:21
     TCGen
-Material.lc 97:7-97:16
+97:7-97:16
     Vec 3 Float -> Vec 3 Float -> TCGen | TCGen | Type | Type | Type
-Material.lc 97:18-97:21
+97:18-97:21
     Nat -> Type -> Type
-Material.lc 97:18-97:23
+97:18-97:23
     Type -> Type
-Material.lc 97:18-97:29
+97:18-97:29
     Type
-Material.lc 97:22-97:23
+97:22-97:23
     _b
-Material.lc 97:24-97:29
+97:24-97:29
     Type
-Material.lc 97:32-97:35
+97:32-97:35
     Nat -> Type -> Type
-Material.lc 97:32-97:37
+97:32-97:37
     Type -> Type
-Material.lc 97:32-97:43
+97:32-97:43
     Type
-Material.lc 97:36-97:37
+97:36-97:37
     _b
-Material.lc 97:38-97:43
+97:38-97:43
     Type
-Material.lc 98:7-98:19
+98:7-98:19
     TCGen
-Material.lc 101:6-101:11
+101:6-101:11
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 101:6-104:28
+101:6-104:28
     Type
-Material.lc 101:6-105:27
+101:6-105:27
     Type
-Material.lc 101:6-107:55
+101:6-107:55
     Type | Type | Type | Type | Type
-Material.lc 101:6-108:14
+101:6-108:14
     Type | Type | Type | Type | Type | Type | Type
-Material.lc 101:6-108:38
+101:6-108:38
     Type | Type | Type
-Material.lc 102:7-102:25
+102:7-102:25
     TCMod
-Material.lc 103:7-103:16
+103:7-103:16
     Float -> TCMod | TCMod | Type | Type
-Material.lc 103:17-103:22
+103:17-103:22
     Type
-Material.lc 104:7-104:16
+104:7-104:16
     Float -> Float -> TCMod | TCMod | Type | Type | Type
-Material.lc 104:17-104:22
+104:17-104:22
     Type
-Material.lc 104:23-104:28
+104:23-104:28
     Type
-Material.lc 105:7-105:15
+105:7-105:15
     Float -> Float -> TCMod | TCMod | Type | Type | Type
-Material.lc 105:16-105:21
+105:16-105:21
     Type
-Material.lc 105:22-105:27
+105:22-105:27
     Type
-Material.lc 106:7-106:17
+106:7-106:17
     Wave -> TCMod | TCMod | Type | Type
-Material.lc 106:18-106:22
+106:18-106:22
     Type
-Material.lc 107:7-107:19
+107:7-107:19
     Float
       -> Float
         -> Float
           -> Float
             -> Float
               -> Float -> TCMod | TCMod | Type | Type | Type | Type | Type | Type | Type
-Material.lc 107:20-107:25
+107:20-107:25
     Type
-Material.lc 107:26-107:31
+107:26-107:31
     Type
-Material.lc 107:32-107:37
+107:32-107:37
     Type
-Material.lc 107:38-107:43
+107:38-107:43
     Type
-Material.lc 107:44-107:49
+107:44-107:49
     Type
-Material.lc 107:50-107:55
+107:50-107:55
     Type
-Material.lc 108:7-108:14
+108:7-108:14
     Float
       -> Float -> Float -> Float -> TCMod | TCMod | Type | Type | Type | Type | Type
-Material.lc 108:15-108:20
+108:15-108:20
     Type
-Material.lc 108:21-108:26
+108:21-108:26
     Type
-Material.lc 108:27-108:32
+108:27-108:32
     Type
-Material.lc 108:33-108:38
+108:33-108:38
     Type
-Material.lc 111:6-111:18
+111:6-111:18
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 111:6-114:35
+111:6-114:35
     Type
-Material.lc 111:6-116:20
+111:6-116:20
     Type | Type | Type | Type | Type
-Material.lc 112:7-112:13
+112:7-112:13
     String -> StageTexture | StageTexture | Type | Type
-Material.lc 112:21-112:27
+112:21-112:27
     Type
-Material.lc 113:7-113:18
+113:7-113:18
     String -> StageTexture | StageTexture | Type | Type
-Material.lc 113:21-113:27
+113:21-113:27
     Type
-Material.lc 114:7-114:17
+114:7-114:17
     Float -> [String] -> StageTexture | StageTexture | Type | Type | Type
-Material.lc 114:21-114:26
+114:21-114:26
     Type
-Material.lc 114:27-114:35
+114:27-114:35
     Type
-Material.lc 114:28-114:34
+114:28-114:34
     Type
-Material.lc 115:7-115:18
+115:7-115:18
     StageTexture
-Material.lc 116:7-116:20
+116:7-116:20
     StageTexture
-Material.lc 119:6-119:19
+119:6-119:19
     Type | Type | Type | Type | Type | Type | Type
-Material.lc 119:6-122:14
+119:6-122:14
     Type | Type | Type
-Material.lc 120:7-120:12
+120:7-120:12
     AlphaFunction
-Material.lc 121:7-121:14
+121:7-121:14
     AlphaFunction
-Material.lc 122:7-122:14
+122:7-122:14
     AlphaFunction
-Material.lc 125:6-125:19
+125:6-125:19
     Type | Type | Type | Type | Type | Type
-Material.lc 125:6-127:15
+125:6-127:15
     Type | Type
-Material.lc 126:7-126:14
+126:7-126:14
     DepthFunction
-Material.lc 127:7-127:15
+127:7-127:15
     DepthFunction
-Material.lc 130:6-130:16
+130:6-130:16
     Type | Type | Type | Type | Type | Type
-Material.lc 130:6-131:17
+130:6-131:17
     Type
-Material.lc 130:6-144:34
+130:6-144:34
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 131:7-131:17
+131:7-131:17
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -1579,71 +1579,71 @@ Material.lc 131:7-131:17
                       -> Bool
                         -> String
                           -> StageAttrs | StageAttrs | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 132:7-132:14
+132:7-132:14
     StageAttrs -> Maybe (Blending', Blending')
-Material.lc 132:25-132:30
+132:25-132:30
     Type -> Type
-Material.lc 132:25-132:53
+132:25-132:53
     Type
-Material.lc 132:31-132:53
+132:31-132:53
     Type
-Material.lc 132:32-132:41
+132:32-132:41
     Type
-Material.lc 132:32-132:52
+132:32-132:52
     [Type]
-Material.lc 132:43-132:52
+132:43-132:52
     Type | [Type]
-Material.lc 133:7-133:15
+133:7-133:15
     StageAttrs -> RGBGen
-Material.lc 133:24-133:30
+133:24-133:30
     Type
-Material.lc 134:7-134:17
+134:7-134:17
     StageAttrs -> AlphaGen
-Material.lc 134:24-134:32
+134:24-134:32
     Type
-Material.lc 135:7-135:14
+135:7-135:14
     StageAttrs -> TCGen
-Material.lc 135:24-135:29
+135:24-135:29
     Type
-Material.lc 136:7-136:14
+136:7-136:14
     StageAttrs -> [TCMod]
-Material.lc 136:24-136:31
+136:24-136:31
     Type
-Material.lc 136:25-136:30
+136:25-136:30
     Type
-Material.lc 137:7-137:16
+137:7-137:16
     StageAttrs -> StageTexture
-Material.lc 137:24-137:36
+137:24-137:36
     Type
-Material.lc 138:7-138:19
+138:7-138:19
     StageAttrs -> Bool
-Material.lc 138:24-138:28
+138:24-138:28
     Type
-Material.lc 139:7-139:18
+139:7-139:18
     StageAttrs -> DepthFunction
-Material.lc 139:24-139:37
+139:24-139:37
     Type
-Material.lc 140:7-140:18
+140:7-140:18
     StageAttrs -> Maybe AlphaFunction
-Material.lc 140:25-140:30
+140:25-140:30
     Type -> Type
-Material.lc 140:25-140:44
+140:25-140:44
     Type
-Material.lc 140:31-140:44
+140:31-140:44
     Type
-Material.lc 143:7-143:26
+143:7-143:26
     StageAttrs -> Bool
-Material.lc 143:32-143:36
+143:32-143:36
     Type
-Material.lc 144:7-144:23
+144:7-144:23
     StageAttrs -> String
-Material.lc 144:28-144:34
+144:28-144:34
     Type
-Material.lc 148:22-148:32
+148:22-148:32
     Type
-Material.lc 149:1-149:18
+149:1-149:18
     StageAttrs
-Material.lc 149:21-149:31
+149:21-149:31
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -1651,72 +1651,72 @@ Material.lc 149:21-149:31
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-Material.lc 149:21-150:30
+149:21-150:30
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-Material.lc 149:21-151:36
+149:21-151:36
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-Material.lc 149:21-152:33
+149:21-152:33
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-Material.lc 149:21-153:35
+149:21-153:35
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-Material.lc 149:21-154:25
+149:21-154:25
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-Material.lc 149:21-155:36
+149:21-155:36
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-Material.lc 149:21-156:27
+149:21-156:27
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-Material.lc 149:21-157:31
+149:21-157:31
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-Material.lc 149:21-158:30
+149:21-158:30
     Bool -> String -> StageAttrs
-Material.lc 149:21-159:36
+149:21-159:36
     String -> StageAttrs
-Material.lc 149:21-161:6
+149:21-161:6
     StageAttrs
-Material.lc 150:23-150:30
+150:23-150:30
     forall a . Maybe a
-Material.lc 151:23-151:36
+151:23-151:36
     RGBGen
-Material.lc 152:23-152:33
+152:23-152:33
     AlphaGen
-Material.lc 153:23-153:35
+153:23-153:35
     TCGen
-Material.lc 154:23-154:25
+154:23-154:25
     forall a . [a]
-Material.lc 155:23-155:36
+155:23-155:36
     StageTexture
-Material.lc 156:23-156:27
+156:23-156:27
     Bool
-Material.lc 157:23-157:31
+157:23-157:31
     DepthFunction
-Material.lc 158:23-158:30
+158:23-158:30
     forall a . Maybe a
-Material.lc 159:31-159:36
+159:31-159:36
     Bool
-Material.lc 160:27-160:29
+160:27-160:29
     String
-Material.lc 163:6-163:17
+163:6-163:17
     Type | Type | Type | Type | Type | Type
-Material.lc 163:6-164:18
+163:6-164:18
     Type
-Material.lc 163:6-178:32
+163:6-178:32
     Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 164:7-164:18
+164:7-164:18
     ()
       -> ()
         -> Bool
@@ -1730,63 +1730,63 @@ Material.lc 164:7-164:18
                         -> [StageAttrs]
                           -> Bool
                             -> CommonAttrs | CommonAttrs | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type | Type
-Material.lc 165:7-165:17
+165:7-165:17
     CommonAttrs -> ()
-Material.lc 165:28-165:30
+165:28-165:30
     Type
-Material.lc 166:7-166:17
+166:7-166:17
     CommonAttrs -> ()
-Material.lc 166:28-166:30
+166:28-166:30
     Type
-Material.lc 167:7-167:15
+167:7-167:15
     CommonAttrs -> Bool
-Material.lc 167:28-167:32
+167:28-167:32
     Type
-Material.lc 168:7-168:13
+168:7-168:13
     CommonAttrs -> Float
-Material.lc 168:28-168:33
+168:28-168:33
     Type
-Material.lc 169:7-169:23
+169:7-169:23
     CommonAttrs -> Bool
-Material.lc 169:28-169:32
+169:28-169:32
     Type
-Material.lc 170:7-170:16
+170:7-170:16
     CommonAttrs -> Bool
-Material.lc 170:28-170:32
+170:28-170:32
     Type
-Material.lc 171:7-171:13
+171:7-171:13
     CommonAttrs -> CullType
-Material.lc 171:28-171:36
+171:28-171:36
     Type
-Material.lc 172:7-172:23
+172:7-172:23
     CommonAttrs -> [Deform]
-Material.lc 172:28-172:36
+172:28-172:36
     Type
-Material.lc 172:29-172:35
+172:29-172:35
     Type
-Material.lc 173:7-173:18
+173:7-173:18
     CommonAttrs -> Bool
-Material.lc 173:28-173:32
+173:28-173:32
     Type
-Material.lc 174:7-174:22
+174:7-174:22
     CommonAttrs -> Bool
-Material.lc 174:28-174:32
+174:28-174:32
     Type
-Material.lc 175:7-175:15
+175:7-175:15
     CommonAttrs -> [StageAttrs]
-Material.lc 175:28-175:40
+175:28-175:40
     Type
-Material.lc 175:29-175:39
+175:29-175:39
     Type
-Material.lc 178:7-178:14
+178:7-178:14
     CommonAttrs -> Bool
-Material.lc 178:28-178:32
+178:28-178:32
     Type
-Material.lc 182:23-182:34
+182:23-182:34
     Type
-Material.lc 183:1-183:19
+183:1-183:19
     CommonAttrs
-Material.lc 183:22-183:33
+183:22-183:33
     ()
       -> ()
         -> Bool
@@ -1794,66 +1794,66 @@ Material.lc 183:22-183:33
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-Material.lc 183:22-184:29
+183:22-184:29
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-Material.lc 183:22-185:29
+183:22-185:29
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-Material.lc 183:22-186:32
+183:22-186:32
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-Material.lc 183:22-187:28
+183:22-187:28
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-Material.lc 183:22-188:32
+183:22-188:32
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-Material.lc 183:22-189:32
+183:22-189:32
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-Material.lc 183:22-190:40
+183:22-190:40
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-Material.lc 183:22-191:29
+183:22-191:29
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-Material.lc 183:22-192:32
+183:22-192:32
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-Material.lc 183:22-193:32
+183:22-193:32
     [StageAttrs] -> Bool -> CommonAttrs
-Material.lc 183:22-194:29
+183:22-194:29
     Bool -> CommonAttrs
-Material.lc 183:22-196:6
+183:22-196:6
     CommonAttrs
-Material.lc 184:27-184:29
+184:27-184:29
     ()
-Material.lc 185:27-185:29
+185:27-185:29
     ()
-Material.lc 186:27-186:32
+186:27-186:32
     Bool
-Material.lc 187:27-187:28
+187:27-187:28
     _b
-Material.lc 188:27-188:32
+188:27-188:32
     Bool
-Material.lc 189:27-189:32
+189:27-189:32
     Bool
-Material.lc 190:27-190:40
+190:27-190:40
     CullType
-Material.lc 191:27-191:29
+191:27-191:29
     forall a . [a]
-Material.lc 192:27-192:32
+192:27-192:32
     Bool
-Material.lc 193:27-193:32
+193:27-193:32
     Bool
-Material.lc 194:27-194:29
+194:27-194:29
     forall a . [a]
-Material.lc 195:27-195:32
+195:27-195:32
     Bool
\ No newline at end of file
diff --git a/testdata/performance/SampleMaterial.out b/testdata/performance/SampleMaterial.out
index b1ea58f8..80acedee 100644
--- a/testdata/performance/SampleMaterial.out
+++ b/testdata/performance/SampleMaterial.out
@@ -3757,15 +3757,15 @@ sampleMaterial
         "Tex_3226210144"]
       False)]
 ------------ tooltips
-SampleMaterial.lc 3:1-3:15
+3:1-3:15
     [(String, CommonAttrs)]
-SampleMaterial.lc 4:3-2183:4
+4:3-2183:4
     [(String, CommonAttrs)]
-SampleMaterial.lc 4:5-46:6
+4:5-46:6
     (String, CommonAttrs)
-SampleMaterial.lc 4:7-4:40
+4:7-4:40
     String
-SampleMaterial.lc 5:7-5:18
+5:7-5:18
     ()
       -> ()
         -> Bool
@@ -3773,68 +3773,68 @@ SampleMaterial.lc 5:7-5:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 5:7-6:26
+5:7-6:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 5:7-7:26
+5:7-7:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 5:7-8:27
+5:7-8:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 5:7-9:21
+5:7-9:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 5:7-10:35
+5:7-10:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 5:7-11:28
+5:7-11:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 5:7-12:33
+5:7-12:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 5:7-13:32
+5:7-13:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 5:7-14:30
+5:7-14:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 5:7-15:34
+5:7-15:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 5:7-43:14
+5:7-43:14
     Bool -> CommonAttrs
-SampleMaterial.lc 5:7-45:10
+5:7-45:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 6:24-6:26
+6:24-6:26
     ()
-SampleMaterial.lc 7:24-7:26
+7:24-7:26
     ()
-SampleMaterial.lc 8:22-8:27
+8:22-8:27
     Bool
-SampleMaterial.lc 9:20-9:21
+9:20-9:21
     _b
-SampleMaterial.lc 10:30-10:35
+10:30-10:35
     Bool
-SampleMaterial.lc 11:23-11:28
+11:23-11:28
     Bool
-SampleMaterial.lc 12:20-12:33
+12:20-12:33
     CullType
-SampleMaterial.lc 13:30-13:32
+13:30-13:32
     forall a . [a]
-SampleMaterial.lc 14:25-14:30
+14:25-14:30
     Bool
-SampleMaterial.lc 15:29-15:34
+15:29-15:34
     Bool
-SampleMaterial.lc 17:13-43:14
+17:13-43:14
     [StageAttrs]
-SampleMaterial.lc 17:15-17:25
+17:15-17:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -3842,70 +3842,70 @@ SampleMaterial.lc 17:15-17:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 17:15-18:36
+17:15-18:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 17:15-19:50
+17:15-19:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 17:15-20:42
+17:15-20:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 17:15-21:36
+17:15-21:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 17:15-22:31
+17:15-22:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 17:15-23:71
+17:15-23:71
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 17:15-24:38
+17:15-24:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 17:15-25:41
+17:15-25:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 17:15-26:40
+17:15-26:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 17:15-27:46
+17:15-27:46
     String -> StageAttrs
-SampleMaterial.lc 17:15-29:18
+17:15-29:18
     StageAttrs
-SampleMaterial.lc 18:29-18:36
+18:29-18:36
     forall a . Maybe a
-SampleMaterial.lc 19:30-19:50
+19:30-19:50
     RGBGen
-SampleMaterial.lc 20:32-20:42
+20:32-20:42
     AlphaGen
-SampleMaterial.lc 21:29-21:36
+21:29-21:36
     TCGen
-SampleMaterial.lc 22:29-22:31
+22:29-22:31
     forall a . [a]
-SampleMaterial.lc 23:31-23:37
+23:31-23:37
     String -> StageTexture
-SampleMaterial.lc 23:31-23:71
+23:31-23:71
     StageTexture
-SampleMaterial.lc 23:38-23:71
+23:38-23:71
     String
-SampleMaterial.lc 24:34-24:38
+24:34-24:38
     Bool
-SampleMaterial.lc 25:33-25:41
+25:33-25:41
     DepthFunction
-SampleMaterial.lc 26:33-26:40
+26:33-26:40
     forall a . Maybe a
-SampleMaterial.lc 27:41-27:46
+27:41-27:46
     Bool
-SampleMaterial.lc 28:38-28:54
+28:38-28:54
     String
-SampleMaterial.lc 30:15-30:25
+30:15-30:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -3913,82 +3913,82 @@ SampleMaterial.lc 30:15-30:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 30:15-31:57
+30:15-31:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 30:15-32:50
+30:15-32:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 30:15-33:42
+30:15-33:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 30:15-34:40
+30:15-34:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 30:15-35:31
+30:15-35:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 30:15-36:42
+30:15-36:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 30:15-37:38
+30:15-37:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 30:15-38:41
+30:15-38:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 30:15-39:40
+30:15-39:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 30:15-40:46
+30:15-40:46
     String -> StageAttrs
-SampleMaterial.lc 30:15-42:18
+30:15-42:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 31:29-31:33
+31:29-31:33
     forall a . a -> Maybe a
-SampleMaterial.lc 31:29-31:57
+31:29-31:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 31:34-31:57
+31:34-31:57
     (Blending', Blending')
-SampleMaterial.lc 31:36-31:46
+31:36-31:46
     Blending'
-SampleMaterial.lc 31:49-31:55
+31:49-31:55
     Blending' | ((Blending'))
-SampleMaterial.lc 32:30-32:50
+32:30-32:50
     RGBGen
-SampleMaterial.lc 33:32-33:42
+33:32-33:42
     AlphaGen
-SampleMaterial.lc 34:29-34:40
+34:29-34:40
     TCGen
-SampleMaterial.lc 35:29-35:31
+35:29-35:31
     forall a . [a]
-SampleMaterial.lc 36:31-36:42
+36:31-36:42
     StageTexture
-SampleMaterial.lc 37:34-37:38
+37:34-37:38
     Bool
-SampleMaterial.lc 38:33-38:41
+38:33-38:41
     DepthFunction
-SampleMaterial.lc 39:33-39:40
+39:33-39:40
     forall a . Maybe a
-SampleMaterial.lc 40:41-40:46
+40:41-40:46
     Bool
-SampleMaterial.lc 41:38-41:54
+41:38-41:54
     String
-SampleMaterial.lc 44:21-44:26
+44:21-44:26
     Bool
-SampleMaterial.lc 47:5-89:6
+47:5-89:6
     (String, CommonAttrs)
-SampleMaterial.lc 47:5-2182:6
+47:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 47:7-47:39
+47:7-47:39
     String
-SampleMaterial.lc 48:7-48:18
+48:7-48:18
     ()
       -> ()
         -> Bool
@@ -3996,68 +3996,68 @@ SampleMaterial.lc 48:7-48:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 48:7-49:26
+48:7-49:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 48:7-50:26
+48:7-50:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 48:7-51:27
+48:7-51:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 48:7-52:21
+48:7-52:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 48:7-53:35
+48:7-53:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 48:7-54:28
+48:7-54:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 48:7-55:33
+48:7-55:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 48:7-56:32
+48:7-56:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 48:7-57:30
+48:7-57:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 48:7-58:34
+48:7-58:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 48:7-86:14
+48:7-86:14
     Bool -> CommonAttrs
-SampleMaterial.lc 48:7-88:10
+48:7-88:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 49:24-49:26
+49:24-49:26
     ()
-SampleMaterial.lc 50:24-50:26
+50:24-50:26
     ()
-SampleMaterial.lc 51:22-51:27
+51:22-51:27
     Bool
-SampleMaterial.lc 52:20-52:21
+52:20-52:21
     _b
-SampleMaterial.lc 53:30-53:35
+53:30-53:35
     Bool
-SampleMaterial.lc 54:23-54:28
+54:23-54:28
     Bool
-SampleMaterial.lc 55:20-55:33
+55:20-55:33
     CullType
-SampleMaterial.lc 56:30-56:32
+56:30-56:32
     forall a . [a]
-SampleMaterial.lc 57:25-57:30
+57:25-57:30
     Bool
-SampleMaterial.lc 58:29-58:34
+58:29-58:34
     Bool
-SampleMaterial.lc 60:13-86:14
+60:13-86:14
     [StageAttrs]
-SampleMaterial.lc 60:15-60:25
+60:15-60:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -4065,70 +4065,70 @@ SampleMaterial.lc 60:15-60:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 60:15-61:36
+60:15-61:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 60:15-62:50
+60:15-62:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 60:15-63:42
+60:15-63:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 60:15-64:36
+60:15-64:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 60:15-65:31
+60:15-65:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 60:15-66:70
+60:15-66:70
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 60:15-67:38
+60:15-67:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 60:15-68:41
+60:15-68:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 60:15-69:40
+60:15-69:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 60:15-70:46
+60:15-70:46
     String -> StageAttrs
-SampleMaterial.lc 60:15-72:18
+60:15-72:18
     StageAttrs
-SampleMaterial.lc 61:29-61:36
+61:29-61:36
     forall a . Maybe a
-SampleMaterial.lc 62:30-62:50
+62:30-62:50
     RGBGen
-SampleMaterial.lc 63:32-63:42
+63:32-63:42
     AlphaGen
-SampleMaterial.lc 64:29-64:36
+64:29-64:36
     TCGen
-SampleMaterial.lc 65:29-65:31
+65:29-65:31
     forall a . [a]
-SampleMaterial.lc 66:31-66:37
+66:31-66:37
     String -> StageTexture
-SampleMaterial.lc 66:31-66:70
+66:31-66:70
     StageTexture
-SampleMaterial.lc 66:38-66:70
+66:38-66:70
     String
-SampleMaterial.lc 67:34-67:38
+67:34-67:38
     Bool
-SampleMaterial.lc 68:33-68:41
+68:33-68:41
     DepthFunction
-SampleMaterial.lc 69:33-69:40
+69:33-69:40
     forall a . Maybe a
-SampleMaterial.lc 70:41-70:46
+70:41-70:46
     Bool
-SampleMaterial.lc 71:38-71:54
+71:38-71:54
     String
-SampleMaterial.lc 73:15-73:25
+73:15-73:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -4136,82 +4136,82 @@ SampleMaterial.lc 73:15-73:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 73:15-74:57
+73:15-74:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 73:15-75:50
+73:15-75:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 73:15-76:42
+73:15-76:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 73:15-77:40
+73:15-77:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 73:15-78:31
+73:15-78:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 73:15-79:42
+73:15-79:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 73:15-80:38
+73:15-80:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 73:15-81:41
+73:15-81:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 73:15-82:40
+73:15-82:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 73:15-83:46
+73:15-83:46
     String -> StageAttrs
-SampleMaterial.lc 73:15-85:18
+73:15-85:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 74:29-74:33
+74:29-74:33
     forall a . a -> Maybe a
-SampleMaterial.lc 74:29-74:57
+74:29-74:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 74:34-74:57
+74:34-74:57
     (Blending', Blending')
-SampleMaterial.lc 74:36-74:46
+74:36-74:46
     Blending'
-SampleMaterial.lc 74:49-74:55
+74:49-74:55
     Blending' | ((Blending'))
-SampleMaterial.lc 75:30-75:50
+75:30-75:50
     RGBGen
-SampleMaterial.lc 76:32-76:42
+76:32-76:42
     AlphaGen
-SampleMaterial.lc 77:29-77:40
+77:29-77:40
     TCGen
-SampleMaterial.lc 78:29-78:31
+78:29-78:31
     forall a . [a]
-SampleMaterial.lc 79:31-79:42
+79:31-79:42
     StageTexture
-SampleMaterial.lc 80:34-80:38
+80:34-80:38
     Bool
-SampleMaterial.lc 81:33-81:41
+81:33-81:41
     DepthFunction
-SampleMaterial.lc 82:33-82:40
+82:33-82:40
     forall a . Maybe a
-SampleMaterial.lc 83:41-83:46
+83:41-83:46
     Bool
-SampleMaterial.lc 84:38-84:54
+84:38-84:54
     String
-SampleMaterial.lc 87:21-87:26
+87:21-87:26
     Bool
-SampleMaterial.lc 90:5-132:6
+90:5-132:6
     (String, CommonAttrs)
-SampleMaterial.lc 90:5-2182:6
+90:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 90:7-90:40
+90:7-90:40
     String
-SampleMaterial.lc 91:7-91:18
+91:7-91:18
     ()
       -> ()
         -> Bool
@@ -4219,68 +4219,68 @@ SampleMaterial.lc 91:7-91:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 91:7-92:26
+91:7-92:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 91:7-93:26
+91:7-93:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 91:7-94:27
+91:7-94:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 91:7-95:21
+91:7-95:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 91:7-96:35
+91:7-96:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 91:7-97:28
+91:7-97:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 91:7-98:33
+91:7-98:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 91:7-99:32
+91:7-99:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 91:7-100:30
+91:7-100:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 91:7-101:34
+91:7-101:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 91:7-129:14
+91:7-129:14
     Bool -> CommonAttrs
-SampleMaterial.lc 91:7-131:10
+91:7-131:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 92:24-92:26
+92:24-92:26
     ()
-SampleMaterial.lc 93:24-93:26
+93:24-93:26
     ()
-SampleMaterial.lc 94:22-94:27
+94:22-94:27
     Bool
-SampleMaterial.lc 95:20-95:21
+95:20-95:21
     _b
-SampleMaterial.lc 96:30-96:35
+96:30-96:35
     Bool
-SampleMaterial.lc 97:23-97:28
+97:23-97:28
     Bool
-SampleMaterial.lc 98:20-98:33
+98:20-98:33
     CullType
-SampleMaterial.lc 99:30-99:32
+99:30-99:32
     forall a . [a]
-SampleMaterial.lc 100:25-100:30
+100:25-100:30
     Bool
-SampleMaterial.lc 101:29-101:34
+101:29-101:34
     Bool
-SampleMaterial.lc 103:13-129:14
+103:13-129:14
     [StageAttrs]
-SampleMaterial.lc 103:15-103:25
+103:15-103:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -4288,70 +4288,70 @@ SampleMaterial.lc 103:15-103:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 103:15-104:36
+103:15-104:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 103:15-105:50
+103:15-105:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 103:15-106:42
+103:15-106:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 103:15-107:36
+103:15-107:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 103:15-108:31
+103:15-108:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 103:15-109:71
+103:15-109:71
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 103:15-110:38
+103:15-110:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 103:15-111:41
+103:15-111:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 103:15-112:40
+103:15-112:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 103:15-113:46
+103:15-113:46
     String -> StageAttrs
-SampleMaterial.lc 103:15-115:18
+103:15-115:18
     StageAttrs
-SampleMaterial.lc 104:29-104:36
+104:29-104:36
     forall a . Maybe a
-SampleMaterial.lc 105:30-105:50
+105:30-105:50
     RGBGen
-SampleMaterial.lc 106:32-106:42
+106:32-106:42
     AlphaGen
-SampleMaterial.lc 107:29-107:36
+107:29-107:36
     TCGen
-SampleMaterial.lc 108:29-108:31
+108:29-108:31
     forall a . [a]
-SampleMaterial.lc 109:31-109:37
+109:31-109:37
     String -> StageTexture
-SampleMaterial.lc 109:31-109:71
+109:31-109:71
     StageTexture
-SampleMaterial.lc 109:38-109:71
+109:38-109:71
     String
-SampleMaterial.lc 110:34-110:38
+110:34-110:38
     Bool
-SampleMaterial.lc 111:33-111:41
+111:33-111:41
     DepthFunction
-SampleMaterial.lc 112:33-112:40
+112:33-112:40
     forall a . Maybe a
-SampleMaterial.lc 113:41-113:46
+113:41-113:46
     Bool
-SampleMaterial.lc 114:38-114:54
+114:38-114:54
     String
-SampleMaterial.lc 116:15-116:25
+116:15-116:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -4359,82 +4359,82 @@ SampleMaterial.lc 116:15-116:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 116:15-117:57
+116:15-117:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 116:15-118:50
+116:15-118:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 116:15-119:42
+116:15-119:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 116:15-120:40
+116:15-120:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 116:15-121:31
+116:15-121:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 116:15-122:42
+116:15-122:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 116:15-123:38
+116:15-123:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 116:15-124:41
+116:15-124:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 116:15-125:40
+116:15-125:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 116:15-126:46
+116:15-126:46
     String -> StageAttrs
-SampleMaterial.lc 116:15-128:18
+116:15-128:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 117:29-117:33
+117:29-117:33
     forall a . a -> Maybe a
-SampleMaterial.lc 117:29-117:57
+117:29-117:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 117:34-117:57
+117:34-117:57
     (Blending', Blending')
-SampleMaterial.lc 117:36-117:46
+117:36-117:46
     Blending'
-SampleMaterial.lc 117:49-117:55
+117:49-117:55
     Blending' | ((Blending'))
-SampleMaterial.lc 118:30-118:50
+118:30-118:50
     RGBGen
-SampleMaterial.lc 119:32-119:42
+119:32-119:42
     AlphaGen
-SampleMaterial.lc 120:29-120:40
+120:29-120:40
     TCGen
-SampleMaterial.lc 121:29-121:31
+121:29-121:31
     forall a . [a]
-SampleMaterial.lc 122:31-122:42
+122:31-122:42
     StageTexture
-SampleMaterial.lc 123:34-123:38
+123:34-123:38
     Bool
-SampleMaterial.lc 124:33-124:41
+124:33-124:41
     DepthFunction
-SampleMaterial.lc 125:33-125:40
+125:33-125:40
     forall a . Maybe a
-SampleMaterial.lc 126:41-126:46
+126:41-126:46
     Bool
-SampleMaterial.lc 127:38-127:54
+127:38-127:54
     String
-SampleMaterial.lc 130:21-130:26
+130:21-130:26
     Bool
-SampleMaterial.lc 133:5-175:6
+133:5-175:6
     (String, CommonAttrs)
-SampleMaterial.lc 133:5-2182:6
+133:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 133:7-133:42
+133:7-133:42
     String
-SampleMaterial.lc 134:7-134:18
+134:7-134:18
     ()
       -> ()
         -> Bool
@@ -4442,68 +4442,68 @@ SampleMaterial.lc 134:7-134:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 134:7-135:26
+134:7-135:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 134:7-136:26
+134:7-136:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 134:7-137:27
+134:7-137:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 134:7-138:21
+134:7-138:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 134:7-139:35
+134:7-139:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 134:7-140:28
+134:7-140:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 134:7-141:33
+134:7-141:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 134:7-142:32
+134:7-142:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 134:7-143:30
+134:7-143:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 134:7-144:34
+134:7-144:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 134:7-172:14
+134:7-172:14
     Bool -> CommonAttrs
-SampleMaterial.lc 134:7-174:10
+134:7-174:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 135:24-135:26
+135:24-135:26
     ()
-SampleMaterial.lc 136:24-136:26
+136:24-136:26
     ()
-SampleMaterial.lc 137:22-137:27
+137:22-137:27
     Bool
-SampleMaterial.lc 138:20-138:21
+138:20-138:21
     _b
-SampleMaterial.lc 139:30-139:35
+139:30-139:35
     Bool
-SampleMaterial.lc 140:23-140:28
+140:23-140:28
     Bool
-SampleMaterial.lc 141:20-141:33
+141:20-141:33
     CullType
-SampleMaterial.lc 142:30-142:32
+142:30-142:32
     forall a . [a]
-SampleMaterial.lc 143:25-143:30
+143:25-143:30
     Bool
-SampleMaterial.lc 144:29-144:34
+144:29-144:34
     Bool
-SampleMaterial.lc 146:13-172:14
+146:13-172:14
     [StageAttrs]
-SampleMaterial.lc 146:15-146:25
+146:15-146:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -4511,70 +4511,70 @@ SampleMaterial.lc 146:15-146:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 146:15-147:36
+146:15-147:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 146:15-148:50
+146:15-148:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 146:15-149:42
+146:15-149:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 146:15-150:36
+146:15-150:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 146:15-151:31
+146:15-151:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 146:15-152:73
+146:15-152:73
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 146:15-153:38
+146:15-153:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 146:15-154:41
+146:15-154:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 146:15-155:40
+146:15-155:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 146:15-156:46
+146:15-156:46
     String -> StageAttrs
-SampleMaterial.lc 146:15-158:18
+146:15-158:18
     StageAttrs
-SampleMaterial.lc 147:29-147:36
+147:29-147:36
     forall a . Maybe a
-SampleMaterial.lc 148:30-148:50
+148:30-148:50
     RGBGen
-SampleMaterial.lc 149:32-149:42
+149:32-149:42
     AlphaGen
-SampleMaterial.lc 150:29-150:36
+150:29-150:36
     TCGen
-SampleMaterial.lc 151:29-151:31
+151:29-151:31
     forall a . [a]
-SampleMaterial.lc 152:31-152:37
+152:31-152:37
     String -> StageTexture
-SampleMaterial.lc 152:31-152:73
+152:31-152:73
     StageTexture
-SampleMaterial.lc 152:38-152:73
+152:38-152:73
     String
-SampleMaterial.lc 153:34-153:38
+153:34-153:38
     Bool
-SampleMaterial.lc 154:33-154:41
+154:33-154:41
     DepthFunction
-SampleMaterial.lc 155:33-155:40
+155:33-155:40
     forall a . Maybe a
-SampleMaterial.lc 156:41-156:46
+156:41-156:46
     Bool
-SampleMaterial.lc 157:38-157:54
+157:38-157:54
     String
-SampleMaterial.lc 159:15-159:25
+159:15-159:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -4582,82 +4582,82 @@ SampleMaterial.lc 159:15-159:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 159:15-160:57
+159:15-160:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 159:15-161:50
+159:15-161:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 159:15-162:42
+159:15-162:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 159:15-163:40
+159:15-163:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 159:15-164:31
+159:15-164:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 159:15-165:42
+159:15-165:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 159:15-166:38
+159:15-166:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 159:15-167:41
+159:15-167:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 159:15-168:40
+159:15-168:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 159:15-169:46
+159:15-169:46
     String -> StageAttrs
-SampleMaterial.lc 159:15-171:18
+159:15-171:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 160:29-160:33
+160:29-160:33
     forall a . a -> Maybe a
-SampleMaterial.lc 160:29-160:57
+160:29-160:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 160:34-160:57
+160:34-160:57
     (Blending', Blending')
-SampleMaterial.lc 160:36-160:46
+160:36-160:46
     Blending'
-SampleMaterial.lc 160:49-160:55
+160:49-160:55
     Blending' | ((Blending'))
-SampleMaterial.lc 161:30-161:50
+161:30-161:50
     RGBGen
-SampleMaterial.lc 162:32-162:42
+162:32-162:42
     AlphaGen
-SampleMaterial.lc 163:29-163:40
+163:29-163:40
     TCGen
-SampleMaterial.lc 164:29-164:31
+164:29-164:31
     forall a . [a]
-SampleMaterial.lc 165:31-165:42
+165:31-165:42
     StageTexture
-SampleMaterial.lc 166:34-166:38
+166:34-166:38
     Bool
-SampleMaterial.lc 167:33-167:41
+167:33-167:41
     DepthFunction
-SampleMaterial.lc 168:33-168:40
+168:33-168:40
     forall a . Maybe a
-SampleMaterial.lc 169:41-169:46
+169:41-169:46
     Bool
-SampleMaterial.lc 170:38-170:54
+170:38-170:54
     String
-SampleMaterial.lc 173:21-173:26
+173:21-173:26
     Bool
-SampleMaterial.lc 176:5-232:6
+176:5-232:6
     (String, CommonAttrs)
-SampleMaterial.lc 176:5-2182:6
+176:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 176:7-176:46
+176:7-176:46
     String
-SampleMaterial.lc 177:7-177:18
+177:7-177:18
     ()
       -> ()
         -> Bool
@@ -4665,68 +4665,68 @@ SampleMaterial.lc 177:7-177:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 177:7-178:26
+177:7-178:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 177:7-179:26
+177:7-179:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 177:7-180:27
+177:7-180:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 177:7-181:21
+177:7-181:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 177:7-182:35
+177:7-182:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 177:7-183:28
+177:7-183:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 177:7-184:33
+177:7-184:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 177:7-185:32
+177:7-185:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 177:7-186:30
+177:7-186:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 177:7-187:34
+177:7-187:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 177:7-229:14
+177:7-229:14
     Bool -> CommonAttrs
-SampleMaterial.lc 177:7-231:10
+177:7-231:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 178:24-178:26
+178:24-178:26
     ()
-SampleMaterial.lc 179:24-179:26
+179:24-179:26
     ()
-SampleMaterial.lc 180:22-180:27
+180:22-180:27
     Bool
-SampleMaterial.lc 181:20-181:21
+181:20-181:21
     _b
-SampleMaterial.lc 182:30-182:35
+182:30-182:35
     Bool
-SampleMaterial.lc 183:23-183:28
+183:23-183:28
     Bool
-SampleMaterial.lc 184:20-184:33
+184:20-184:33
     CullType
-SampleMaterial.lc 185:30-185:32
+185:30-185:32
     forall a . [a]
-SampleMaterial.lc 186:25-186:30
+186:25-186:30
     Bool
-SampleMaterial.lc 187:29-187:34
+187:29-187:34
     Bool
-SampleMaterial.lc 189:13-229:14
+189:13-229:14
     [StageAttrs]
-SampleMaterial.lc 189:15-189:25
+189:15-189:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -4734,110 +4734,110 @@ SampleMaterial.lc 189:15-189:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 189:15-190:36
+189:15-190:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 189:15-191:42
+189:15-191:42
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 189:15-192:42
+189:15-192:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 189:15-193:36
+189:15-193:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 189:15-195:88
+189:15-195:88
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 189:15-196:66
+189:15-196:66
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 189:15-197:38
+189:15-197:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 189:15-198:41
+189:15-198:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 189:15-199:40
+189:15-199:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 189:15-200:46
+189:15-200:46
     String -> StageAttrs
-SampleMaterial.lc 189:15-202:18
+189:15-202:18
     StageAttrs
-SampleMaterial.lc 190:29-190:36
+190:29-190:36
     forall a . Maybe a
-SampleMaterial.lc 191:30-191:42
+191:30-191:42
     RGBGen
-SampleMaterial.lc 192:32-192:42
+192:32-192:42
     AlphaGen
-SampleMaterial.lc 193:29-193:36
+193:29-193:36
     TCGen
-SampleMaterial.lc 195:21-195:88
+195:21-195:88
     [TCMod]
-SampleMaterial.lc 195:23-195:32
+195:23-195:32
     Float -> Float -> TCMod
-SampleMaterial.lc 195:23-195:36
+195:23-195:36
     Float -> TCMod
-SampleMaterial.lc 195:23-195:40
+195:23-195:40
     TCMod
-SampleMaterial.lc 195:33-195:36
+195:33-195:36
     Float
-SampleMaterial.lc 195:37-195:40
+195:37-195:40
     Float
-SampleMaterial.lc 195:43-195:50
+195:43-195:50
     Float -> Float -> Float -> Float -> TCMod
-SampleMaterial.lc 195:43-195:54
+195:43-195:54
     Float -> Float -> Float -> TCMod
-SampleMaterial.lc 195:43-195:59
+195:43-195:59
     Float -> Float -> TCMod
-SampleMaterial.lc 195:43-195:63
+195:43-195:63
     Float -> TCMod
-SampleMaterial.lc 195:43-195:67
+195:43-195:67
     TCMod
-SampleMaterial.lc 195:43-195:86
+195:43-195:86
     [TCMod]
-SampleMaterial.lc 195:51-195:54
+195:51-195:54
     Float
-SampleMaterial.lc 195:55-195:59
+195:55-195:59
     Float
-SampleMaterial.lc 195:60-195:63
+195:60-195:63
     Float
-SampleMaterial.lc 195:64-195:67
+195:64-195:67
     Float
-SampleMaterial.lc 195:70-195:78
+195:70-195:78
     Float -> Float -> TCMod
-SampleMaterial.lc 195:70-195:82
+195:70-195:82
     Float -> TCMod
-SampleMaterial.lc 195:70-195:86
+195:70-195:86
     TCMod | [TCMod]
-SampleMaterial.lc 195:79-195:82
+195:79-195:82
     Float
-SampleMaterial.lc 195:83-195:86
+195:83-195:86
     Float
-SampleMaterial.lc 196:31-196:37
+196:31-196:37
     String -> StageTexture
-SampleMaterial.lc 196:31-196:66
+196:31-196:66
     StageTexture
-SampleMaterial.lc 196:38-196:66
+196:38-196:66
     String
-SampleMaterial.lc 197:34-197:38
+197:34-197:38
     Bool
-SampleMaterial.lc 198:33-198:41
+198:33-198:41
     DepthFunction
-SampleMaterial.lc 199:33-199:40
+199:33-199:40
     forall a . Maybe a
-SampleMaterial.lc 200:41-200:46
+200:41-200:46
     Bool
-SampleMaterial.lc 201:38-201:52
+201:38-201:52
     String
-SampleMaterial.lc 203:15-203:25
+203:15-203:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -4845,80 +4845,80 @@ SampleMaterial.lc 203:15-203:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 203:15-204:69
+203:15-204:69
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 203:15-205:42
+203:15-205:42
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 203:15-206:42
+203:15-206:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 203:15-207:36
+203:15-207:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 203:15-208:31
+203:15-208:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 203:15-209:81
+203:15-209:81
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 203:15-210:39
+203:15-210:39
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 203:15-211:41
+203:15-211:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 203:15-212:40
+203:15-212:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 203:15-213:46
+203:15-213:46
     String -> StageAttrs
-SampleMaterial.lc 203:15-215:18
+203:15-215:18
     StageAttrs
-SampleMaterial.lc 203:15-228:18
+203:15-228:18
     [StageAttrs]
-SampleMaterial.lc 204:29-204:33
+204:29-204:33
     forall a . a -> Maybe a
-SampleMaterial.lc 204:29-204:69
+204:29-204:69
     Maybe (Blending', Blending')
-SampleMaterial.lc 204:34-204:69
+204:34-204:69
     (Blending', Blending')
-SampleMaterial.lc 204:36-204:46
+204:36-204:46
     Blending'
-SampleMaterial.lc 204:49-204:67
+204:49-204:67
     Blending' | ((Blending'))
-SampleMaterial.lc 205:30-205:42
+205:30-205:42
     RGBGen
-SampleMaterial.lc 206:32-206:42
+206:32-206:42
     AlphaGen
-SampleMaterial.lc 207:29-207:36
+207:29-207:36
     TCGen
-SampleMaterial.lc 208:29-208:31
+208:29-208:31
     forall a . [a]
-SampleMaterial.lc 209:31-209:37
+209:31-209:37
     String -> StageTexture
-SampleMaterial.lc 209:31-209:81
+209:31-209:81
     StageTexture
-SampleMaterial.lc 209:38-209:81
+209:38-209:81
     String
-SampleMaterial.lc 210:34-210:39
+210:34-210:39
     Bool
-SampleMaterial.lc 211:33-211:41
+211:33-211:41
     DepthFunction
-SampleMaterial.lc 212:33-212:40
+212:33-212:40
     forall a . Maybe a
-SampleMaterial.lc 213:41-213:46
+213:41-213:46
     Bool
-SampleMaterial.lc 214:38-214:54
+214:38-214:54
     String
-SampleMaterial.lc 216:15-216:25
+216:15-216:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -4926,82 +4926,82 @@ SampleMaterial.lc 216:15-216:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 216:15-217:69
+216:15-217:69
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 216:15-218:42
+216:15-218:42
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 216:15-219:42
+216:15-219:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 216:15-220:40
+216:15-220:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 216:15-221:31
+216:15-221:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 216:15-222:42
+216:15-222:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 216:15-223:39
+216:15-223:39
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 216:15-224:41
+216:15-224:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 216:15-225:40
+216:15-225:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 216:15-226:46
+216:15-226:46
     String -> StageAttrs
-SampleMaterial.lc 216:15-228:18
+216:15-228:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 217:29-217:33
+217:29-217:33
     forall a . a -> Maybe a
-SampleMaterial.lc 217:29-217:69
+217:29-217:69
     Maybe (Blending', Blending')
-SampleMaterial.lc 217:34-217:69
+217:34-217:69
     (Blending', Blending')
-SampleMaterial.lc 217:36-217:46
+217:36-217:46
     Blending'
-SampleMaterial.lc 217:49-217:67
+217:49-217:67
     Blending' | ((Blending'))
-SampleMaterial.lc 218:30-218:42
+218:30-218:42
     RGBGen
-SampleMaterial.lc 219:32-219:42
+219:32-219:42
     AlphaGen
-SampleMaterial.lc 220:29-220:40
+220:29-220:40
     TCGen
-SampleMaterial.lc 221:29-221:31
+221:29-221:31
     forall a . [a]
-SampleMaterial.lc 222:31-222:42
+222:31-222:42
     StageTexture
-SampleMaterial.lc 223:34-223:39
+223:34-223:39
     Bool
-SampleMaterial.lc 224:33-224:41
+224:33-224:41
     DepthFunction
-SampleMaterial.lc 225:33-225:40
+225:33-225:40
     forall a . Maybe a
-SampleMaterial.lc 226:41-226:46
+226:41-226:46
     Bool
-SampleMaterial.lc 227:38-227:54
+227:38-227:54
     String
-SampleMaterial.lc 230:21-230:26
+230:21-230:26
     Bool
-SampleMaterial.lc 233:5-275:6
+233:5-275:6
     (String, CommonAttrs)
-SampleMaterial.lc 233:5-2182:6
+233:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 233:7-233:40
+233:7-233:40
     String
-SampleMaterial.lc 234:7-234:18
+234:7-234:18
     ()
       -> ()
         -> Bool
@@ -5009,68 +5009,68 @@ SampleMaterial.lc 234:7-234:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 234:7-235:26
+234:7-235:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 234:7-236:26
+234:7-236:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 234:7-237:27
+234:7-237:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 234:7-238:21
+234:7-238:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 234:7-239:35
+234:7-239:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 234:7-240:28
+234:7-240:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 234:7-241:33
+234:7-241:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 234:7-242:32
+234:7-242:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 234:7-243:30
+234:7-243:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 234:7-244:34
+234:7-244:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 234:7-272:14
+234:7-272:14
     Bool -> CommonAttrs
-SampleMaterial.lc 234:7-274:10
+234:7-274:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 235:24-235:26
+235:24-235:26
     ()
-SampleMaterial.lc 236:24-236:26
+236:24-236:26
     ()
-SampleMaterial.lc 237:22-237:27
+237:22-237:27
     Bool
-SampleMaterial.lc 238:20-238:21
+238:20-238:21
     _b
-SampleMaterial.lc 239:30-239:35
+239:30-239:35
     Bool
-SampleMaterial.lc 240:23-240:28
+240:23-240:28
     Bool
-SampleMaterial.lc 241:20-241:33
+241:20-241:33
     CullType
-SampleMaterial.lc 242:30-242:32
+242:30-242:32
     forall a . [a]
-SampleMaterial.lc 243:25-243:30
+243:25-243:30
     Bool
-SampleMaterial.lc 244:29-244:34
+244:29-244:34
     Bool
-SampleMaterial.lc 246:13-272:14
+246:13-272:14
     [StageAttrs]
-SampleMaterial.lc 246:15-246:25
+246:15-246:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -5078,70 +5078,70 @@ SampleMaterial.lc 246:15-246:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 246:15-247:36
+246:15-247:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 246:15-248:50
+246:15-248:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 246:15-249:42
+246:15-249:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 246:15-250:36
+246:15-250:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 246:15-251:31
+246:15-251:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 246:15-252:71
+246:15-252:71
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 246:15-253:38
+246:15-253:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 246:15-254:41
+246:15-254:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 246:15-255:40
+246:15-255:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 246:15-256:46
+246:15-256:46
     String -> StageAttrs
-SampleMaterial.lc 246:15-258:18
+246:15-258:18
     StageAttrs
-SampleMaterial.lc 247:29-247:36
+247:29-247:36
     forall a . Maybe a
-SampleMaterial.lc 248:30-248:50
+248:30-248:50
     RGBGen
-SampleMaterial.lc 249:32-249:42
+249:32-249:42
     AlphaGen
-SampleMaterial.lc 250:29-250:36
+250:29-250:36
     TCGen
-SampleMaterial.lc 251:29-251:31
+251:29-251:31
     forall a . [a]
-SampleMaterial.lc 252:31-252:37
+252:31-252:37
     String -> StageTexture
-SampleMaterial.lc 252:31-252:71
+252:31-252:71
     StageTexture
-SampleMaterial.lc 252:38-252:71
+252:38-252:71
     String
-SampleMaterial.lc 253:34-253:38
+253:34-253:38
     Bool
-SampleMaterial.lc 254:33-254:41
+254:33-254:41
     DepthFunction
-SampleMaterial.lc 255:33-255:40
+255:33-255:40
     forall a . Maybe a
-SampleMaterial.lc 256:41-256:46
+256:41-256:46
     Bool
-SampleMaterial.lc 257:38-257:54
+257:38-257:54
     String
-SampleMaterial.lc 259:15-259:25
+259:15-259:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -5149,82 +5149,82 @@ SampleMaterial.lc 259:15-259:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 259:15-260:57
+259:15-260:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 259:15-261:50
+259:15-261:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 259:15-262:42
+259:15-262:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 259:15-263:40
+259:15-263:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 259:15-264:31
+259:15-264:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 259:15-265:42
+259:15-265:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 259:15-266:38
+259:15-266:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 259:15-267:41
+259:15-267:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 259:15-268:40
+259:15-268:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 259:15-269:46
+259:15-269:46
     String -> StageAttrs
-SampleMaterial.lc 259:15-271:18
+259:15-271:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 260:29-260:33
+260:29-260:33
     forall a . a -> Maybe a
-SampleMaterial.lc 260:29-260:57
+260:29-260:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 260:34-260:57
+260:34-260:57
     (Blending', Blending')
-SampleMaterial.lc 260:36-260:46
+260:36-260:46
     Blending'
-SampleMaterial.lc 260:49-260:55
+260:49-260:55
     Blending' | ((Blending'))
-SampleMaterial.lc 261:30-261:50
+261:30-261:50
     RGBGen
-SampleMaterial.lc 262:32-262:42
+262:32-262:42
     AlphaGen
-SampleMaterial.lc 263:29-263:40
+263:29-263:40
     TCGen
-SampleMaterial.lc 264:29-264:31
+264:29-264:31
     forall a . [a]
-SampleMaterial.lc 265:31-265:42
+265:31-265:42
     StageTexture
-SampleMaterial.lc 266:34-266:38
+266:34-266:38
     Bool
-SampleMaterial.lc 267:33-267:41
+267:33-267:41
     DepthFunction
-SampleMaterial.lc 268:33-268:40
+268:33-268:40
     forall a . Maybe a
-SampleMaterial.lc 269:41-269:46
+269:41-269:46
     Bool
-SampleMaterial.lc 270:38-270:54
+270:38-270:54
     String
-SampleMaterial.lc 273:21-273:26
+273:21-273:26
     Bool
-SampleMaterial.lc 276:5-318:6
+276:5-318:6
     (String, CommonAttrs)
-SampleMaterial.lc 276:5-2182:6
+276:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 276:7-276:42
+276:7-276:42
     String
-SampleMaterial.lc 277:7-277:18
+277:7-277:18
     ()
       -> ()
         -> Bool
@@ -5232,68 +5232,68 @@ SampleMaterial.lc 277:7-277:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 277:7-278:26
+277:7-278:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 277:7-279:26
+277:7-279:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 277:7-280:27
+277:7-280:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 277:7-281:21
+277:7-281:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 277:7-282:35
+277:7-282:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 277:7-283:28
+277:7-283:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 277:7-284:33
+277:7-284:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 277:7-285:32
+277:7-285:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 277:7-286:30
+277:7-286:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 277:7-287:34
+277:7-287:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 277:7-315:14
+277:7-315:14
     Bool -> CommonAttrs
-SampleMaterial.lc 277:7-317:10
+277:7-317:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 278:24-278:26
+278:24-278:26
     ()
-SampleMaterial.lc 279:24-279:26
+279:24-279:26
     ()
-SampleMaterial.lc 280:22-280:27
+280:22-280:27
     Bool
-SampleMaterial.lc 281:20-281:21
+281:20-281:21
     _b
-SampleMaterial.lc 282:30-282:35
+282:30-282:35
     Bool
-SampleMaterial.lc 283:23-283:28
+283:23-283:28
     Bool
-SampleMaterial.lc 284:20-284:33
+284:20-284:33
     CullType
-SampleMaterial.lc 285:30-285:32
+285:30-285:32
     forall a . [a]
-SampleMaterial.lc 286:25-286:30
+286:25-286:30
     Bool
-SampleMaterial.lc 287:29-287:34
+287:29-287:34
     Bool
-SampleMaterial.lc 289:13-315:14
+289:13-315:14
     [StageAttrs]
-SampleMaterial.lc 289:15-289:25
+289:15-289:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -5301,70 +5301,70 @@ SampleMaterial.lc 289:15-289:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 289:15-290:36
+289:15-290:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 289:15-291:50
+289:15-291:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 289:15-292:42
+289:15-292:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 289:15-293:36
+289:15-293:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 289:15-294:31
+289:15-294:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 289:15-295:73
+289:15-295:73
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 289:15-296:38
+289:15-296:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 289:15-297:41
+289:15-297:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 289:15-298:40
+289:15-298:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 289:15-299:46
+289:15-299:46
     String -> StageAttrs
-SampleMaterial.lc 289:15-301:18
+289:15-301:18
     StageAttrs
-SampleMaterial.lc 290:29-290:36
+290:29-290:36
     forall a . Maybe a
-SampleMaterial.lc 291:30-291:50
+291:30-291:50
     RGBGen
-SampleMaterial.lc 292:32-292:42
+292:32-292:42
     AlphaGen
-SampleMaterial.lc 293:29-293:36
+293:29-293:36
     TCGen
-SampleMaterial.lc 294:29-294:31
+294:29-294:31
     forall a . [a]
-SampleMaterial.lc 295:31-295:37
+295:31-295:37
     String -> StageTexture
-SampleMaterial.lc 295:31-295:73
+295:31-295:73
     StageTexture
-SampleMaterial.lc 295:38-295:73
+295:38-295:73
     String
-SampleMaterial.lc 296:34-296:38
+296:34-296:38
     Bool
-SampleMaterial.lc 297:33-297:41
+297:33-297:41
     DepthFunction
-SampleMaterial.lc 298:33-298:40
+298:33-298:40
     forall a . Maybe a
-SampleMaterial.lc 299:41-299:46
+299:41-299:46
     Bool
-SampleMaterial.lc 300:38-300:53
+300:38-300:53
     String
-SampleMaterial.lc 302:15-302:25
+302:15-302:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -5372,82 +5372,82 @@ SampleMaterial.lc 302:15-302:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 302:15-303:57
+302:15-303:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 302:15-304:50
+302:15-304:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 302:15-305:42
+302:15-305:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 302:15-306:40
+302:15-306:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 302:15-307:31
+302:15-307:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 302:15-308:42
+302:15-308:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 302:15-309:38
+302:15-309:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 302:15-310:41
+302:15-310:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 302:15-311:40
+302:15-311:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 302:15-312:46
+302:15-312:46
     String -> StageAttrs
-SampleMaterial.lc 302:15-314:18
+302:15-314:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 303:29-303:33
+303:29-303:33
     forall a . a -> Maybe a
-SampleMaterial.lc 303:29-303:57
+303:29-303:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 303:34-303:57
+303:34-303:57
     (Blending', Blending')
-SampleMaterial.lc 303:36-303:46
+303:36-303:46
     Blending'
-SampleMaterial.lc 303:49-303:55
+303:49-303:55
     Blending' | ((Blending'))
-SampleMaterial.lc 304:30-304:50
+304:30-304:50
     RGBGen
-SampleMaterial.lc 305:32-305:42
+305:32-305:42
     AlphaGen
-SampleMaterial.lc 306:29-306:40
+306:29-306:40
     TCGen
-SampleMaterial.lc 307:29-307:31
+307:29-307:31
     forall a . [a]
-SampleMaterial.lc 308:31-308:42
+308:31-308:42
     StageTexture
-SampleMaterial.lc 309:34-309:38
+309:34-309:38
     Bool
-SampleMaterial.lc 310:33-310:41
+310:33-310:41
     DepthFunction
-SampleMaterial.lc 311:33-311:40
+311:33-311:40
     forall a . Maybe a
-SampleMaterial.lc 312:41-312:46
+312:41-312:46
     Bool
-SampleMaterial.lc 313:38-313:54
+313:38-313:54
     String
-SampleMaterial.lc 316:21-316:26
+316:21-316:26
     Bool
-SampleMaterial.lc 319:5-361:6
+319:5-361:6
     (String, CommonAttrs)
-SampleMaterial.lc 319:5-2182:6
+319:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 319:7-319:43
+319:7-319:43
     String
-SampleMaterial.lc 320:7-320:18
+320:7-320:18
     ()
       -> ()
         -> Bool
@@ -5455,68 +5455,68 @@ SampleMaterial.lc 320:7-320:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 320:7-321:26
+320:7-321:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 320:7-322:26
+320:7-322:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 320:7-323:27
+320:7-323:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 320:7-324:21
+320:7-324:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 320:7-325:35
+320:7-325:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 320:7-326:28
+320:7-326:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 320:7-327:33
+320:7-327:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 320:7-328:32
+320:7-328:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 320:7-329:30
+320:7-329:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 320:7-330:34
+320:7-330:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 320:7-358:14
+320:7-358:14
     Bool -> CommonAttrs
-SampleMaterial.lc 320:7-360:10
+320:7-360:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 321:24-321:26
+321:24-321:26
     ()
-SampleMaterial.lc 322:24-322:26
+322:24-322:26
     ()
-SampleMaterial.lc 323:22-323:27
+323:22-323:27
     Bool
-SampleMaterial.lc 324:20-324:21
+324:20-324:21
     _b
-SampleMaterial.lc 325:30-325:35
+325:30-325:35
     Bool
-SampleMaterial.lc 326:23-326:28
+326:23-326:28
     Bool
-SampleMaterial.lc 327:20-327:33
+327:20-327:33
     CullType
-SampleMaterial.lc 328:30-328:32
+328:30-328:32
     forall a . [a]
-SampleMaterial.lc 329:25-329:30
+329:25-329:30
     Bool
-SampleMaterial.lc 330:29-330:34
+330:29-330:34
     Bool
-SampleMaterial.lc 332:13-358:14
+332:13-358:14
     [StageAttrs]
-SampleMaterial.lc 332:15-332:25
+332:15-332:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -5524,70 +5524,70 @@ SampleMaterial.lc 332:15-332:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 332:15-333:36
+332:15-333:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 332:15-334:50
+332:15-334:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 332:15-335:42
+332:15-335:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 332:15-336:36
+332:15-336:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 332:15-337:31
+332:15-337:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 332:15-338:74
+332:15-338:74
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 332:15-339:38
+332:15-339:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 332:15-340:41
+332:15-340:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 332:15-341:40
+332:15-341:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 332:15-342:46
+332:15-342:46
     String -> StageAttrs
-SampleMaterial.lc 332:15-344:18
+332:15-344:18
     StageAttrs
-SampleMaterial.lc 333:29-333:36
+333:29-333:36
     forall a . Maybe a
-SampleMaterial.lc 334:30-334:50
+334:30-334:50
     RGBGen
-SampleMaterial.lc 335:32-335:42
+335:32-335:42
     AlphaGen
-SampleMaterial.lc 336:29-336:36
+336:29-336:36
     TCGen
-SampleMaterial.lc 337:29-337:31
+337:29-337:31
     forall a . [a]
-SampleMaterial.lc 338:31-338:37
+338:31-338:37
     String -> StageTexture
-SampleMaterial.lc 338:31-338:74
+338:31-338:74
     StageTexture
-SampleMaterial.lc 338:38-338:74
+338:38-338:74
     String
-SampleMaterial.lc 339:34-339:38
+339:34-339:38
     Bool
-SampleMaterial.lc 340:33-340:41
+340:33-340:41
     DepthFunction
-SampleMaterial.lc 341:33-341:40
+341:33-341:40
     forall a . Maybe a
-SampleMaterial.lc 342:41-342:46
+342:41-342:46
     Bool
-SampleMaterial.lc 343:38-343:54
+343:38-343:54
     String
-SampleMaterial.lc 345:15-345:25
+345:15-345:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -5595,82 +5595,82 @@ SampleMaterial.lc 345:15-345:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 345:15-346:57
+345:15-346:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 345:15-347:50
+345:15-347:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 345:15-348:42
+345:15-348:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 345:15-349:40
+345:15-349:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 345:15-350:31
+345:15-350:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 345:15-351:42
+345:15-351:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 345:15-352:38
+345:15-352:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 345:15-353:41
+345:15-353:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 345:15-354:40
+345:15-354:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 345:15-355:46
+345:15-355:46
     String -> StageAttrs
-SampleMaterial.lc 345:15-357:18
+345:15-357:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 346:29-346:33
+346:29-346:33
     forall a . a -> Maybe a
-SampleMaterial.lc 346:29-346:57
+346:29-346:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 346:34-346:57
+346:34-346:57
     (Blending', Blending')
-SampleMaterial.lc 346:36-346:46
+346:36-346:46
     Blending'
-SampleMaterial.lc 346:49-346:55
+346:49-346:55
     Blending' | ((Blending'))
-SampleMaterial.lc 347:30-347:50
+347:30-347:50
     RGBGen
-SampleMaterial.lc 348:32-348:42
+348:32-348:42
     AlphaGen
-SampleMaterial.lc 349:29-349:40
+349:29-349:40
     TCGen
-SampleMaterial.lc 350:29-350:31
+350:29-350:31
     forall a . [a]
-SampleMaterial.lc 351:31-351:42
+351:31-351:42
     StageTexture
-SampleMaterial.lc 352:34-352:38
+352:34-352:38
     Bool
-SampleMaterial.lc 353:33-353:41
+353:33-353:41
     DepthFunction
-SampleMaterial.lc 354:33-354:40
+354:33-354:40
     forall a . Maybe a
-SampleMaterial.lc 355:41-355:46
+355:41-355:46
     Bool
-SampleMaterial.lc 356:38-356:54
+356:38-356:54
     String
-SampleMaterial.lc 359:21-359:26
+359:21-359:26
     Bool
-SampleMaterial.lc 362:5-404:6
+362:5-404:6
     (String, CommonAttrs)
-SampleMaterial.lc 362:5-2182:6
+362:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 362:7-362:53
+362:7-362:53
     String
-SampleMaterial.lc 363:7-363:18
+363:7-363:18
     ()
       -> ()
         -> Bool
@@ -5678,68 +5678,68 @@ SampleMaterial.lc 363:7-363:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 363:7-364:26
+363:7-364:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 363:7-365:26
+363:7-365:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 363:7-366:27
+363:7-366:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 363:7-367:21
+363:7-367:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 363:7-368:35
+363:7-368:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 363:7-369:28
+363:7-369:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 363:7-370:33
+363:7-370:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 363:7-371:32
+363:7-371:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 363:7-372:30
+363:7-372:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 363:7-373:34
+363:7-373:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 363:7-401:14
+363:7-401:14
     Bool -> CommonAttrs
-SampleMaterial.lc 363:7-403:10
+363:7-403:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 364:24-364:26
+364:24-364:26
     ()
-SampleMaterial.lc 365:24-365:26
+365:24-365:26
     ()
-SampleMaterial.lc 366:22-366:27
+366:22-366:27
     Bool
-SampleMaterial.lc 367:20-367:21
+367:20-367:21
     _b
-SampleMaterial.lc 368:30-368:35
+368:30-368:35
     Bool
-SampleMaterial.lc 369:23-369:28
+369:23-369:28
     Bool
-SampleMaterial.lc 370:20-370:33
+370:20-370:33
     CullType
-SampleMaterial.lc 371:30-371:32
+371:30-371:32
     forall a . [a]
-SampleMaterial.lc 372:25-372:30
+372:25-372:30
     Bool
-SampleMaterial.lc 373:29-373:34
+373:29-373:34
     Bool
-SampleMaterial.lc 375:13-401:14
+375:13-401:14
     [StageAttrs]
-SampleMaterial.lc 375:15-375:25
+375:15-375:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -5747,70 +5747,70 @@ SampleMaterial.lc 375:15-375:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 375:15-376:36
+375:15-376:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 375:15-377:50
+375:15-377:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 375:15-378:42
+375:15-378:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 375:15-379:36
+375:15-379:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 375:15-380:31
+375:15-380:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 375:15-381:84
+375:15-381:84
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 375:15-382:38
+375:15-382:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 375:15-383:41
+375:15-383:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 375:15-384:40
+375:15-384:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 375:15-385:46
+375:15-385:46
     String -> StageAttrs
-SampleMaterial.lc 375:15-387:18
+375:15-387:18
     StageAttrs
-SampleMaterial.lc 376:29-376:36
+376:29-376:36
     forall a . Maybe a
-SampleMaterial.lc 377:30-377:50
+377:30-377:50
     RGBGen
-SampleMaterial.lc 378:32-378:42
+378:32-378:42
     AlphaGen
-SampleMaterial.lc 379:29-379:36
+379:29-379:36
     TCGen
-SampleMaterial.lc 380:29-380:31
+380:29-380:31
     forall a . [a]
-SampleMaterial.lc 381:31-381:37
+381:31-381:37
     String -> StageTexture
-SampleMaterial.lc 381:31-381:84
+381:31-381:84
     StageTexture
-SampleMaterial.lc 381:38-381:84
+381:38-381:84
     String
-SampleMaterial.lc 382:34-382:38
+382:34-382:38
     Bool
-SampleMaterial.lc 383:33-383:41
+383:33-383:41
     DepthFunction
-SampleMaterial.lc 384:33-384:40
+384:33-384:40
     forall a . Maybe a
-SampleMaterial.lc 385:41-385:46
+385:41-385:46
     Bool
-SampleMaterial.lc 386:38-386:54
+386:38-386:54
     String
-SampleMaterial.lc 388:15-388:25
+388:15-388:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -5818,82 +5818,82 @@ SampleMaterial.lc 388:15-388:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 388:15-389:57
+388:15-389:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 388:15-390:50
+388:15-390:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 388:15-391:42
+388:15-391:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 388:15-392:40
+388:15-392:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 388:15-393:31
+388:15-393:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 388:15-394:42
+388:15-394:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 388:15-395:38
+388:15-395:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 388:15-396:41
+388:15-396:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 388:15-397:40
+388:15-397:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 388:15-398:46
+388:15-398:46
     String -> StageAttrs
-SampleMaterial.lc 388:15-400:18
+388:15-400:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 389:29-389:33
+389:29-389:33
     forall a . a -> Maybe a
-SampleMaterial.lc 389:29-389:57
+389:29-389:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 389:34-389:57
+389:34-389:57
     (Blending', Blending')
-SampleMaterial.lc 389:36-389:46
+389:36-389:46
     Blending'
-SampleMaterial.lc 389:49-389:55
+389:49-389:55
     Blending' | ((Blending'))
-SampleMaterial.lc 390:30-390:50
+390:30-390:50
     RGBGen
-SampleMaterial.lc 391:32-391:42
+391:32-391:42
     AlphaGen
-SampleMaterial.lc 392:29-392:40
+392:29-392:40
     TCGen
-SampleMaterial.lc 393:29-393:31
+393:29-393:31
     forall a . [a]
-SampleMaterial.lc 394:31-394:42
+394:31-394:42
     StageTexture
-SampleMaterial.lc 395:34-395:38
+395:34-395:38
     Bool
-SampleMaterial.lc 396:33-396:41
+396:33-396:41
     DepthFunction
-SampleMaterial.lc 397:33-397:40
+397:33-397:40
     forall a . Maybe a
-SampleMaterial.lc 398:41-398:46
+398:41-398:46
     Bool
-SampleMaterial.lc 399:38-399:54
+399:38-399:54
     String
-SampleMaterial.lc 402:21-402:26
+402:21-402:26
     Bool
-SampleMaterial.lc 405:5-447:6
+405:5-447:6
     (String, CommonAttrs)
-SampleMaterial.lc 405:5-2182:6
+405:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 405:7-405:53
+405:7-405:53
     String
-SampleMaterial.lc 406:7-406:18
+406:7-406:18
     ()
       -> ()
         -> Bool
@@ -5901,68 +5901,68 @@ SampleMaterial.lc 406:7-406:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 406:7-407:26
+406:7-407:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 406:7-408:26
+406:7-408:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 406:7-409:27
+406:7-409:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 406:7-410:21
+406:7-410:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 406:7-411:35
+406:7-411:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 406:7-412:28
+406:7-412:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 406:7-413:33
+406:7-413:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 406:7-414:32
+406:7-414:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 406:7-415:30
+406:7-415:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 406:7-416:34
+406:7-416:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 406:7-444:14
+406:7-444:14
     Bool -> CommonAttrs
-SampleMaterial.lc 406:7-446:10
+406:7-446:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 407:24-407:26
+407:24-407:26
     ()
-SampleMaterial.lc 408:24-408:26
+408:24-408:26
     ()
-SampleMaterial.lc 409:22-409:27
+409:22-409:27
     Bool
-SampleMaterial.lc 410:20-410:21
+410:20-410:21
     _b
-SampleMaterial.lc 411:30-411:35
+411:30-411:35
     Bool
-SampleMaterial.lc 412:23-412:28
+412:23-412:28
     Bool
-SampleMaterial.lc 413:20-413:33
+413:20-413:33
     CullType
-SampleMaterial.lc 414:30-414:32
+414:30-414:32
     forall a . [a]
-SampleMaterial.lc 415:25-415:30
+415:25-415:30
     Bool
-SampleMaterial.lc 416:29-416:34
+416:29-416:34
     Bool
-SampleMaterial.lc 418:13-444:14
+418:13-444:14
     [StageAttrs]
-SampleMaterial.lc 418:15-418:25
+418:15-418:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -5970,70 +5970,70 @@ SampleMaterial.lc 418:15-418:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 418:15-419:36
+418:15-419:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 418:15-420:50
+418:15-420:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 418:15-421:42
+418:15-421:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 418:15-422:36
+418:15-422:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 418:15-423:31
+418:15-423:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 418:15-424:84
+418:15-424:84
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 418:15-425:38
+418:15-425:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 418:15-426:41
+418:15-426:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 418:15-427:40
+418:15-427:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 418:15-428:46
+418:15-428:46
     String -> StageAttrs
-SampleMaterial.lc 418:15-430:18
+418:15-430:18
     StageAttrs
-SampleMaterial.lc 419:29-419:36
+419:29-419:36
     forall a . Maybe a
-SampleMaterial.lc 420:30-420:50
+420:30-420:50
     RGBGen
-SampleMaterial.lc 421:32-421:42
+421:32-421:42
     AlphaGen
-SampleMaterial.lc 422:29-422:36
+422:29-422:36
     TCGen
-SampleMaterial.lc 423:29-423:31
+423:29-423:31
     forall a . [a]
-SampleMaterial.lc 424:31-424:37
+424:31-424:37
     String -> StageTexture
-SampleMaterial.lc 424:31-424:84
+424:31-424:84
     StageTexture
-SampleMaterial.lc 424:38-424:84
+424:38-424:84
     String
-SampleMaterial.lc 425:34-425:38
+425:34-425:38
     Bool
-SampleMaterial.lc 426:33-426:41
+426:33-426:41
     DepthFunction
-SampleMaterial.lc 427:33-427:40
+427:33-427:40
     forall a . Maybe a
-SampleMaterial.lc 428:41-428:46
+428:41-428:46
     Bool
-SampleMaterial.lc 429:38-429:54
+429:38-429:54
     String
-SampleMaterial.lc 431:15-431:25
+431:15-431:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -6041,82 +6041,82 @@ SampleMaterial.lc 431:15-431:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 431:15-432:57
+431:15-432:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 431:15-433:50
+431:15-433:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 431:15-434:42
+431:15-434:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 431:15-435:40
+431:15-435:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 431:15-436:31
+431:15-436:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 431:15-437:42
+431:15-437:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 431:15-438:38
+431:15-438:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 431:15-439:41
+431:15-439:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 431:15-440:40
+431:15-440:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 431:15-441:46
+431:15-441:46
     String -> StageAttrs
-SampleMaterial.lc 431:15-443:18
+431:15-443:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 432:29-432:33
+432:29-432:33
     forall a . a -> Maybe a
-SampleMaterial.lc 432:29-432:57
+432:29-432:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 432:34-432:57
+432:34-432:57
     (Blending', Blending')
-SampleMaterial.lc 432:36-432:46
+432:36-432:46
     Blending'
-SampleMaterial.lc 432:49-432:55
+432:49-432:55
     Blending' | ((Blending'))
-SampleMaterial.lc 433:30-433:50
+433:30-433:50
     RGBGen
-SampleMaterial.lc 434:32-434:42
+434:32-434:42
     AlphaGen
-SampleMaterial.lc 435:29-435:40
+435:29-435:40
     TCGen
-SampleMaterial.lc 436:29-436:31
+436:29-436:31
     forall a . [a]
-SampleMaterial.lc 437:31-437:42
+437:31-437:42
     StageTexture
-SampleMaterial.lc 438:34-438:38
+438:34-438:38
     Bool
-SampleMaterial.lc 439:33-439:41
+439:33-439:41
     DepthFunction
-SampleMaterial.lc 440:33-440:40
+440:33-440:40
     forall a . Maybe a
-SampleMaterial.lc 441:41-441:46
+441:41-441:46
     Bool
-SampleMaterial.lc 442:38-442:54
+442:38-442:54
     String
-SampleMaterial.lc 445:21-445:26
+445:21-445:26
     Bool
-SampleMaterial.lc 448:5-490:6
+448:5-490:6
     (String, CommonAttrs)
-SampleMaterial.lc 448:5-2182:6
+448:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 448:7-448:53
+448:7-448:53
     String
-SampleMaterial.lc 449:7-449:18
+449:7-449:18
     ()
       -> ()
         -> Bool
@@ -6124,68 +6124,68 @@ SampleMaterial.lc 449:7-449:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 449:7-450:26
+449:7-450:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 449:7-451:26
+449:7-451:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 449:7-452:27
+449:7-452:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 449:7-453:21
+449:7-453:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 449:7-454:35
+449:7-454:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 449:7-455:28
+449:7-455:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 449:7-456:33
+449:7-456:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 449:7-457:32
+449:7-457:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 449:7-458:30
+449:7-458:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 449:7-459:34
+449:7-459:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 449:7-487:14
+449:7-487:14
     Bool -> CommonAttrs
-SampleMaterial.lc 449:7-489:10
+449:7-489:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 450:24-450:26
+450:24-450:26
     ()
-SampleMaterial.lc 451:24-451:26
+451:24-451:26
     ()
-SampleMaterial.lc 452:22-452:27
+452:22-452:27
     Bool
-SampleMaterial.lc 453:20-453:21
+453:20-453:21
     _b
-SampleMaterial.lc 454:30-454:35
+454:30-454:35
     Bool
-SampleMaterial.lc 455:23-455:28
+455:23-455:28
     Bool
-SampleMaterial.lc 456:20-456:33
+456:20-456:33
     CullType
-SampleMaterial.lc 457:30-457:32
+457:30-457:32
     forall a . [a]
-SampleMaterial.lc 458:25-458:30
+458:25-458:30
     Bool
-SampleMaterial.lc 459:29-459:34
+459:29-459:34
     Bool
-SampleMaterial.lc 461:13-487:14
+461:13-487:14
     [StageAttrs]
-SampleMaterial.lc 461:15-461:25
+461:15-461:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -6193,70 +6193,70 @@ SampleMaterial.lc 461:15-461:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 461:15-462:36
+461:15-462:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 461:15-463:50
+461:15-463:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 461:15-464:42
+461:15-464:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 461:15-465:36
+461:15-465:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 461:15-466:31
+461:15-466:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 461:15-467:84
+461:15-467:84
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 461:15-468:38
+461:15-468:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 461:15-469:41
+461:15-469:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 461:15-470:40
+461:15-470:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 461:15-471:46
+461:15-471:46
     String -> StageAttrs
-SampleMaterial.lc 461:15-473:18
+461:15-473:18
     StageAttrs
-SampleMaterial.lc 462:29-462:36
+462:29-462:36
     forall a . Maybe a
-SampleMaterial.lc 463:30-463:50
+463:30-463:50
     RGBGen
-SampleMaterial.lc 464:32-464:42
+464:32-464:42
     AlphaGen
-SampleMaterial.lc 465:29-465:36
+465:29-465:36
     TCGen
-SampleMaterial.lc 466:29-466:31
+466:29-466:31
     forall a . [a]
-SampleMaterial.lc 467:31-467:37
+467:31-467:37
     String -> StageTexture
-SampleMaterial.lc 467:31-467:84
+467:31-467:84
     StageTexture
-SampleMaterial.lc 467:38-467:84
+467:38-467:84
     String
-SampleMaterial.lc 468:34-468:38
+468:34-468:38
     Bool
-SampleMaterial.lc 469:33-469:41
+469:33-469:41
     DepthFunction
-SampleMaterial.lc 470:33-470:40
+470:33-470:40
     forall a . Maybe a
-SampleMaterial.lc 471:41-471:46
+471:41-471:46
     Bool
-SampleMaterial.lc 472:38-472:54
+472:38-472:54
     String
-SampleMaterial.lc 474:15-474:25
+474:15-474:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -6264,82 +6264,82 @@ SampleMaterial.lc 474:15-474:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 474:15-475:57
+474:15-475:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 474:15-476:50
+474:15-476:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 474:15-477:42
+474:15-477:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 474:15-478:40
+474:15-478:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 474:15-479:31
+474:15-479:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 474:15-480:42
+474:15-480:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 474:15-481:38
+474:15-481:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 474:15-482:41
+474:15-482:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 474:15-483:40
+474:15-483:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 474:15-484:46
+474:15-484:46
     String -> StageAttrs
-SampleMaterial.lc 474:15-486:18
+474:15-486:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 475:29-475:33
+475:29-475:33
     forall a . a -> Maybe a
-SampleMaterial.lc 475:29-475:57
+475:29-475:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 475:34-475:57
+475:34-475:57
     (Blending', Blending')
-SampleMaterial.lc 475:36-475:46
+475:36-475:46
     Blending'
-SampleMaterial.lc 475:49-475:55
+475:49-475:55
     Blending' | ((Blending'))
-SampleMaterial.lc 476:30-476:50
+476:30-476:50
     RGBGen
-SampleMaterial.lc 477:32-477:42
+477:32-477:42
     AlphaGen
-SampleMaterial.lc 478:29-478:40
+478:29-478:40
     TCGen
-SampleMaterial.lc 479:29-479:31
+479:29-479:31
     forall a . [a]
-SampleMaterial.lc 480:31-480:42
+480:31-480:42
     StageTexture
-SampleMaterial.lc 481:34-481:38
+481:34-481:38
     Bool
-SampleMaterial.lc 482:33-482:41
+482:33-482:41
     DepthFunction
-SampleMaterial.lc 483:33-483:40
+483:33-483:40
     forall a . Maybe a
-SampleMaterial.lc 484:41-484:46
+484:41-484:46
     Bool
-SampleMaterial.lc 485:38-485:54
+485:38-485:54
     String
-SampleMaterial.lc 488:21-488:26
+488:21-488:26
     Bool
-SampleMaterial.lc 491:5-533:6
+491:5-533:6
     (String, CommonAttrs)
-SampleMaterial.lc 491:5-2182:6
+491:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 491:7-491:53
+491:7-491:53
     String
-SampleMaterial.lc 492:7-492:18
+492:7-492:18
     ()
       -> ()
         -> Bool
@@ -6347,68 +6347,68 @@ SampleMaterial.lc 492:7-492:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 492:7-493:26
+492:7-493:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 492:7-494:26
+492:7-494:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 492:7-495:27
+492:7-495:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 492:7-496:21
+492:7-496:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 492:7-497:35
+492:7-497:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 492:7-498:28
+492:7-498:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 492:7-499:33
+492:7-499:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 492:7-500:32
+492:7-500:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 492:7-501:30
+492:7-501:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 492:7-502:34
+492:7-502:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 492:7-530:14
+492:7-530:14
     Bool -> CommonAttrs
-SampleMaterial.lc 492:7-532:10
+492:7-532:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 493:24-493:26
+493:24-493:26
     ()
-SampleMaterial.lc 494:24-494:26
+494:24-494:26
     ()
-SampleMaterial.lc 495:22-495:27
+495:22-495:27
     Bool
-SampleMaterial.lc 496:20-496:21
+496:20-496:21
     _b
-SampleMaterial.lc 497:30-497:35
+497:30-497:35
     Bool
-SampleMaterial.lc 498:23-498:28
+498:23-498:28
     Bool
-SampleMaterial.lc 499:20-499:33
+499:20-499:33
     CullType
-SampleMaterial.lc 500:30-500:32
+500:30-500:32
     forall a . [a]
-SampleMaterial.lc 501:25-501:30
+501:25-501:30
     Bool
-SampleMaterial.lc 502:29-502:34
+502:29-502:34
     Bool
-SampleMaterial.lc 504:13-530:14
+504:13-530:14
     [StageAttrs]
-SampleMaterial.lc 504:15-504:25
+504:15-504:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -6416,70 +6416,70 @@ SampleMaterial.lc 504:15-504:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 504:15-505:36
+504:15-505:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 504:15-506:50
+504:15-506:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 504:15-507:42
+504:15-507:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 504:15-508:36
+504:15-508:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 504:15-509:31
+504:15-509:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 504:15-510:84
+504:15-510:84
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 504:15-511:38
+504:15-511:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 504:15-512:41
+504:15-512:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 504:15-513:40
+504:15-513:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 504:15-514:46
+504:15-514:46
     String -> StageAttrs
-SampleMaterial.lc 504:15-516:18
+504:15-516:18
     StageAttrs
-SampleMaterial.lc 505:29-505:36
+505:29-505:36
     forall a . Maybe a
-SampleMaterial.lc 506:30-506:50
+506:30-506:50
     RGBGen
-SampleMaterial.lc 507:32-507:42
+507:32-507:42
     AlphaGen
-SampleMaterial.lc 508:29-508:36
+508:29-508:36
     TCGen
-SampleMaterial.lc 509:29-509:31
+509:29-509:31
     forall a . [a]
-SampleMaterial.lc 510:31-510:37
+510:31-510:37
     String -> StageTexture
-SampleMaterial.lc 510:31-510:84
+510:31-510:84
     StageTexture
-SampleMaterial.lc 510:38-510:84
+510:38-510:84
     String
-SampleMaterial.lc 511:34-511:38
+511:34-511:38
     Bool
-SampleMaterial.lc 512:33-512:41
+512:33-512:41
     DepthFunction
-SampleMaterial.lc 513:33-513:40
+513:33-513:40
     forall a . Maybe a
-SampleMaterial.lc 514:41-514:46
+514:41-514:46
     Bool
-SampleMaterial.lc 515:38-515:54
+515:38-515:54
     String
-SampleMaterial.lc 517:15-517:25
+517:15-517:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -6487,82 +6487,82 @@ SampleMaterial.lc 517:15-517:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 517:15-518:57
+517:15-518:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 517:15-519:50
+517:15-519:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 517:15-520:42
+517:15-520:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 517:15-521:40
+517:15-521:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 517:15-522:31
+517:15-522:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 517:15-523:42
+517:15-523:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 517:15-524:38
+517:15-524:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 517:15-525:41
+517:15-525:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 517:15-526:40
+517:15-526:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 517:15-527:46
+517:15-527:46
     String -> StageAttrs
-SampleMaterial.lc 517:15-529:18
+517:15-529:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 518:29-518:33
+518:29-518:33
     forall a . a -> Maybe a
-SampleMaterial.lc 518:29-518:57
+518:29-518:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 518:34-518:57
+518:34-518:57
     (Blending', Blending')
-SampleMaterial.lc 518:36-518:46
+518:36-518:46
     Blending'
-SampleMaterial.lc 518:49-518:55
+518:49-518:55
     Blending' | ((Blending'))
-SampleMaterial.lc 519:30-519:50
+519:30-519:50
     RGBGen
-SampleMaterial.lc 520:32-520:42
+520:32-520:42
     AlphaGen
-SampleMaterial.lc 521:29-521:40
+521:29-521:40
     TCGen
-SampleMaterial.lc 522:29-522:31
+522:29-522:31
     forall a . [a]
-SampleMaterial.lc 523:31-523:42
+523:31-523:42
     StageTexture
-SampleMaterial.lc 524:34-524:38
+524:34-524:38
     Bool
-SampleMaterial.lc 525:33-525:41
+525:33-525:41
     DepthFunction
-SampleMaterial.lc 526:33-526:40
+526:33-526:40
     forall a . Maybe a
-SampleMaterial.lc 527:41-527:46
+527:41-527:46
     Bool
-SampleMaterial.lc 528:38-528:54
+528:38-528:54
     String
-SampleMaterial.lc 531:21-531:26
+531:21-531:26
     Bool
-SampleMaterial.lc 534:5-576:6
+534:5-576:6
     (String, CommonAttrs)
-SampleMaterial.lc 534:5-2182:6
+534:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 534:7-534:42
+534:7-534:42
     String
-SampleMaterial.lc 535:7-535:18
+535:7-535:18
     ()
       -> ()
         -> Bool
@@ -6570,68 +6570,68 @@ SampleMaterial.lc 535:7-535:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 535:7-536:26
+535:7-536:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 535:7-537:26
+535:7-537:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 535:7-538:27
+535:7-538:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 535:7-539:21
+535:7-539:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 535:7-540:35
+535:7-540:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 535:7-541:28
+535:7-541:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 535:7-542:33
+535:7-542:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 535:7-543:32
+535:7-543:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 535:7-544:30
+535:7-544:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 535:7-545:34
+535:7-545:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 535:7-573:14
+535:7-573:14
     Bool -> CommonAttrs
-SampleMaterial.lc 535:7-575:10
+535:7-575:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 536:24-536:26
+536:24-536:26
     ()
-SampleMaterial.lc 537:24-537:26
+537:24-537:26
     ()
-SampleMaterial.lc 538:22-538:27
+538:22-538:27
     Bool
-SampleMaterial.lc 539:20-539:21
+539:20-539:21
     _b
-SampleMaterial.lc 540:30-540:35
+540:30-540:35
     Bool
-SampleMaterial.lc 541:23-541:28
+541:23-541:28
     Bool
-SampleMaterial.lc 542:20-542:33
+542:20-542:33
     CullType
-SampleMaterial.lc 543:30-543:32
+543:30-543:32
     forall a . [a]
-SampleMaterial.lc 544:25-544:30
+544:25-544:30
     Bool
-SampleMaterial.lc 545:29-545:34
+545:29-545:34
     Bool
-SampleMaterial.lc 547:13-573:14
+547:13-573:14
     [StageAttrs]
-SampleMaterial.lc 547:15-547:25
+547:15-547:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -6639,70 +6639,70 @@ SampleMaterial.lc 547:15-547:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 547:15-548:36
+547:15-548:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 547:15-549:50
+547:15-549:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 547:15-550:42
+547:15-550:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 547:15-551:36
+547:15-551:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 547:15-552:31
+547:15-552:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 547:15-553:73
+547:15-553:73
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 547:15-554:38
+547:15-554:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 547:15-555:41
+547:15-555:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 547:15-556:40
+547:15-556:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 547:15-557:46
+547:15-557:46
     String -> StageAttrs
-SampleMaterial.lc 547:15-559:18
+547:15-559:18
     StageAttrs
-SampleMaterial.lc 548:29-548:36
+548:29-548:36
     forall a . Maybe a
-SampleMaterial.lc 549:30-549:50
+549:30-549:50
     RGBGen
-SampleMaterial.lc 550:32-550:42
+550:32-550:42
     AlphaGen
-SampleMaterial.lc 551:29-551:36
+551:29-551:36
     TCGen
-SampleMaterial.lc 552:29-552:31
+552:29-552:31
     forall a . [a]
-SampleMaterial.lc 553:31-553:37
+553:31-553:37
     String -> StageTexture
-SampleMaterial.lc 553:31-553:73
+553:31-553:73
     StageTexture
-SampleMaterial.lc 553:38-553:73
+553:38-553:73
     String
-SampleMaterial.lc 554:34-554:38
+554:34-554:38
     Bool
-SampleMaterial.lc 555:33-555:41
+555:33-555:41
     DepthFunction
-SampleMaterial.lc 556:33-556:40
+556:33-556:40
     forall a . Maybe a
-SampleMaterial.lc 557:41-557:46
+557:41-557:46
     Bool
-SampleMaterial.lc 558:38-558:54
+558:38-558:54
     String
-SampleMaterial.lc 560:15-560:25
+560:15-560:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -6710,82 +6710,82 @@ SampleMaterial.lc 560:15-560:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 560:15-561:57
+560:15-561:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 560:15-562:50
+560:15-562:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 560:15-563:42
+560:15-563:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 560:15-564:40
+560:15-564:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 560:15-565:31
+560:15-565:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 560:15-566:42
+560:15-566:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 560:15-567:38
+560:15-567:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 560:15-568:41
+560:15-568:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 560:15-569:40
+560:15-569:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 560:15-570:46
+560:15-570:46
     String -> StageAttrs
-SampleMaterial.lc 560:15-572:18
+560:15-572:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 561:29-561:33
+561:29-561:33
     forall a . a -> Maybe a
-SampleMaterial.lc 561:29-561:57
+561:29-561:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 561:34-561:57
+561:34-561:57
     (Blending', Blending')
-SampleMaterial.lc 561:36-561:46
+561:36-561:46
     Blending'
-SampleMaterial.lc 561:49-561:55
+561:49-561:55
     Blending' | ((Blending'))
-SampleMaterial.lc 562:30-562:50
+562:30-562:50
     RGBGen
-SampleMaterial.lc 563:32-563:42
+563:32-563:42
     AlphaGen
-SampleMaterial.lc 564:29-564:40
+564:29-564:40
     TCGen
-SampleMaterial.lc 565:29-565:31
+565:29-565:31
     forall a . [a]
-SampleMaterial.lc 566:31-566:42
+566:31-566:42
     StageTexture
-SampleMaterial.lc 567:34-567:38
+567:34-567:38
     Bool
-SampleMaterial.lc 568:33-568:41
+568:33-568:41
     DepthFunction
-SampleMaterial.lc 569:33-569:40
+569:33-569:40
     forall a . Maybe a
-SampleMaterial.lc 570:41-570:46
+570:41-570:46
     Bool
-SampleMaterial.lc 571:38-571:54
+571:38-571:54
     String
-SampleMaterial.lc 574:21-574:26
+574:21-574:26
     Bool
-SampleMaterial.lc 577:5-619:6
+577:5-619:6
     (String, CommonAttrs)
-SampleMaterial.lc 577:5-2182:6
+577:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 577:7-577:42
+577:7-577:42
     String
-SampleMaterial.lc 578:7-578:18
+578:7-578:18
     ()
       -> ()
         -> Bool
@@ -6793,68 +6793,68 @@ SampleMaterial.lc 578:7-578:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 578:7-579:26
+578:7-579:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 578:7-580:26
+578:7-580:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 578:7-581:27
+578:7-581:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 578:7-582:21
+578:7-582:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 578:7-583:35
+578:7-583:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 578:7-584:28
+578:7-584:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 578:7-585:33
+578:7-585:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 578:7-586:32
+578:7-586:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 578:7-587:30
+578:7-587:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 578:7-588:34
+578:7-588:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 578:7-616:14
+578:7-616:14
     Bool -> CommonAttrs
-SampleMaterial.lc 578:7-618:10
+578:7-618:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 579:24-579:26
+579:24-579:26
     ()
-SampleMaterial.lc 580:24-580:26
+580:24-580:26
     ()
-SampleMaterial.lc 581:22-581:27
+581:22-581:27
     Bool
-SampleMaterial.lc 582:20-582:21
+582:20-582:21
     _b
-SampleMaterial.lc 583:30-583:35
+583:30-583:35
     Bool
-SampleMaterial.lc 584:23-584:28
+584:23-584:28
     Bool
-SampleMaterial.lc 585:20-585:33
+585:20-585:33
     CullType
-SampleMaterial.lc 586:30-586:32
+586:30-586:32
     forall a . [a]
-SampleMaterial.lc 587:25-587:30
+587:25-587:30
     Bool
-SampleMaterial.lc 588:29-588:34
+588:29-588:34
     Bool
-SampleMaterial.lc 590:13-616:14
+590:13-616:14
     [StageAttrs]
-SampleMaterial.lc 590:15-590:25
+590:15-590:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -6862,70 +6862,70 @@ SampleMaterial.lc 590:15-590:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 590:15-591:36
+590:15-591:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 590:15-592:50
+590:15-592:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 590:15-593:42
+590:15-593:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 590:15-594:36
+590:15-594:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 590:15-595:31
+590:15-595:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 590:15-596:73
+590:15-596:73
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 590:15-597:38
+590:15-597:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 590:15-598:41
+590:15-598:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 590:15-599:40
+590:15-599:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 590:15-600:46
+590:15-600:46
     String -> StageAttrs
-SampleMaterial.lc 590:15-602:18
+590:15-602:18
     StageAttrs
-SampleMaterial.lc 591:29-591:36
+591:29-591:36
     forall a . Maybe a
-SampleMaterial.lc 592:30-592:50
+592:30-592:50
     RGBGen
-SampleMaterial.lc 593:32-593:42
+593:32-593:42
     AlphaGen
-SampleMaterial.lc 594:29-594:36
+594:29-594:36
     TCGen
-SampleMaterial.lc 595:29-595:31
+595:29-595:31
     forall a . [a]
-SampleMaterial.lc 596:31-596:37
+596:31-596:37
     String -> StageTexture
-SampleMaterial.lc 596:31-596:73
+596:31-596:73
     StageTexture
-SampleMaterial.lc 596:38-596:73
+596:38-596:73
     String
-SampleMaterial.lc 597:34-597:38
+597:34-597:38
     Bool
-SampleMaterial.lc 598:33-598:41
+598:33-598:41
     DepthFunction
-SampleMaterial.lc 599:33-599:40
+599:33-599:40
     forall a . Maybe a
-SampleMaterial.lc 600:41-600:46
+600:41-600:46
     Bool
-SampleMaterial.lc 601:38-601:54
+601:38-601:54
     String
-SampleMaterial.lc 603:15-603:25
+603:15-603:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -6933,82 +6933,82 @@ SampleMaterial.lc 603:15-603:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 603:15-604:57
+603:15-604:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 603:15-605:50
+603:15-605:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 603:15-606:42
+603:15-606:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 603:15-607:40
+603:15-607:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 603:15-608:31
+603:15-608:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 603:15-609:42
+603:15-609:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 603:15-610:38
+603:15-610:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 603:15-611:41
+603:15-611:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 603:15-612:40
+603:15-612:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 603:15-613:46
+603:15-613:46
     String -> StageAttrs
-SampleMaterial.lc 603:15-615:18
+603:15-615:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 604:29-604:33
+604:29-604:33
     forall a . a -> Maybe a
-SampleMaterial.lc 604:29-604:57
+604:29-604:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 604:34-604:57
+604:34-604:57
     (Blending', Blending')
-SampleMaterial.lc 604:36-604:46
+604:36-604:46
     Blending'
-SampleMaterial.lc 604:49-604:55
+604:49-604:55
     Blending' | ((Blending'))
-SampleMaterial.lc 605:30-605:50
+605:30-605:50
     RGBGen
-SampleMaterial.lc 606:32-606:42
+606:32-606:42
     AlphaGen
-SampleMaterial.lc 607:29-607:40
+607:29-607:40
     TCGen
-SampleMaterial.lc 608:29-608:31
+608:29-608:31
     forall a . [a]
-SampleMaterial.lc 609:31-609:42
+609:31-609:42
     StageTexture
-SampleMaterial.lc 610:34-610:38
+610:34-610:38
     Bool
-SampleMaterial.lc 611:33-611:41
+611:33-611:41
     DepthFunction
-SampleMaterial.lc 612:33-612:40
+612:33-612:40
     forall a . Maybe a
-SampleMaterial.lc 613:41-613:46
+613:41-613:46
     Bool
-SampleMaterial.lc 614:38-614:54
+614:38-614:54
     String
-SampleMaterial.lc 617:21-617:26
+617:21-617:26
     Bool
-SampleMaterial.lc 620:5-662:6
+620:5-662:6
     (String, CommonAttrs)
-SampleMaterial.lc 620:5-2182:6
+620:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 620:7-620:42
+620:7-620:42
     String
-SampleMaterial.lc 621:7-621:18
+621:7-621:18
     ()
       -> ()
         -> Bool
@@ -7016,68 +7016,68 @@ SampleMaterial.lc 621:7-621:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 621:7-622:26
+621:7-622:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 621:7-623:26
+621:7-623:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 621:7-624:27
+621:7-624:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 621:7-625:21
+621:7-625:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 621:7-626:35
+621:7-626:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 621:7-627:28
+621:7-627:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 621:7-628:33
+621:7-628:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 621:7-629:32
+621:7-629:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 621:7-630:30
+621:7-630:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 621:7-631:34
+621:7-631:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 621:7-659:14
+621:7-659:14
     Bool -> CommonAttrs
-SampleMaterial.lc 621:7-661:10
+621:7-661:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 622:24-622:26
+622:24-622:26
     ()
-SampleMaterial.lc 623:24-623:26
+623:24-623:26
     ()
-SampleMaterial.lc 624:22-624:27
+624:22-624:27
     Bool
-SampleMaterial.lc 625:20-625:21
+625:20-625:21
     _b
-SampleMaterial.lc 626:30-626:35
+626:30-626:35
     Bool
-SampleMaterial.lc 627:23-627:28
+627:23-627:28
     Bool
-SampleMaterial.lc 628:20-628:33
+628:20-628:33
     CullType
-SampleMaterial.lc 629:30-629:32
+629:30-629:32
     forall a . [a]
-SampleMaterial.lc 630:25-630:30
+630:25-630:30
     Bool
-SampleMaterial.lc 631:29-631:34
+631:29-631:34
     Bool
-SampleMaterial.lc 633:13-659:14
+633:13-659:14
     [StageAttrs]
-SampleMaterial.lc 633:15-633:25
+633:15-633:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -7085,70 +7085,70 @@ SampleMaterial.lc 633:15-633:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 633:15-634:36
+633:15-634:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 633:15-635:50
+633:15-635:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 633:15-636:42
+633:15-636:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 633:15-637:36
+633:15-637:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 633:15-638:31
+633:15-638:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 633:15-639:73
+633:15-639:73
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 633:15-640:38
+633:15-640:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 633:15-641:41
+633:15-641:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 633:15-642:40
+633:15-642:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 633:15-643:46
+633:15-643:46
     String -> StageAttrs
-SampleMaterial.lc 633:15-645:18
+633:15-645:18
     StageAttrs
-SampleMaterial.lc 634:29-634:36
+634:29-634:36
     forall a . Maybe a
-SampleMaterial.lc 635:30-635:50
+635:30-635:50
     RGBGen
-SampleMaterial.lc 636:32-636:42
+636:32-636:42
     AlphaGen
-SampleMaterial.lc 637:29-637:36
+637:29-637:36
     TCGen
-SampleMaterial.lc 638:29-638:31
+638:29-638:31
     forall a . [a]
-SampleMaterial.lc 639:31-639:37
+639:31-639:37
     String -> StageTexture
-SampleMaterial.lc 639:31-639:73
+639:31-639:73
     StageTexture
-SampleMaterial.lc 639:38-639:73
+639:38-639:73
     String
-SampleMaterial.lc 640:34-640:38
+640:34-640:38
     Bool
-SampleMaterial.lc 641:33-641:41
+641:33-641:41
     DepthFunction
-SampleMaterial.lc 642:33-642:40
+642:33-642:40
     forall a . Maybe a
-SampleMaterial.lc 643:41-643:46
+643:41-643:46
     Bool
-SampleMaterial.lc 644:38-644:54
+644:38-644:54
     String
-SampleMaterial.lc 646:15-646:25
+646:15-646:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -7156,82 +7156,82 @@ SampleMaterial.lc 646:15-646:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 646:15-647:57
+646:15-647:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 646:15-648:50
+646:15-648:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 646:15-649:42
+646:15-649:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 646:15-650:40
+646:15-650:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 646:15-651:31
+646:15-651:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 646:15-652:42
+646:15-652:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 646:15-653:38
+646:15-653:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 646:15-654:41
+646:15-654:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 646:15-655:40
+646:15-655:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 646:15-656:46
+646:15-656:46
     String -> StageAttrs
-SampleMaterial.lc 646:15-658:18
+646:15-658:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 647:29-647:33
+647:29-647:33
     forall a . a -> Maybe a
-SampleMaterial.lc 647:29-647:57
+647:29-647:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 647:34-647:57
+647:34-647:57
     (Blending', Blending')
-SampleMaterial.lc 647:36-647:46
+647:36-647:46
     Blending'
-SampleMaterial.lc 647:49-647:55
+647:49-647:55
     Blending' | ((Blending'))
-SampleMaterial.lc 648:30-648:50
+648:30-648:50
     RGBGen
-SampleMaterial.lc 649:32-649:42
+649:32-649:42
     AlphaGen
-SampleMaterial.lc 650:29-650:40
+650:29-650:40
     TCGen
-SampleMaterial.lc 651:29-651:31
+651:29-651:31
     forall a . [a]
-SampleMaterial.lc 652:31-652:42
+652:31-652:42
     StageTexture
-SampleMaterial.lc 653:34-653:38
+653:34-653:38
     Bool
-SampleMaterial.lc 654:33-654:41
+654:33-654:41
     DepthFunction
-SampleMaterial.lc 655:33-655:40
+655:33-655:40
     forall a . Maybe a
-SampleMaterial.lc 656:41-656:46
+656:41-656:46
     Bool
-SampleMaterial.lc 657:38-657:54
+657:38-657:54
     String
-SampleMaterial.lc 660:21-660:26
+660:21-660:26
     Bool
-SampleMaterial.lc 663:5-705:6
+663:5-705:6
     (String, CommonAttrs)
-SampleMaterial.lc 663:5-2182:6
+663:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 663:7-663:42
+663:7-663:42
     String
-SampleMaterial.lc 664:7-664:18
+664:7-664:18
     ()
       -> ()
         -> Bool
@@ -7239,68 +7239,68 @@ SampleMaterial.lc 664:7-664:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 664:7-665:26
+664:7-665:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 664:7-666:26
+664:7-666:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 664:7-667:27
+664:7-667:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 664:7-668:21
+664:7-668:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 664:7-669:35
+664:7-669:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 664:7-670:28
+664:7-670:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 664:7-671:33
+664:7-671:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 664:7-672:32
+664:7-672:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 664:7-673:30
+664:7-673:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 664:7-674:34
+664:7-674:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 664:7-702:14
+664:7-702:14
     Bool -> CommonAttrs
-SampleMaterial.lc 664:7-704:10
+664:7-704:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 665:24-665:26
+665:24-665:26
     ()
-SampleMaterial.lc 666:24-666:26
+666:24-666:26
     ()
-SampleMaterial.lc 667:22-667:27
+667:22-667:27
     Bool
-SampleMaterial.lc 668:20-668:21
+668:20-668:21
     _b
-SampleMaterial.lc 669:30-669:35
+669:30-669:35
     Bool
-SampleMaterial.lc 670:23-670:28
+670:23-670:28
     Bool
-SampleMaterial.lc 671:20-671:33
+671:20-671:33
     CullType
-SampleMaterial.lc 672:30-672:32
+672:30-672:32
     forall a . [a]
-SampleMaterial.lc 673:25-673:30
+673:25-673:30
     Bool
-SampleMaterial.lc 674:29-674:34
+674:29-674:34
     Bool
-SampleMaterial.lc 676:13-702:14
+676:13-702:14
     [StageAttrs]
-SampleMaterial.lc 676:15-676:25
+676:15-676:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -7308,70 +7308,70 @@ SampleMaterial.lc 676:15-676:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 676:15-677:36
+676:15-677:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 676:15-678:50
+676:15-678:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 676:15-679:42
+676:15-679:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 676:15-680:36
+676:15-680:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 676:15-681:31
+676:15-681:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 676:15-682:73
+676:15-682:73
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 676:15-683:38
+676:15-683:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 676:15-684:41
+676:15-684:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 676:15-685:40
+676:15-685:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 676:15-686:46
+676:15-686:46
     String -> StageAttrs
-SampleMaterial.lc 676:15-688:18
+676:15-688:18
     StageAttrs
-SampleMaterial.lc 677:29-677:36
+677:29-677:36
     forall a . Maybe a
-SampleMaterial.lc 678:30-678:50
+678:30-678:50
     RGBGen
-SampleMaterial.lc 679:32-679:42
+679:32-679:42
     AlphaGen
-SampleMaterial.lc 680:29-680:36
+680:29-680:36
     TCGen
-SampleMaterial.lc 681:29-681:31
+681:29-681:31
     forall a . [a]
-SampleMaterial.lc 682:31-682:37
+682:31-682:37
     String -> StageTexture
-SampleMaterial.lc 682:31-682:73
+682:31-682:73
     StageTexture
-SampleMaterial.lc 682:38-682:73
+682:38-682:73
     String
-SampleMaterial.lc 683:34-683:38
+683:34-683:38
     Bool
-SampleMaterial.lc 684:33-684:41
+684:33-684:41
     DepthFunction
-SampleMaterial.lc 685:33-685:40
+685:33-685:40
     forall a . Maybe a
-SampleMaterial.lc 686:41-686:46
+686:41-686:46
     Bool
-SampleMaterial.lc 687:38-687:54
+687:38-687:54
     String
-SampleMaterial.lc 689:15-689:25
+689:15-689:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -7379,82 +7379,82 @@ SampleMaterial.lc 689:15-689:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 689:15-690:57
+689:15-690:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 689:15-691:50
+689:15-691:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 689:15-692:42
+689:15-692:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 689:15-693:40
+689:15-693:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 689:15-694:31
+689:15-694:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 689:15-695:42
+689:15-695:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 689:15-696:38
+689:15-696:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 689:15-697:41
+689:15-697:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 689:15-698:40
+689:15-698:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 689:15-699:46
+689:15-699:46
     String -> StageAttrs
-SampleMaterial.lc 689:15-701:18
+689:15-701:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 690:29-690:33
+690:29-690:33
     forall a . a -> Maybe a
-SampleMaterial.lc 690:29-690:57
+690:29-690:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 690:34-690:57
+690:34-690:57
     (Blending', Blending')
-SampleMaterial.lc 690:36-690:46
+690:36-690:46
     Blending'
-SampleMaterial.lc 690:49-690:55
+690:49-690:55
     Blending' | ((Blending'))
-SampleMaterial.lc 691:30-691:50
+691:30-691:50
     RGBGen
-SampleMaterial.lc 692:32-692:42
+692:32-692:42
     AlphaGen
-SampleMaterial.lc 693:29-693:40
+693:29-693:40
     TCGen
-SampleMaterial.lc 694:29-694:31
+694:29-694:31
     forall a . [a]
-SampleMaterial.lc 695:31-695:42
+695:31-695:42
     StageTexture
-SampleMaterial.lc 696:34-696:38
+696:34-696:38
     Bool
-SampleMaterial.lc 697:33-697:41
+697:33-697:41
     DepthFunction
-SampleMaterial.lc 698:33-698:40
+698:33-698:40
     forall a . Maybe a
-SampleMaterial.lc 699:41-699:46
+699:41-699:46
     Bool
-SampleMaterial.lc 700:38-700:54
+700:38-700:54
     String
-SampleMaterial.lc 703:21-703:26
+703:21-703:26
     Bool
-SampleMaterial.lc 706:5-748:6
+706:5-748:6
     (String, CommonAttrs)
-SampleMaterial.lc 706:5-2182:6
+706:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 706:7-706:42
+706:7-706:42
     String
-SampleMaterial.lc 707:7-707:18
+707:7-707:18
     ()
       -> ()
         -> Bool
@@ -7462,68 +7462,68 @@ SampleMaterial.lc 707:7-707:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 707:7-708:26
+707:7-708:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 707:7-709:26
+707:7-709:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 707:7-710:27
+707:7-710:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 707:7-711:21
+707:7-711:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 707:7-712:35
+707:7-712:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 707:7-713:28
+707:7-713:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 707:7-714:33
+707:7-714:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 707:7-715:32
+707:7-715:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 707:7-716:30
+707:7-716:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 707:7-717:34
+707:7-717:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 707:7-745:14
+707:7-745:14
     Bool -> CommonAttrs
-SampleMaterial.lc 707:7-747:10
+707:7-747:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 708:24-708:26
+708:24-708:26
     ()
-SampleMaterial.lc 709:24-709:26
+709:24-709:26
     ()
-SampleMaterial.lc 710:22-710:27
+710:22-710:27
     Bool
-SampleMaterial.lc 711:20-711:21
+711:20-711:21
     _b
-SampleMaterial.lc 712:30-712:35
+712:30-712:35
     Bool
-SampleMaterial.lc 713:23-713:28
+713:23-713:28
     Bool
-SampleMaterial.lc 714:20-714:33
+714:20-714:33
     CullType
-SampleMaterial.lc 715:30-715:32
+715:30-715:32
     forall a . [a]
-SampleMaterial.lc 716:25-716:30
+716:25-716:30
     Bool
-SampleMaterial.lc 717:29-717:34
+717:29-717:34
     Bool
-SampleMaterial.lc 719:13-745:14
+719:13-745:14
     [StageAttrs]
-SampleMaterial.lc 719:15-719:25
+719:15-719:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -7531,70 +7531,70 @@ SampleMaterial.lc 719:15-719:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 719:15-720:36
+719:15-720:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 719:15-721:50
+719:15-721:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 719:15-722:42
+719:15-722:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 719:15-723:36
+719:15-723:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 719:15-724:31
+719:15-724:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 719:15-725:73
+719:15-725:73
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 719:15-726:38
+719:15-726:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 719:15-727:41
+719:15-727:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 719:15-728:40
+719:15-728:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 719:15-729:46
+719:15-729:46
     String -> StageAttrs
-SampleMaterial.lc 719:15-731:18
+719:15-731:18
     StageAttrs
-SampleMaterial.lc 720:29-720:36
+720:29-720:36
     forall a . Maybe a
-SampleMaterial.lc 721:30-721:50
+721:30-721:50
     RGBGen
-SampleMaterial.lc 722:32-722:42
+722:32-722:42
     AlphaGen
-SampleMaterial.lc 723:29-723:36
+723:29-723:36
     TCGen
-SampleMaterial.lc 724:29-724:31
+724:29-724:31
     forall a . [a]
-SampleMaterial.lc 725:31-725:37
+725:31-725:37
     String -> StageTexture
-SampleMaterial.lc 725:31-725:73
+725:31-725:73
     StageTexture
-SampleMaterial.lc 725:38-725:73
+725:38-725:73
     String
-SampleMaterial.lc 726:34-726:38
+726:34-726:38
     Bool
-SampleMaterial.lc 727:33-727:41
+727:33-727:41
     DepthFunction
-SampleMaterial.lc 728:33-728:40
+728:33-728:40
     forall a . Maybe a
-SampleMaterial.lc 729:41-729:46
+729:41-729:46
     Bool
-SampleMaterial.lc 730:38-730:54
+730:38-730:54
     String
-SampleMaterial.lc 732:15-732:25
+732:15-732:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -7602,82 +7602,82 @@ SampleMaterial.lc 732:15-732:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 732:15-733:57
+732:15-733:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 732:15-734:50
+732:15-734:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 732:15-735:42
+732:15-735:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 732:15-736:40
+732:15-736:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 732:15-737:31
+732:15-737:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 732:15-738:42
+732:15-738:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 732:15-739:38
+732:15-739:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 732:15-740:41
+732:15-740:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 732:15-741:40
+732:15-741:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 732:15-742:46
+732:15-742:46
     String -> StageAttrs
-SampleMaterial.lc 732:15-744:18
+732:15-744:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 733:29-733:33
+733:29-733:33
     forall a . a -> Maybe a
-SampleMaterial.lc 733:29-733:57
+733:29-733:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 733:34-733:57
+733:34-733:57
     (Blending', Blending')
-SampleMaterial.lc 733:36-733:46
+733:36-733:46
     Blending'
-SampleMaterial.lc 733:49-733:55
+733:49-733:55
     Blending' | ((Blending'))
-SampleMaterial.lc 734:30-734:50
+734:30-734:50
     RGBGen
-SampleMaterial.lc 735:32-735:42
+735:32-735:42
     AlphaGen
-SampleMaterial.lc 736:29-736:40
+736:29-736:40
     TCGen
-SampleMaterial.lc 737:29-737:31
+737:29-737:31
     forall a . [a]
-SampleMaterial.lc 738:31-738:42
+738:31-738:42
     StageTexture
-SampleMaterial.lc 739:34-739:38
+739:34-739:38
     Bool
-SampleMaterial.lc 740:33-740:41
+740:33-740:41
     DepthFunction
-SampleMaterial.lc 741:33-741:40
+741:33-741:40
     forall a . Maybe a
-SampleMaterial.lc 742:41-742:46
+742:41-742:46
     Bool
-SampleMaterial.lc 743:38-743:54
+743:38-743:54
     String
-SampleMaterial.lc 746:21-746:26
+746:21-746:26
     Bool
-SampleMaterial.lc 749:5-791:6
+749:5-791:6
     (String, CommonAttrs)
-SampleMaterial.lc 749:5-2182:6
+749:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 749:7-749:42
+749:7-749:42
     String
-SampleMaterial.lc 750:7-750:18
+750:7-750:18
     ()
       -> ()
         -> Bool
@@ -7685,68 +7685,68 @@ SampleMaterial.lc 750:7-750:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 750:7-751:26
+750:7-751:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 750:7-752:26
+750:7-752:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 750:7-753:27
+750:7-753:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 750:7-754:21
+750:7-754:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 750:7-755:35
+750:7-755:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 750:7-756:28
+750:7-756:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 750:7-757:33
+750:7-757:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 750:7-758:32
+750:7-758:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 750:7-759:30
+750:7-759:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 750:7-760:34
+750:7-760:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 750:7-788:14
+750:7-788:14
     Bool -> CommonAttrs
-SampleMaterial.lc 750:7-790:10
+750:7-790:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 751:24-751:26
+751:24-751:26
     ()
-SampleMaterial.lc 752:24-752:26
+752:24-752:26
     ()
-SampleMaterial.lc 753:22-753:27
+753:22-753:27
     Bool
-SampleMaterial.lc 754:20-754:21
+754:20-754:21
     _b
-SampleMaterial.lc 755:30-755:35
+755:30-755:35
     Bool
-SampleMaterial.lc 756:23-756:28
+756:23-756:28
     Bool
-SampleMaterial.lc 757:20-757:33
+757:20-757:33
     CullType
-SampleMaterial.lc 758:30-758:32
+758:30-758:32
     forall a . [a]
-SampleMaterial.lc 759:25-759:30
+759:25-759:30
     Bool
-SampleMaterial.lc 760:29-760:34
+760:29-760:34
     Bool
-SampleMaterial.lc 762:13-788:14
+762:13-788:14
     [StageAttrs]
-SampleMaterial.lc 762:15-762:25
+762:15-762:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -7754,70 +7754,70 @@ SampleMaterial.lc 762:15-762:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 762:15-763:36
+762:15-763:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 762:15-764:50
+762:15-764:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 762:15-765:42
+762:15-765:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 762:15-766:36
+762:15-766:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 762:15-767:31
+762:15-767:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 762:15-768:73
+762:15-768:73
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 762:15-769:38
+762:15-769:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 762:15-770:41
+762:15-770:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 762:15-771:40
+762:15-771:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 762:15-772:46
+762:15-772:46
     String -> StageAttrs
-SampleMaterial.lc 762:15-774:18
+762:15-774:18
     StageAttrs
-SampleMaterial.lc 763:29-763:36
+763:29-763:36
     forall a . Maybe a
-SampleMaterial.lc 764:30-764:50
+764:30-764:50
     RGBGen
-SampleMaterial.lc 765:32-765:42
+765:32-765:42
     AlphaGen
-SampleMaterial.lc 766:29-766:36
+766:29-766:36
     TCGen
-SampleMaterial.lc 767:29-767:31
+767:29-767:31
     forall a . [a]
-SampleMaterial.lc 768:31-768:37
+768:31-768:37
     String -> StageTexture
-SampleMaterial.lc 768:31-768:73
+768:31-768:73
     StageTexture
-SampleMaterial.lc 768:38-768:73
+768:38-768:73
     String
-SampleMaterial.lc 769:34-769:38
+769:34-769:38
     Bool
-SampleMaterial.lc 770:33-770:41
+770:33-770:41
     DepthFunction
-SampleMaterial.lc 771:33-771:40
+771:33-771:40
     forall a . Maybe a
-SampleMaterial.lc 772:41-772:46
+772:41-772:46
     Bool
-SampleMaterial.lc 773:38-773:54
+773:38-773:54
     String
-SampleMaterial.lc 775:15-775:25
+775:15-775:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -7825,82 +7825,82 @@ SampleMaterial.lc 775:15-775:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 775:15-776:57
+775:15-776:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 775:15-777:50
+775:15-777:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 775:15-778:42
+775:15-778:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 775:15-779:40
+775:15-779:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 775:15-780:31
+775:15-780:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 775:15-781:42
+775:15-781:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 775:15-782:38
+775:15-782:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 775:15-783:41
+775:15-783:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 775:15-784:40
+775:15-784:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 775:15-785:46
+775:15-785:46
     String -> StageAttrs
-SampleMaterial.lc 775:15-787:18
+775:15-787:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 776:29-776:33
+776:29-776:33
     forall a . a -> Maybe a
-SampleMaterial.lc 776:29-776:57
+776:29-776:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 776:34-776:57
+776:34-776:57
     (Blending', Blending')
-SampleMaterial.lc 776:36-776:46
+776:36-776:46
     Blending'
-SampleMaterial.lc 776:49-776:55
+776:49-776:55
     Blending' | ((Blending'))
-SampleMaterial.lc 777:30-777:50
+777:30-777:50
     RGBGen
-SampleMaterial.lc 778:32-778:42
+778:32-778:42
     AlphaGen
-SampleMaterial.lc 779:29-779:40
+779:29-779:40
     TCGen
-SampleMaterial.lc 780:29-780:31
+780:29-780:31
     forall a . [a]
-SampleMaterial.lc 781:31-781:42
+781:31-781:42
     StageTexture
-SampleMaterial.lc 782:34-782:38
+782:34-782:38
     Bool
-SampleMaterial.lc 783:33-783:41
+783:33-783:41
     DepthFunction
-SampleMaterial.lc 784:33-784:40
+784:33-784:40
     forall a . Maybe a
-SampleMaterial.lc 785:41-785:46
+785:41-785:46
     Bool
-SampleMaterial.lc 786:38-786:54
+786:38-786:54
     String
-SampleMaterial.lc 789:21-789:26
+789:21-789:26
     Bool
-SampleMaterial.lc 792:5-834:6
+792:5-834:6
     (String, CommonAttrs)
-SampleMaterial.lc 792:5-2182:6
+792:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 792:7-792:41
+792:7-792:41
     String
-SampleMaterial.lc 793:7-793:18
+793:7-793:18
     ()
       -> ()
         -> Bool
@@ -7908,68 +7908,68 @@ SampleMaterial.lc 793:7-793:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 793:7-794:26
+793:7-794:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 793:7-795:26
+793:7-795:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 793:7-796:27
+793:7-796:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 793:7-797:21
+793:7-797:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 793:7-798:35
+793:7-798:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 793:7-799:28
+793:7-799:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 793:7-800:33
+793:7-800:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 793:7-801:32
+793:7-801:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 793:7-802:30
+793:7-802:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 793:7-803:34
+793:7-803:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 793:7-831:14
+793:7-831:14
     Bool -> CommonAttrs
-SampleMaterial.lc 793:7-833:10
+793:7-833:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 794:24-794:26
+794:24-794:26
     ()
-SampleMaterial.lc 795:24-795:26
+795:24-795:26
     ()
-SampleMaterial.lc 796:22-796:27
+796:22-796:27
     Bool
-SampleMaterial.lc 797:20-797:21
+797:20-797:21
     _b
-SampleMaterial.lc 798:30-798:35
+798:30-798:35
     Bool
-SampleMaterial.lc 799:23-799:28
+799:23-799:28
     Bool
-SampleMaterial.lc 800:20-800:33
+800:20-800:33
     CullType
-SampleMaterial.lc 801:30-801:32
+801:30-801:32
     forall a . [a]
-SampleMaterial.lc 802:25-802:30
+802:25-802:30
     Bool
-SampleMaterial.lc 803:29-803:34
+803:29-803:34
     Bool
-SampleMaterial.lc 805:13-831:14
+805:13-831:14
     [StageAttrs]
-SampleMaterial.lc 805:15-805:25
+805:15-805:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -7977,70 +7977,70 @@ SampleMaterial.lc 805:15-805:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 805:15-806:36
+805:15-806:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 805:15-807:50
+805:15-807:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 805:15-808:42
+805:15-808:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 805:15-809:36
+805:15-809:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 805:15-810:31
+805:15-810:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 805:15-811:72
+805:15-811:72
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 805:15-812:38
+805:15-812:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 805:15-813:41
+805:15-813:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 805:15-814:40
+805:15-814:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 805:15-815:46
+805:15-815:46
     String -> StageAttrs
-SampleMaterial.lc 805:15-817:18
+805:15-817:18
     StageAttrs
-SampleMaterial.lc 806:29-806:36
+806:29-806:36
     forall a . Maybe a
-SampleMaterial.lc 807:30-807:50
+807:30-807:50
     RGBGen
-SampleMaterial.lc 808:32-808:42
+808:32-808:42
     AlphaGen
-SampleMaterial.lc 809:29-809:36
+809:29-809:36
     TCGen
-SampleMaterial.lc 810:29-810:31
+810:29-810:31
     forall a . [a]
-SampleMaterial.lc 811:31-811:37
+811:31-811:37
     String -> StageTexture
-SampleMaterial.lc 811:31-811:72
+811:31-811:72
     StageTexture
-SampleMaterial.lc 811:38-811:72
+811:38-811:72
     String
-SampleMaterial.lc 812:34-812:38
+812:34-812:38
     Bool
-SampleMaterial.lc 813:33-813:41
+813:33-813:41
     DepthFunction
-SampleMaterial.lc 814:33-814:40
+814:33-814:40
     forall a . Maybe a
-SampleMaterial.lc 815:41-815:46
+815:41-815:46
     Bool
-SampleMaterial.lc 816:38-816:54
+816:38-816:54
     String
-SampleMaterial.lc 818:15-818:25
+818:15-818:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -8048,82 +8048,82 @@ SampleMaterial.lc 818:15-818:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 818:15-819:57
+818:15-819:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 818:15-820:50
+818:15-820:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 818:15-821:42
+818:15-821:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 818:15-822:40
+818:15-822:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 818:15-823:31
+818:15-823:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 818:15-824:42
+818:15-824:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 818:15-825:38
+818:15-825:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 818:15-826:41
+818:15-826:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 818:15-827:40
+818:15-827:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 818:15-828:46
+818:15-828:46
     String -> StageAttrs
-SampleMaterial.lc 818:15-830:18
+818:15-830:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 819:29-819:33
+819:29-819:33
     forall a . a -> Maybe a
-SampleMaterial.lc 819:29-819:57
+819:29-819:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 819:34-819:57
+819:34-819:57
     (Blending', Blending')
-SampleMaterial.lc 819:36-819:46
+819:36-819:46
     Blending'
-SampleMaterial.lc 819:49-819:55
+819:49-819:55
     Blending' | ((Blending'))
-SampleMaterial.lc 820:30-820:50
+820:30-820:50
     RGBGen
-SampleMaterial.lc 821:32-821:42
+821:32-821:42
     AlphaGen
-SampleMaterial.lc 822:29-822:40
+822:29-822:40
     TCGen
-SampleMaterial.lc 823:29-823:31
+823:29-823:31
     forall a . [a]
-SampleMaterial.lc 824:31-824:42
+824:31-824:42
     StageTexture
-SampleMaterial.lc 825:34-825:38
+825:34-825:38
     Bool
-SampleMaterial.lc 826:33-826:41
+826:33-826:41
     DepthFunction
-SampleMaterial.lc 827:33-827:40
+827:33-827:40
     forall a . Maybe a
-SampleMaterial.lc 828:41-828:46
+828:41-828:46
     Bool
-SampleMaterial.lc 829:38-829:54
+829:38-829:54
     String
-SampleMaterial.lc 832:21-832:26
+832:21-832:26
     Bool
-SampleMaterial.lc 835:5-891:6
+835:5-891:6
     (String, CommonAttrs)
-SampleMaterial.lc 835:5-2182:6
+835:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 835:7-835:41
+835:7-835:41
     String
-SampleMaterial.lc 836:7-836:18
+836:7-836:18
     ()
       -> ()
         -> Bool
@@ -8131,68 +8131,68 @@ SampleMaterial.lc 836:7-836:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 836:7-837:26
+836:7-837:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 836:7-838:26
+836:7-838:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 836:7-839:27
+836:7-839:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 836:7-840:21
+836:7-840:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 836:7-841:35
+836:7-841:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 836:7-842:28
+836:7-842:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 836:7-843:33
+836:7-843:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 836:7-844:32
+836:7-844:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 836:7-845:30
+836:7-845:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 836:7-846:34
+836:7-846:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 836:7-888:14
+836:7-888:14
     Bool -> CommonAttrs
-SampleMaterial.lc 836:7-890:10
+836:7-890:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 837:24-837:26
+837:24-837:26
     ()
-SampleMaterial.lc 838:24-838:26
+838:24-838:26
     ()
-SampleMaterial.lc 839:22-839:27
+839:22-839:27
     Bool
-SampleMaterial.lc 840:20-840:21
+840:20-840:21
     _b
-SampleMaterial.lc 841:30-841:35
+841:30-841:35
     Bool
-SampleMaterial.lc 842:23-842:28
+842:23-842:28
     Bool
-SampleMaterial.lc 843:20-843:33
+843:20-843:33
     CullType
-SampleMaterial.lc 844:30-844:32
+844:30-844:32
     forall a . [a]
-SampleMaterial.lc 845:25-845:30
+845:25-845:30
     Bool
-SampleMaterial.lc 846:29-846:34
+846:29-846:34
     Bool
-SampleMaterial.lc 848:13-888:14
+848:13-888:14
     [StageAttrs]
-SampleMaterial.lc 848:15-848:25
+848:15-848:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -8200,110 +8200,110 @@ SampleMaterial.lc 848:15-848:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 848:15-849:36
+848:15-849:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 848:15-850:42
+848:15-850:42
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 848:15-851:42
+848:15-851:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 848:15-852:36
+848:15-852:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 848:15-854:88
+848:15-854:88
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 848:15-855:66
+848:15-855:66
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 848:15-856:38
+848:15-856:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 848:15-857:41
+848:15-857:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 848:15-858:40
+848:15-858:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 848:15-859:46
+848:15-859:46
     String -> StageAttrs
-SampleMaterial.lc 848:15-861:18
+848:15-861:18
     StageAttrs
-SampleMaterial.lc 849:29-849:36
+849:29-849:36
     forall a . Maybe a
-SampleMaterial.lc 850:30-850:42
+850:30-850:42
     RGBGen
-SampleMaterial.lc 851:32-851:42
+851:32-851:42
     AlphaGen
-SampleMaterial.lc 852:29-852:36
+852:29-852:36
     TCGen
-SampleMaterial.lc 854:21-854:88
+854:21-854:88
     [TCMod]
-SampleMaterial.lc 854:23-854:32
+854:23-854:32
     Float -> Float -> TCMod
-SampleMaterial.lc 854:23-854:36
+854:23-854:36
     Float -> TCMod
-SampleMaterial.lc 854:23-854:40
+854:23-854:40
     TCMod
-SampleMaterial.lc 854:33-854:36
+854:33-854:36
     Float
-SampleMaterial.lc 854:37-854:40
+854:37-854:40
     Float
-SampleMaterial.lc 854:43-854:50
+854:43-854:50
     Float -> Float -> Float -> Float -> TCMod
-SampleMaterial.lc 854:43-854:54
+854:43-854:54
     Float -> Float -> Float -> TCMod
-SampleMaterial.lc 854:43-854:59
+854:43-854:59
     Float -> Float -> TCMod
-SampleMaterial.lc 854:43-854:63
+854:43-854:63
     Float -> TCMod
-SampleMaterial.lc 854:43-854:67
+854:43-854:67
     TCMod
-SampleMaterial.lc 854:43-854:86
+854:43-854:86
     [TCMod]
-SampleMaterial.lc 854:51-854:54
+854:51-854:54
     Float
-SampleMaterial.lc 854:55-854:59
+854:55-854:59
     Float
-SampleMaterial.lc 854:60-854:63
+854:60-854:63
     Float
-SampleMaterial.lc 854:64-854:67
+854:64-854:67
     Float
-SampleMaterial.lc 854:70-854:78
+854:70-854:78
     Float -> Float -> TCMod
-SampleMaterial.lc 854:70-854:82
+854:70-854:82
     Float -> TCMod
-SampleMaterial.lc 854:70-854:86
+854:70-854:86
     TCMod | [TCMod]
-SampleMaterial.lc 854:79-854:82
+854:79-854:82
     Float
-SampleMaterial.lc 854:83-854:86
+854:83-854:86
     Float
-SampleMaterial.lc 855:31-855:37
+855:31-855:37
     String -> StageTexture
-SampleMaterial.lc 855:31-855:66
+855:31-855:66
     StageTexture
-SampleMaterial.lc 855:38-855:66
+855:38-855:66
     String
-SampleMaterial.lc 856:34-856:38
+856:34-856:38
     Bool
-SampleMaterial.lc 857:33-857:41
+857:33-857:41
     DepthFunction
-SampleMaterial.lc 858:33-858:40
+858:33-858:40
     forall a . Maybe a
-SampleMaterial.lc 859:41-859:46
+859:41-859:46
     Bool
-SampleMaterial.lc 860:38-860:54
+860:38-860:54
     String
-SampleMaterial.lc 862:15-862:25
+862:15-862:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -8311,80 +8311,80 @@ SampleMaterial.lc 862:15-862:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 862:15-863:69
+862:15-863:69
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 862:15-864:42
+862:15-864:42
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 862:15-865:42
+862:15-865:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 862:15-866:36
+862:15-866:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 862:15-867:31
+862:15-867:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 862:15-868:76
+862:15-868:76
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 862:15-869:39
+862:15-869:39
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 862:15-870:41
+862:15-870:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 862:15-871:40
+862:15-871:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 862:15-872:46
+862:15-872:46
     String -> StageAttrs
-SampleMaterial.lc 862:15-874:18
+862:15-874:18
     StageAttrs
-SampleMaterial.lc 862:15-887:18
+862:15-887:18
     [StageAttrs]
-SampleMaterial.lc 863:29-863:33
+863:29-863:33
     forall a . a -> Maybe a
-SampleMaterial.lc 863:29-863:69
+863:29-863:69
     Maybe (Blending', Blending')
-SampleMaterial.lc 863:34-863:69
+863:34-863:69
     (Blending', Blending')
-SampleMaterial.lc 863:36-863:46
+863:36-863:46
     Blending'
-SampleMaterial.lc 863:49-863:67
+863:49-863:67
     Blending' | ((Blending'))
-SampleMaterial.lc 864:30-864:42
+864:30-864:42
     RGBGen
-SampleMaterial.lc 865:32-865:42
+865:32-865:42
     AlphaGen
-SampleMaterial.lc 866:29-866:36
+866:29-866:36
     TCGen
-SampleMaterial.lc 867:29-867:31
+867:29-867:31
     forall a . [a]
-SampleMaterial.lc 868:31-868:37
+868:31-868:37
     String -> StageTexture
-SampleMaterial.lc 868:31-868:76
+868:31-868:76
     StageTexture
-SampleMaterial.lc 868:38-868:76
+868:38-868:76
     String
-SampleMaterial.lc 869:34-869:39
+869:34-869:39
     Bool
-SampleMaterial.lc 870:33-870:41
+870:33-870:41
     DepthFunction
-SampleMaterial.lc 871:33-871:40
+871:33-871:40
     forall a . Maybe a
-SampleMaterial.lc 872:41-872:46
+872:41-872:46
     Bool
-SampleMaterial.lc 873:38-873:54
+873:38-873:54
     String
-SampleMaterial.lc 875:15-875:25
+875:15-875:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -8392,82 +8392,82 @@ SampleMaterial.lc 875:15-875:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 875:15-876:57
+875:15-876:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 875:15-877:42
+875:15-877:42
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 875:15-878:42
+875:15-878:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 875:15-879:40
+875:15-879:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 875:15-880:31
+875:15-880:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 875:15-881:42
+875:15-881:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 875:15-882:39
+875:15-882:39
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 875:15-883:41
+875:15-883:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 875:15-884:40
+875:15-884:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 875:15-885:46
+875:15-885:46
     String -> StageAttrs
-SampleMaterial.lc 875:15-887:18
+875:15-887:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 876:29-876:33
+876:29-876:33
     forall a . a -> Maybe a
-SampleMaterial.lc 876:29-876:57
+876:29-876:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 876:34-876:57
+876:34-876:57
     (Blending', Blending')
-SampleMaterial.lc 876:36-876:46
+876:36-876:46
     Blending'
-SampleMaterial.lc 876:49-876:55
+876:49-876:55
     Blending' | ((Blending'))
-SampleMaterial.lc 877:30-877:42
+877:30-877:42
     RGBGen
-SampleMaterial.lc 878:32-878:42
+878:32-878:42
     AlphaGen
-SampleMaterial.lc 879:29-879:40
+879:29-879:40
     TCGen
-SampleMaterial.lc 880:29-880:31
+880:29-880:31
     forall a . [a]
-SampleMaterial.lc 881:31-881:42
+881:31-881:42
     StageTexture
-SampleMaterial.lc 882:34-882:39
+882:34-882:39
     Bool
-SampleMaterial.lc 883:33-883:41
+883:33-883:41
     DepthFunction
-SampleMaterial.lc 884:33-884:40
+884:33-884:40
     forall a . Maybe a
-SampleMaterial.lc 885:41-885:46
+885:41-885:46
     Bool
-SampleMaterial.lc 886:38-886:54
+886:38-886:54
     String
-SampleMaterial.lc 889:21-889:26
+889:21-889:26
     Bool
-SampleMaterial.lc 892:5-934:6
+892:5-934:6
     (String, CommonAttrs)
-SampleMaterial.lc 892:5-2182:6
+892:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 892:7-892:41
+892:7-892:41
     String
-SampleMaterial.lc 893:7-893:18
+893:7-893:18
     ()
       -> ()
         -> Bool
@@ -8475,68 +8475,68 @@ SampleMaterial.lc 893:7-893:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 893:7-894:26
+893:7-894:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 893:7-895:26
+893:7-895:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 893:7-896:27
+893:7-896:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 893:7-897:21
+893:7-897:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 893:7-898:35
+893:7-898:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 893:7-899:28
+893:7-899:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 893:7-900:33
+893:7-900:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 893:7-901:32
+893:7-901:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 893:7-902:30
+893:7-902:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 893:7-903:34
+893:7-903:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 893:7-931:14
+893:7-931:14
     Bool -> CommonAttrs
-SampleMaterial.lc 893:7-933:10
+893:7-933:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 894:24-894:26
+894:24-894:26
     ()
-SampleMaterial.lc 895:24-895:26
+895:24-895:26
     ()
-SampleMaterial.lc 896:22-896:27
+896:22-896:27
     Bool
-SampleMaterial.lc 897:20-897:21
+897:20-897:21
     _b
-SampleMaterial.lc 898:30-898:35
+898:30-898:35
     Bool
-SampleMaterial.lc 899:23-899:28
+899:23-899:28
     Bool
-SampleMaterial.lc 900:20-900:33
+900:20-900:33
     CullType
-SampleMaterial.lc 901:30-901:32
+901:30-901:32
     forall a . [a]
-SampleMaterial.lc 902:25-902:30
+902:25-902:30
     Bool
-SampleMaterial.lc 903:29-903:34
+903:29-903:34
     Bool
-SampleMaterial.lc 905:13-931:14
+905:13-931:14
     [StageAttrs]
-SampleMaterial.lc 905:15-905:25
+905:15-905:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -8544,70 +8544,70 @@ SampleMaterial.lc 905:15-905:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 905:15-906:36
+905:15-906:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 905:15-907:50
+905:15-907:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 905:15-908:42
+905:15-908:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 905:15-909:36
+905:15-909:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 905:15-910:31
+905:15-910:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 905:15-911:72
+905:15-911:72
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 905:15-912:38
+905:15-912:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 905:15-913:41
+905:15-913:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 905:15-914:40
+905:15-914:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 905:15-915:46
+905:15-915:46
     String -> StageAttrs
-SampleMaterial.lc 905:15-917:18
+905:15-917:18
     StageAttrs
-SampleMaterial.lc 906:29-906:36
+906:29-906:36
     forall a . Maybe a
-SampleMaterial.lc 907:30-907:50
+907:30-907:50
     RGBGen
-SampleMaterial.lc 908:32-908:42
+908:32-908:42
     AlphaGen
-SampleMaterial.lc 909:29-909:36
+909:29-909:36
     TCGen
-SampleMaterial.lc 910:29-910:31
+910:29-910:31
     forall a . [a]
-SampleMaterial.lc 911:31-911:37
+911:31-911:37
     String -> StageTexture
-SampleMaterial.lc 911:31-911:72
+911:31-911:72
     StageTexture
-SampleMaterial.lc 911:38-911:72
+911:38-911:72
     String
-SampleMaterial.lc 912:34-912:38
+912:34-912:38
     Bool
-SampleMaterial.lc 913:33-913:41
+913:33-913:41
     DepthFunction
-SampleMaterial.lc 914:33-914:40
+914:33-914:40
     forall a . Maybe a
-SampleMaterial.lc 915:41-915:46
+915:41-915:46
     Bool
-SampleMaterial.lc 916:38-916:54
+916:38-916:54
     String
-SampleMaterial.lc 918:15-918:25
+918:15-918:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -8615,82 +8615,82 @@ SampleMaterial.lc 918:15-918:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 918:15-919:57
+918:15-919:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 918:15-920:50
+918:15-920:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 918:15-921:42
+918:15-921:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 918:15-922:40
+918:15-922:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 918:15-923:31
+918:15-923:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 918:15-924:42
+918:15-924:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 918:15-925:38
+918:15-925:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 918:15-926:41
+918:15-926:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 918:15-927:40
+918:15-927:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 918:15-928:46
+918:15-928:46
     String -> StageAttrs
-SampleMaterial.lc 918:15-930:18
+918:15-930:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 919:29-919:33
+919:29-919:33
     forall a . a -> Maybe a
-SampleMaterial.lc 919:29-919:57
+919:29-919:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 919:34-919:57
+919:34-919:57
     (Blending', Blending')
-SampleMaterial.lc 919:36-919:46
+919:36-919:46
     Blending'
-SampleMaterial.lc 919:49-919:55
+919:49-919:55
     Blending' | ((Blending'))
-SampleMaterial.lc 920:30-920:50
+920:30-920:50
     RGBGen
-SampleMaterial.lc 921:32-921:42
+921:32-921:42
     AlphaGen
-SampleMaterial.lc 922:29-922:40
+922:29-922:40
     TCGen
-SampleMaterial.lc 923:29-923:31
+923:29-923:31
     forall a . [a]
-SampleMaterial.lc 924:31-924:42
+924:31-924:42
     StageTexture
-SampleMaterial.lc 925:34-925:38
+925:34-925:38
     Bool
-SampleMaterial.lc 926:33-926:41
+926:33-926:41
     DepthFunction
-SampleMaterial.lc 927:33-927:40
+927:33-927:40
     forall a . Maybe a
-SampleMaterial.lc 928:41-928:46
+928:41-928:46
     Bool
-SampleMaterial.lc 929:38-929:54
+929:38-929:54
     String
-SampleMaterial.lc 932:21-932:26
+932:21-932:26
     Bool
-SampleMaterial.lc 935:5-978:6
+935:5-978:6
     (String, CommonAttrs)
-SampleMaterial.lc 935:5-2182:6
+935:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 935:7-935:54
+935:7-935:54
     String
-SampleMaterial.lc 936:7-936:18
+936:7-936:18
     ()
       -> ()
         -> Bool
@@ -8698,68 +8698,68 @@ SampleMaterial.lc 936:7-936:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 936:7-937:26
+936:7-937:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 936:7-938:26
+936:7-938:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 936:7-939:27
+936:7-939:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 936:7-940:21
+936:7-940:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 936:7-941:35
+936:7-941:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 936:7-942:28
+936:7-942:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 936:7-943:33
+936:7-943:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 936:7-944:32
+936:7-944:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 936:7-945:30
+936:7-945:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 936:7-946:34
+936:7-946:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 936:7-975:14
+936:7-975:14
     Bool -> CommonAttrs
-SampleMaterial.lc 936:7-977:10
+936:7-977:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 937:24-937:26
+937:24-937:26
     ()
-SampleMaterial.lc 938:24-938:26
+938:24-938:26
     ()
-SampleMaterial.lc 939:22-939:27
+939:22-939:27
     Bool
-SampleMaterial.lc 940:20-940:21
+940:20-940:21
     _b
-SampleMaterial.lc 941:30-941:35
+941:30-941:35
     Bool
-SampleMaterial.lc 942:23-942:28
+942:23-942:28
     Bool
-SampleMaterial.lc 943:20-943:33
+943:20-943:33
     CullType
-SampleMaterial.lc 944:30-944:32
+944:30-944:32
     forall a . [a]
-SampleMaterial.lc 945:25-945:30
+945:25-945:30
     Bool
-SampleMaterial.lc 946:29-946:34
+946:29-946:34
     Bool
-SampleMaterial.lc 948:13-975:14
+948:13-975:14
     [StageAttrs]
-SampleMaterial.lc 948:15-948:25
+948:15-948:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -8767,70 +8767,70 @@ SampleMaterial.lc 948:15-948:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 948:15-949:36
+948:15-949:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 948:15-950:50
+948:15-950:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 948:15-951:42
+948:15-951:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 948:15-952:36
+948:15-952:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 948:15-953:31
+948:15-953:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 948:15-955:75
+948:15-955:75
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 948:15-956:38
+948:15-956:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 948:15-957:41
+948:15-957:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 948:15-958:40
+948:15-958:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 948:15-959:46
+948:15-959:46
     String -> StageAttrs
-SampleMaterial.lc 948:15-961:18
+948:15-961:18
     StageAttrs
-SampleMaterial.lc 949:29-949:36
+949:29-949:36
     forall a . Maybe a
-SampleMaterial.lc 950:30-950:50
+950:30-950:50
     RGBGen
-SampleMaterial.lc 951:32-951:42
+951:32-951:42
     AlphaGen
-SampleMaterial.lc 952:29-952:36
+952:29-952:36
     TCGen
-SampleMaterial.lc 953:29-953:31
+953:29-953:31
     forall a . [a]
-SampleMaterial.lc 955:21-955:27
+955:21-955:27
     String -> StageTexture
-SampleMaterial.lc 955:21-955:75
+955:21-955:75
     StageTexture
-SampleMaterial.lc 955:28-955:75
+955:28-955:75
     String
-SampleMaterial.lc 956:34-956:38
+956:34-956:38
     Bool
-SampleMaterial.lc 957:33-957:41
+957:33-957:41
     DepthFunction
-SampleMaterial.lc 958:33-958:40
+958:33-958:40
     forall a . Maybe a
-SampleMaterial.lc 959:41-959:46
+959:41-959:46
     Bool
-SampleMaterial.lc 960:38-960:54
+960:38-960:54
     String
-SampleMaterial.lc 962:15-962:25
+962:15-962:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -8838,82 +8838,82 @@ SampleMaterial.lc 962:15-962:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 962:15-963:57
+962:15-963:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 962:15-964:50
+962:15-964:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 962:15-965:42
+962:15-965:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 962:15-966:40
+962:15-966:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 962:15-967:31
+962:15-967:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 962:15-968:42
+962:15-968:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 962:15-969:38
+962:15-969:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 962:15-970:41
+962:15-970:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 962:15-971:40
+962:15-971:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 962:15-972:46
+962:15-972:46
     String -> StageAttrs
-SampleMaterial.lc 962:15-974:18
+962:15-974:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 963:29-963:33
+963:29-963:33
     forall a . a -> Maybe a
-SampleMaterial.lc 963:29-963:57
+963:29-963:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 963:34-963:57
+963:34-963:57
     (Blending', Blending')
-SampleMaterial.lc 963:36-963:46
+963:36-963:46
     Blending'
-SampleMaterial.lc 963:49-963:55
+963:49-963:55
     Blending' | ((Blending'))
-SampleMaterial.lc 964:30-964:50
+964:30-964:50
     RGBGen
-SampleMaterial.lc 965:32-965:42
+965:32-965:42
     AlphaGen
-SampleMaterial.lc 966:29-966:40
+966:29-966:40
     TCGen
-SampleMaterial.lc 967:29-967:31
+967:29-967:31
     forall a . [a]
-SampleMaterial.lc 968:31-968:42
+968:31-968:42
     StageTexture
-SampleMaterial.lc 969:34-969:38
+969:34-969:38
     Bool
-SampleMaterial.lc 970:33-970:41
+970:33-970:41
     DepthFunction
-SampleMaterial.lc 971:33-971:40
+971:33-971:40
     forall a . Maybe a
-SampleMaterial.lc 972:41-972:46
+972:41-972:46
     Bool
-SampleMaterial.lc 973:38-973:54
+973:38-973:54
     String
-SampleMaterial.lc 976:21-976:26
+976:21-976:26
     Bool
-SampleMaterial.lc 979:5-1021:6
+979:5-1021:6
     (String, CommonAttrs)
-SampleMaterial.lc 979:5-2182:6
+979:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 979:7-979:45
+979:7-979:45
     String
-SampleMaterial.lc 980:7-980:18
+980:7-980:18
     ()
       -> ()
         -> Bool
@@ -8921,68 +8921,68 @@ SampleMaterial.lc 980:7-980:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 980:7-981:26
+980:7-981:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 980:7-982:26
+980:7-982:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 980:7-983:27
+980:7-983:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 980:7-984:21
+980:7-984:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 980:7-985:35
+980:7-985:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 980:7-986:28
+980:7-986:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 980:7-987:33
+980:7-987:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 980:7-988:32
+980:7-988:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 980:7-989:30
+980:7-989:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 980:7-990:34
+980:7-990:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 980:7-1018:14
+980:7-1018:14
     Bool -> CommonAttrs
-SampleMaterial.lc 980:7-1020:10
+980:7-1020:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 981:24-981:26
+981:24-981:26
     ()
-SampleMaterial.lc 982:24-982:26
+982:24-982:26
     ()
-SampleMaterial.lc 983:22-983:27
+983:22-983:27
     Bool
-SampleMaterial.lc 984:20-984:21
+984:20-984:21
     _b
-SampleMaterial.lc 985:30-985:35
+985:30-985:35
     Bool
-SampleMaterial.lc 986:23-986:28
+986:23-986:28
     Bool
-SampleMaterial.lc 987:20-987:33
+987:20-987:33
     CullType
-SampleMaterial.lc 988:30-988:32
+988:30-988:32
     forall a . [a]
-SampleMaterial.lc 989:25-989:30
+989:25-989:30
     Bool
-SampleMaterial.lc 990:29-990:34
+990:29-990:34
     Bool
-SampleMaterial.lc 992:13-1018:14
+992:13-1018:14
     [StageAttrs]
-SampleMaterial.lc 992:15-992:25
+992:15-992:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -8990,70 +8990,70 @@ SampleMaterial.lc 992:15-992:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 992:15-993:36
+992:15-993:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 992:15-994:50
+992:15-994:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 992:15-995:42
+992:15-995:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 992:15-996:36
+992:15-996:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 992:15-997:31
+992:15-997:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 992:15-998:76
+992:15-998:76
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 992:15-999:38
+992:15-999:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 992:15-1000:41
+992:15-1000:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 992:15-1001:40
+992:15-1001:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 992:15-1002:46
+992:15-1002:46
     String -> StageAttrs
-SampleMaterial.lc 992:15-1004:18
+992:15-1004:18
     StageAttrs
-SampleMaterial.lc 993:29-993:36
+993:29-993:36
     forall a . Maybe a
-SampleMaterial.lc 994:30-994:50
+994:30-994:50
     RGBGen
-SampleMaterial.lc 995:32-995:42
+995:32-995:42
     AlphaGen
-SampleMaterial.lc 996:29-996:36
+996:29-996:36
     TCGen
-SampleMaterial.lc 997:29-997:31
+997:29-997:31
     forall a . [a]
-SampleMaterial.lc 998:31-998:37
+998:31-998:37
     String -> StageTexture
-SampleMaterial.lc 998:31-998:76
+998:31-998:76
     StageTexture
-SampleMaterial.lc 998:38-998:76
+998:38-998:76
     String
-SampleMaterial.lc 999:34-999:38
+999:34-999:38
     Bool
-SampleMaterial.lc 1000:33-1000:41
+1000:33-1000:41
     DepthFunction
-SampleMaterial.lc 1001:33-1001:40
+1001:33-1001:40
     forall a . Maybe a
-SampleMaterial.lc 1002:41-1002:46
+1002:41-1002:46
     Bool
-SampleMaterial.lc 1003:38-1003:54
+1003:38-1003:54
     String
-SampleMaterial.lc 1005:15-1005:25
+1005:15-1005:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -9061,82 +9061,82 @@ SampleMaterial.lc 1005:15-1005:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1005:15-1006:57
+1005:15-1006:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1005:15-1007:50
+1005:15-1007:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1005:15-1008:42
+1005:15-1008:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1005:15-1009:40
+1005:15-1009:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1005:15-1010:31
+1005:15-1010:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1005:15-1011:42
+1005:15-1011:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1005:15-1012:38
+1005:15-1012:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1005:15-1013:41
+1005:15-1013:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1005:15-1014:40
+1005:15-1014:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1005:15-1015:46
+1005:15-1015:46
     String -> StageAttrs
-SampleMaterial.lc 1005:15-1017:18
+1005:15-1017:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1006:29-1006:33
+1006:29-1006:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1006:29-1006:57
+1006:29-1006:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1006:34-1006:57
+1006:34-1006:57
     (Blending', Blending')
-SampleMaterial.lc 1006:36-1006:46
+1006:36-1006:46
     Blending'
-SampleMaterial.lc 1006:49-1006:55
+1006:49-1006:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1007:30-1007:50
+1007:30-1007:50
     RGBGen
-SampleMaterial.lc 1008:32-1008:42
+1008:32-1008:42
     AlphaGen
-SampleMaterial.lc 1009:29-1009:40
+1009:29-1009:40
     TCGen
-SampleMaterial.lc 1010:29-1010:31
+1010:29-1010:31
     forall a . [a]
-SampleMaterial.lc 1011:31-1011:42
+1011:31-1011:42
     StageTexture
-SampleMaterial.lc 1012:34-1012:38
+1012:34-1012:38
     Bool
-SampleMaterial.lc 1013:33-1013:41
+1013:33-1013:41
     DepthFunction
-SampleMaterial.lc 1014:33-1014:40
+1014:33-1014:40
     forall a . Maybe a
-SampleMaterial.lc 1015:41-1015:46
+1015:41-1015:46
     Bool
-SampleMaterial.lc 1016:38-1016:54
+1016:38-1016:54
     String
-SampleMaterial.lc 1019:21-1019:26
+1019:21-1019:26
     Bool
-SampleMaterial.lc 1022:5-1064:6
+1022:5-1064:6
     (String, CommonAttrs)
-SampleMaterial.lc 1022:5-2182:6
+1022:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1022:7-1022:44
+1022:7-1022:44
     String
-SampleMaterial.lc 1023:7-1023:18
+1023:7-1023:18
     ()
       -> ()
         -> Bool
@@ -9144,68 +9144,68 @@ SampleMaterial.lc 1023:7-1023:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1023:7-1024:26
+1023:7-1024:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1023:7-1025:26
+1023:7-1025:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1023:7-1026:27
+1023:7-1026:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1023:7-1027:21
+1023:7-1027:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1023:7-1028:35
+1023:7-1028:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1023:7-1029:28
+1023:7-1029:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1023:7-1030:33
+1023:7-1030:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1023:7-1031:32
+1023:7-1031:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1023:7-1032:30
+1023:7-1032:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1023:7-1033:34
+1023:7-1033:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1023:7-1061:14
+1023:7-1061:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1023:7-1063:10
+1023:7-1063:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1024:24-1024:26
+1024:24-1024:26
     ()
-SampleMaterial.lc 1025:24-1025:26
+1025:24-1025:26
     ()
-SampleMaterial.lc 1026:22-1026:27
+1026:22-1026:27
     Bool
-SampleMaterial.lc 1027:20-1027:21
+1027:20-1027:21
     _b
-SampleMaterial.lc 1028:30-1028:35
+1028:30-1028:35
     Bool
-SampleMaterial.lc 1029:23-1029:28
+1029:23-1029:28
     Bool
-SampleMaterial.lc 1030:20-1030:33
+1030:20-1030:33
     CullType
-SampleMaterial.lc 1031:30-1031:32
+1031:30-1031:32
     forall a . [a]
-SampleMaterial.lc 1032:25-1032:30
+1032:25-1032:30
     Bool
-SampleMaterial.lc 1033:29-1033:34
+1033:29-1033:34
     Bool
-SampleMaterial.lc 1035:13-1061:14
+1035:13-1061:14
     [StageAttrs]
-SampleMaterial.lc 1035:15-1035:25
+1035:15-1035:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -9213,70 +9213,70 @@ SampleMaterial.lc 1035:15-1035:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1035:15-1036:36
+1035:15-1036:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1035:15-1037:50
+1035:15-1037:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1035:15-1038:42
+1035:15-1038:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1035:15-1039:36
+1035:15-1039:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1035:15-1040:31
+1035:15-1040:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1035:15-1041:75
+1035:15-1041:75
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1035:15-1042:38
+1035:15-1042:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1035:15-1043:41
+1035:15-1043:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1035:15-1044:40
+1035:15-1044:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1035:15-1045:46
+1035:15-1045:46
     String -> StageAttrs
-SampleMaterial.lc 1035:15-1047:18
+1035:15-1047:18
     StageAttrs
-SampleMaterial.lc 1036:29-1036:36
+1036:29-1036:36
     forall a . Maybe a
-SampleMaterial.lc 1037:30-1037:50
+1037:30-1037:50
     RGBGen
-SampleMaterial.lc 1038:32-1038:42
+1038:32-1038:42
     AlphaGen
-SampleMaterial.lc 1039:29-1039:36
+1039:29-1039:36
     TCGen
-SampleMaterial.lc 1040:29-1040:31
+1040:29-1040:31
     forall a . [a]
-SampleMaterial.lc 1041:31-1041:37
+1041:31-1041:37
     String -> StageTexture
-SampleMaterial.lc 1041:31-1041:75
+1041:31-1041:75
     StageTexture
-SampleMaterial.lc 1041:38-1041:75
+1041:38-1041:75
     String
-SampleMaterial.lc 1042:34-1042:38
+1042:34-1042:38
     Bool
-SampleMaterial.lc 1043:33-1043:41
+1043:33-1043:41
     DepthFunction
-SampleMaterial.lc 1044:33-1044:40
+1044:33-1044:40
     forall a . Maybe a
-SampleMaterial.lc 1045:41-1045:46
+1045:41-1045:46
     Bool
-SampleMaterial.lc 1046:38-1046:54
+1046:38-1046:54
     String
-SampleMaterial.lc 1048:15-1048:25
+1048:15-1048:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -9284,82 +9284,82 @@ SampleMaterial.lc 1048:15-1048:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1048:15-1049:57
+1048:15-1049:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1048:15-1050:50
+1048:15-1050:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1048:15-1051:42
+1048:15-1051:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1048:15-1052:40
+1048:15-1052:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1048:15-1053:31
+1048:15-1053:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1048:15-1054:42
+1048:15-1054:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1048:15-1055:38
+1048:15-1055:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1048:15-1056:41
+1048:15-1056:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1048:15-1057:40
+1048:15-1057:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1048:15-1058:46
+1048:15-1058:46
     String -> StageAttrs
-SampleMaterial.lc 1048:15-1060:18
+1048:15-1060:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1049:29-1049:33
+1049:29-1049:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1049:29-1049:57
+1049:29-1049:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1049:34-1049:57
+1049:34-1049:57
     (Blending', Blending')
-SampleMaterial.lc 1049:36-1049:46
+1049:36-1049:46
     Blending'
-SampleMaterial.lc 1049:49-1049:55
+1049:49-1049:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1050:30-1050:50
+1050:30-1050:50
     RGBGen
-SampleMaterial.lc 1051:32-1051:42
+1051:32-1051:42
     AlphaGen
-SampleMaterial.lc 1052:29-1052:40
+1052:29-1052:40
     TCGen
-SampleMaterial.lc 1053:29-1053:31
+1053:29-1053:31
     forall a . [a]
-SampleMaterial.lc 1054:31-1054:42
+1054:31-1054:42
     StageTexture
-SampleMaterial.lc 1055:34-1055:38
+1055:34-1055:38
     Bool
-SampleMaterial.lc 1056:33-1056:41
+1056:33-1056:41
     DepthFunction
-SampleMaterial.lc 1057:33-1057:40
+1057:33-1057:40
     forall a . Maybe a
-SampleMaterial.lc 1058:41-1058:46
+1058:41-1058:46
     Bool
-SampleMaterial.lc 1059:38-1059:54
+1059:38-1059:54
     String
-SampleMaterial.lc 1062:21-1062:26
+1062:21-1062:26
     Bool
-SampleMaterial.lc 1065:5-1107:6
+1065:5-1107:6
     (String, CommonAttrs)
-SampleMaterial.lc 1065:5-2182:6
+1065:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1065:7-1065:44
+1065:7-1065:44
     String
-SampleMaterial.lc 1066:7-1066:18
+1066:7-1066:18
     ()
       -> ()
         -> Bool
@@ -9367,68 +9367,68 @@ SampleMaterial.lc 1066:7-1066:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1066:7-1067:26
+1066:7-1067:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1066:7-1068:26
+1066:7-1068:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1066:7-1069:27
+1066:7-1069:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1066:7-1070:21
+1066:7-1070:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1066:7-1071:35
+1066:7-1071:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1066:7-1072:28
+1066:7-1072:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1066:7-1073:33
+1066:7-1073:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1066:7-1074:32
+1066:7-1074:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1066:7-1075:30
+1066:7-1075:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1066:7-1076:34
+1066:7-1076:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1066:7-1104:14
+1066:7-1104:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1066:7-1106:10
+1066:7-1106:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1067:24-1067:26
+1067:24-1067:26
     ()
-SampleMaterial.lc 1068:24-1068:26
+1068:24-1068:26
     ()
-SampleMaterial.lc 1069:22-1069:27
+1069:22-1069:27
     Bool
-SampleMaterial.lc 1070:20-1070:21
+1070:20-1070:21
     _b
-SampleMaterial.lc 1071:30-1071:35
+1071:30-1071:35
     Bool
-SampleMaterial.lc 1072:23-1072:28
+1072:23-1072:28
     Bool
-SampleMaterial.lc 1073:20-1073:33
+1073:20-1073:33
     CullType
-SampleMaterial.lc 1074:30-1074:32
+1074:30-1074:32
     forall a . [a]
-SampleMaterial.lc 1075:25-1075:30
+1075:25-1075:30
     Bool
-SampleMaterial.lc 1076:29-1076:34
+1076:29-1076:34
     Bool
-SampleMaterial.lc 1078:13-1104:14
+1078:13-1104:14
     [StageAttrs]
-SampleMaterial.lc 1078:15-1078:25
+1078:15-1078:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -9436,70 +9436,70 @@ SampleMaterial.lc 1078:15-1078:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1078:15-1079:36
+1078:15-1079:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1078:15-1080:50
+1078:15-1080:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1078:15-1081:42
+1078:15-1081:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1078:15-1082:36
+1078:15-1082:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1078:15-1083:31
+1078:15-1083:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1078:15-1084:75
+1078:15-1084:75
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1078:15-1085:38
+1078:15-1085:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1078:15-1086:41
+1078:15-1086:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1078:15-1087:40
+1078:15-1087:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1078:15-1088:46
+1078:15-1088:46
     String -> StageAttrs
-SampleMaterial.lc 1078:15-1090:18
+1078:15-1090:18
     StageAttrs
-SampleMaterial.lc 1079:29-1079:36
+1079:29-1079:36
     forall a . Maybe a
-SampleMaterial.lc 1080:30-1080:50
+1080:30-1080:50
     RGBGen
-SampleMaterial.lc 1081:32-1081:42
+1081:32-1081:42
     AlphaGen
-SampleMaterial.lc 1082:29-1082:36
+1082:29-1082:36
     TCGen
-SampleMaterial.lc 1083:29-1083:31
+1083:29-1083:31
     forall a . [a]
-SampleMaterial.lc 1084:31-1084:37
+1084:31-1084:37
     String -> StageTexture
-SampleMaterial.lc 1084:31-1084:75
+1084:31-1084:75
     StageTexture
-SampleMaterial.lc 1084:38-1084:75
+1084:38-1084:75
     String
-SampleMaterial.lc 1085:34-1085:38
+1085:34-1085:38
     Bool
-SampleMaterial.lc 1086:33-1086:41
+1086:33-1086:41
     DepthFunction
-SampleMaterial.lc 1087:33-1087:40
+1087:33-1087:40
     forall a . Maybe a
-SampleMaterial.lc 1088:41-1088:46
+1088:41-1088:46
     Bool
-SampleMaterial.lc 1089:38-1089:54
+1089:38-1089:54
     String
-SampleMaterial.lc 1091:15-1091:25
+1091:15-1091:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -9507,82 +9507,82 @@ SampleMaterial.lc 1091:15-1091:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1091:15-1092:57
+1091:15-1092:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1091:15-1093:50
+1091:15-1093:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1091:15-1094:42
+1091:15-1094:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1091:15-1095:40
+1091:15-1095:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1091:15-1096:31
+1091:15-1096:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1091:15-1097:42
+1091:15-1097:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1091:15-1098:38
+1091:15-1098:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1091:15-1099:41
+1091:15-1099:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1091:15-1100:40
+1091:15-1100:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1091:15-1101:46
+1091:15-1101:46
     String -> StageAttrs
-SampleMaterial.lc 1091:15-1103:18
+1091:15-1103:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1092:29-1092:33
+1092:29-1092:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1092:29-1092:57
+1092:29-1092:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1092:34-1092:57
+1092:34-1092:57
     (Blending', Blending')
-SampleMaterial.lc 1092:36-1092:46
+1092:36-1092:46
     Blending'
-SampleMaterial.lc 1092:49-1092:55
+1092:49-1092:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1093:30-1093:50
+1093:30-1093:50
     RGBGen
-SampleMaterial.lc 1094:32-1094:42
+1094:32-1094:42
     AlphaGen
-SampleMaterial.lc 1095:29-1095:40
+1095:29-1095:40
     TCGen
-SampleMaterial.lc 1096:29-1096:31
+1096:29-1096:31
     forall a . [a]
-SampleMaterial.lc 1097:31-1097:42
+1097:31-1097:42
     StageTexture
-SampleMaterial.lc 1098:34-1098:38
+1098:34-1098:38
     Bool
-SampleMaterial.lc 1099:33-1099:41
+1099:33-1099:41
     DepthFunction
-SampleMaterial.lc 1100:33-1100:40
+1100:33-1100:40
     forall a . Maybe a
-SampleMaterial.lc 1101:41-1101:46
+1101:41-1101:46
     Bool
-SampleMaterial.lc 1102:38-1102:54
+1102:38-1102:54
     String
-SampleMaterial.lc 1105:21-1105:26
+1105:21-1105:26
     Bool
-SampleMaterial.lc 1108:5-1150:6
+1108:5-1150:6
     (String, CommonAttrs)
-SampleMaterial.lc 1108:5-2182:6
+1108:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1108:7-1108:49
+1108:7-1108:49
     String
-SampleMaterial.lc 1109:7-1109:18
+1109:7-1109:18
     ()
       -> ()
         -> Bool
@@ -9590,68 +9590,68 @@ SampleMaterial.lc 1109:7-1109:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1109:7-1110:26
+1109:7-1110:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1109:7-1111:26
+1109:7-1111:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1109:7-1112:27
+1109:7-1112:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1109:7-1113:21
+1109:7-1113:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1109:7-1114:35
+1109:7-1114:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1109:7-1115:28
+1109:7-1115:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1109:7-1116:33
+1109:7-1116:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1109:7-1117:32
+1109:7-1117:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1109:7-1118:30
+1109:7-1118:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1109:7-1119:34
+1109:7-1119:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1109:7-1147:14
+1109:7-1147:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1109:7-1149:10
+1109:7-1149:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1110:24-1110:26
+1110:24-1110:26
     ()
-SampleMaterial.lc 1111:24-1111:26
+1111:24-1111:26
     ()
-SampleMaterial.lc 1112:22-1112:27
+1112:22-1112:27
     Bool
-SampleMaterial.lc 1113:20-1113:21
+1113:20-1113:21
     _b
-SampleMaterial.lc 1114:30-1114:35
+1114:30-1114:35
     Bool
-SampleMaterial.lc 1115:23-1115:28
+1115:23-1115:28
     Bool
-SampleMaterial.lc 1116:20-1116:33
+1116:20-1116:33
     CullType
-SampleMaterial.lc 1117:30-1117:32
+1117:30-1117:32
     forall a . [a]
-SampleMaterial.lc 1118:25-1118:30
+1118:25-1118:30
     Bool
-SampleMaterial.lc 1119:29-1119:34
+1119:29-1119:34
     Bool
-SampleMaterial.lc 1121:13-1147:14
+1121:13-1147:14
     [StageAttrs]
-SampleMaterial.lc 1121:15-1121:25
+1121:15-1121:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -9659,70 +9659,70 @@ SampleMaterial.lc 1121:15-1121:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1121:15-1122:36
+1121:15-1122:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1121:15-1123:50
+1121:15-1123:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1121:15-1124:42
+1121:15-1124:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1121:15-1125:36
+1121:15-1125:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1121:15-1126:31
+1121:15-1126:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1121:15-1127:80
+1121:15-1127:80
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1121:15-1128:38
+1121:15-1128:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1121:15-1129:41
+1121:15-1129:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1121:15-1130:40
+1121:15-1130:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1121:15-1131:46
+1121:15-1131:46
     String -> StageAttrs
-SampleMaterial.lc 1121:15-1133:18
+1121:15-1133:18
     StageAttrs
-SampleMaterial.lc 1122:29-1122:36
+1122:29-1122:36
     forall a . Maybe a
-SampleMaterial.lc 1123:30-1123:50
+1123:30-1123:50
     RGBGen
-SampleMaterial.lc 1124:32-1124:42
+1124:32-1124:42
     AlphaGen
-SampleMaterial.lc 1125:29-1125:36
+1125:29-1125:36
     TCGen
-SampleMaterial.lc 1126:29-1126:31
+1126:29-1126:31
     forall a . [a]
-SampleMaterial.lc 1127:31-1127:37
+1127:31-1127:37
     String -> StageTexture
-SampleMaterial.lc 1127:31-1127:80
+1127:31-1127:80
     StageTexture
-SampleMaterial.lc 1127:38-1127:80
+1127:38-1127:80
     String
-SampleMaterial.lc 1128:34-1128:38
+1128:34-1128:38
     Bool
-SampleMaterial.lc 1129:33-1129:41
+1129:33-1129:41
     DepthFunction
-SampleMaterial.lc 1130:33-1130:40
+1130:33-1130:40
     forall a . Maybe a
-SampleMaterial.lc 1131:41-1131:46
+1131:41-1131:46
     Bool
-SampleMaterial.lc 1132:38-1132:54
+1132:38-1132:54
     String
-SampleMaterial.lc 1134:15-1134:25
+1134:15-1134:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -9730,82 +9730,82 @@ SampleMaterial.lc 1134:15-1134:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1134:15-1135:57
+1134:15-1135:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1134:15-1136:50
+1134:15-1136:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1134:15-1137:42
+1134:15-1137:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1134:15-1138:40
+1134:15-1138:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1134:15-1139:31
+1134:15-1139:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1134:15-1140:42
+1134:15-1140:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1134:15-1141:38
+1134:15-1141:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1134:15-1142:41
+1134:15-1142:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1134:15-1143:40
+1134:15-1143:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1134:15-1144:46
+1134:15-1144:46
     String -> StageAttrs
-SampleMaterial.lc 1134:15-1146:18
+1134:15-1146:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1135:29-1135:33
+1135:29-1135:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1135:29-1135:57
+1135:29-1135:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1135:34-1135:57
+1135:34-1135:57
     (Blending', Blending')
-SampleMaterial.lc 1135:36-1135:46
+1135:36-1135:46
     Blending'
-SampleMaterial.lc 1135:49-1135:55
+1135:49-1135:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1136:30-1136:50
+1136:30-1136:50
     RGBGen
-SampleMaterial.lc 1137:32-1137:42
+1137:32-1137:42
     AlphaGen
-SampleMaterial.lc 1138:29-1138:40
+1138:29-1138:40
     TCGen
-SampleMaterial.lc 1139:29-1139:31
+1139:29-1139:31
     forall a . [a]
-SampleMaterial.lc 1140:31-1140:42
+1140:31-1140:42
     StageTexture
-SampleMaterial.lc 1141:34-1141:38
+1141:34-1141:38
     Bool
-SampleMaterial.lc 1142:33-1142:41
+1142:33-1142:41
     DepthFunction
-SampleMaterial.lc 1143:33-1143:40
+1143:33-1143:40
     forall a . Maybe a
-SampleMaterial.lc 1144:41-1144:46
+1144:41-1144:46
     Bool
-SampleMaterial.lc 1145:38-1145:54
+1145:38-1145:54
     String
-SampleMaterial.lc 1148:21-1148:26
+1148:21-1148:26
     Bool
-SampleMaterial.lc 1151:5-1193:6
+1151:5-1193:6
     (String, CommonAttrs)
-SampleMaterial.lc 1151:5-2182:6
+1151:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1151:7-1151:41
+1151:7-1151:41
     String
-SampleMaterial.lc 1152:7-1152:18
+1152:7-1152:18
     ()
       -> ()
         -> Bool
@@ -9813,68 +9813,68 @@ SampleMaterial.lc 1152:7-1152:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1152:7-1153:26
+1152:7-1153:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1152:7-1154:26
+1152:7-1154:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1152:7-1155:27
+1152:7-1155:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1152:7-1156:21
+1152:7-1156:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1152:7-1157:35
+1152:7-1157:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1152:7-1158:28
+1152:7-1158:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1152:7-1159:33
+1152:7-1159:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1152:7-1160:32
+1152:7-1160:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1152:7-1161:30
+1152:7-1161:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1152:7-1162:34
+1152:7-1162:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1152:7-1190:14
+1152:7-1190:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1152:7-1192:10
+1152:7-1192:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1153:24-1153:26
+1153:24-1153:26
     ()
-SampleMaterial.lc 1154:24-1154:26
+1154:24-1154:26
     ()
-SampleMaterial.lc 1155:22-1155:27
+1155:22-1155:27
     Bool
-SampleMaterial.lc 1156:20-1156:21
+1156:20-1156:21
     _b
-SampleMaterial.lc 1157:30-1157:35
+1157:30-1157:35
     Bool
-SampleMaterial.lc 1158:23-1158:28
+1158:23-1158:28
     Bool
-SampleMaterial.lc 1159:20-1159:33
+1159:20-1159:33
     CullType
-SampleMaterial.lc 1160:30-1160:32
+1160:30-1160:32
     forall a . [a]
-SampleMaterial.lc 1161:25-1161:30
+1161:25-1161:30
     Bool
-SampleMaterial.lc 1162:29-1162:34
+1162:29-1162:34
     Bool
-SampleMaterial.lc 1164:13-1190:14
+1164:13-1190:14
     [StageAttrs]
-SampleMaterial.lc 1164:15-1164:25
+1164:15-1164:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -9882,70 +9882,70 @@ SampleMaterial.lc 1164:15-1164:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1164:15-1165:36
+1164:15-1165:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1164:15-1166:50
+1164:15-1166:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1164:15-1167:42
+1164:15-1167:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1164:15-1168:36
+1164:15-1168:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1164:15-1169:31
+1164:15-1169:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1164:15-1170:72
+1164:15-1170:72
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1164:15-1171:38
+1164:15-1171:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1164:15-1172:41
+1164:15-1172:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1164:15-1173:40
+1164:15-1173:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1164:15-1174:46
+1164:15-1174:46
     String -> StageAttrs
-SampleMaterial.lc 1164:15-1176:18
+1164:15-1176:18
     StageAttrs
-SampleMaterial.lc 1165:29-1165:36
+1165:29-1165:36
     forall a . Maybe a
-SampleMaterial.lc 1166:30-1166:50
+1166:30-1166:50
     RGBGen
-SampleMaterial.lc 1167:32-1167:42
+1167:32-1167:42
     AlphaGen
-SampleMaterial.lc 1168:29-1168:36
+1168:29-1168:36
     TCGen
-SampleMaterial.lc 1169:29-1169:31
+1169:29-1169:31
     forall a . [a]
-SampleMaterial.lc 1170:31-1170:37
+1170:31-1170:37
     String -> StageTexture
-SampleMaterial.lc 1170:31-1170:72
+1170:31-1170:72
     StageTexture
-SampleMaterial.lc 1170:38-1170:72
+1170:38-1170:72
     String
-SampleMaterial.lc 1171:34-1171:38
+1171:34-1171:38
     Bool
-SampleMaterial.lc 1172:33-1172:41
+1172:33-1172:41
     DepthFunction
-SampleMaterial.lc 1173:33-1173:40
+1173:33-1173:40
     forall a . Maybe a
-SampleMaterial.lc 1174:41-1174:46
+1174:41-1174:46
     Bool
-SampleMaterial.lc 1175:38-1175:54
+1175:38-1175:54
     String
-SampleMaterial.lc 1177:15-1177:25
+1177:15-1177:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -9953,82 +9953,82 @@ SampleMaterial.lc 1177:15-1177:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1177:15-1178:57
+1177:15-1178:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1177:15-1179:50
+1177:15-1179:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1177:15-1180:42
+1177:15-1180:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1177:15-1181:40
+1177:15-1181:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1177:15-1182:31
+1177:15-1182:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1177:15-1183:42
+1177:15-1183:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1177:15-1184:38
+1177:15-1184:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1177:15-1185:41
+1177:15-1185:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1177:15-1186:40
+1177:15-1186:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1177:15-1187:46
+1177:15-1187:46
     String -> StageAttrs
-SampleMaterial.lc 1177:15-1189:18
+1177:15-1189:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1178:29-1178:33
+1178:29-1178:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1178:29-1178:57
+1178:29-1178:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1178:34-1178:57
+1178:34-1178:57
     (Blending', Blending')
-SampleMaterial.lc 1178:36-1178:46
+1178:36-1178:46
     Blending'
-SampleMaterial.lc 1178:49-1178:55
+1178:49-1178:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1179:30-1179:50
+1179:30-1179:50
     RGBGen
-SampleMaterial.lc 1180:32-1180:42
+1180:32-1180:42
     AlphaGen
-SampleMaterial.lc 1181:29-1181:40
+1181:29-1181:40
     TCGen
-SampleMaterial.lc 1182:29-1182:31
+1182:29-1182:31
     forall a . [a]
-SampleMaterial.lc 1183:31-1183:42
+1183:31-1183:42
     StageTexture
-SampleMaterial.lc 1184:34-1184:38
+1184:34-1184:38
     Bool
-SampleMaterial.lc 1185:33-1185:41
+1185:33-1185:41
     DepthFunction
-SampleMaterial.lc 1186:33-1186:40
+1186:33-1186:40
     forall a . Maybe a
-SampleMaterial.lc 1187:41-1187:46
+1187:41-1187:46
     Bool
-SampleMaterial.lc 1188:38-1188:54
+1188:38-1188:54
     String
-SampleMaterial.lc 1191:21-1191:26
+1191:21-1191:26
     Bool
-SampleMaterial.lc 1194:5-1236:6
+1194:5-1236:6
     (String, CommonAttrs)
-SampleMaterial.lc 1194:5-2182:6
+1194:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1194:7-1194:43
+1194:7-1194:43
     String
-SampleMaterial.lc 1195:7-1195:18
+1195:7-1195:18
     ()
       -> ()
         -> Bool
@@ -10036,68 +10036,68 @@ SampleMaterial.lc 1195:7-1195:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1195:7-1196:26
+1195:7-1196:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1195:7-1197:26
+1195:7-1197:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1195:7-1198:27
+1195:7-1198:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1195:7-1199:21
+1195:7-1199:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1195:7-1200:35
+1195:7-1200:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1195:7-1201:28
+1195:7-1201:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1195:7-1202:33
+1195:7-1202:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1195:7-1203:32
+1195:7-1203:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1195:7-1204:30
+1195:7-1204:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1195:7-1205:34
+1195:7-1205:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1195:7-1233:14
+1195:7-1233:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1195:7-1235:10
+1195:7-1235:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1196:24-1196:26
+1196:24-1196:26
     ()
-SampleMaterial.lc 1197:24-1197:26
+1197:24-1197:26
     ()
-SampleMaterial.lc 1198:22-1198:27
+1198:22-1198:27
     Bool
-SampleMaterial.lc 1199:20-1199:21
+1199:20-1199:21
     _b
-SampleMaterial.lc 1200:30-1200:35
+1200:30-1200:35
     Bool
-SampleMaterial.lc 1201:23-1201:28
+1201:23-1201:28
     Bool
-SampleMaterial.lc 1202:20-1202:33
+1202:20-1202:33
     CullType
-SampleMaterial.lc 1203:30-1203:32
+1203:30-1203:32
     forall a . [a]
-SampleMaterial.lc 1204:25-1204:30
+1204:25-1204:30
     Bool
-SampleMaterial.lc 1205:29-1205:34
+1205:29-1205:34
     Bool
-SampleMaterial.lc 1207:13-1233:14
+1207:13-1233:14
     [StageAttrs]
-SampleMaterial.lc 1207:15-1207:25
+1207:15-1207:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -10105,70 +10105,70 @@ SampleMaterial.lc 1207:15-1207:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1207:15-1208:36
+1207:15-1208:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1207:15-1209:50
+1207:15-1209:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1207:15-1210:42
+1207:15-1210:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1207:15-1211:36
+1207:15-1211:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1207:15-1212:31
+1207:15-1212:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1207:15-1213:74
+1207:15-1213:74
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1207:15-1214:38
+1207:15-1214:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1207:15-1215:41
+1207:15-1215:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1207:15-1216:40
+1207:15-1216:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1207:15-1217:46
+1207:15-1217:46
     String -> StageAttrs
-SampleMaterial.lc 1207:15-1219:18
+1207:15-1219:18
     StageAttrs
-SampleMaterial.lc 1208:29-1208:36
+1208:29-1208:36
     forall a . Maybe a
-SampleMaterial.lc 1209:30-1209:50
+1209:30-1209:50
     RGBGen
-SampleMaterial.lc 1210:32-1210:42
+1210:32-1210:42
     AlphaGen
-SampleMaterial.lc 1211:29-1211:36
+1211:29-1211:36
     TCGen
-SampleMaterial.lc 1212:29-1212:31
+1212:29-1212:31
     forall a . [a]
-SampleMaterial.lc 1213:31-1213:37
+1213:31-1213:37
     String -> StageTexture
-SampleMaterial.lc 1213:31-1213:74
+1213:31-1213:74
     StageTexture
-SampleMaterial.lc 1213:38-1213:74
+1213:38-1213:74
     String
-SampleMaterial.lc 1214:34-1214:38
+1214:34-1214:38
     Bool
-SampleMaterial.lc 1215:33-1215:41
+1215:33-1215:41
     DepthFunction
-SampleMaterial.lc 1216:33-1216:40
+1216:33-1216:40
     forall a . Maybe a
-SampleMaterial.lc 1217:41-1217:46
+1217:41-1217:46
     Bool
-SampleMaterial.lc 1218:38-1218:54
+1218:38-1218:54
     String
-SampleMaterial.lc 1220:15-1220:25
+1220:15-1220:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -10176,82 +10176,82 @@ SampleMaterial.lc 1220:15-1220:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1220:15-1221:57
+1220:15-1221:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1220:15-1222:50
+1220:15-1222:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1220:15-1223:42
+1220:15-1223:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1220:15-1224:40
+1220:15-1224:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1220:15-1225:31
+1220:15-1225:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1220:15-1226:42
+1220:15-1226:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1220:15-1227:38
+1220:15-1227:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1220:15-1228:41
+1220:15-1228:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1220:15-1229:40
+1220:15-1229:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1220:15-1230:46
+1220:15-1230:46
     String -> StageAttrs
-SampleMaterial.lc 1220:15-1232:18
+1220:15-1232:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1221:29-1221:33
+1221:29-1221:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1221:29-1221:57
+1221:29-1221:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1221:34-1221:57
+1221:34-1221:57
     (Blending', Blending')
-SampleMaterial.lc 1221:36-1221:46
+1221:36-1221:46
     Blending'
-SampleMaterial.lc 1221:49-1221:55
+1221:49-1221:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1222:30-1222:50
+1222:30-1222:50
     RGBGen
-SampleMaterial.lc 1223:32-1223:42
+1223:32-1223:42
     AlphaGen
-SampleMaterial.lc 1224:29-1224:40
+1224:29-1224:40
     TCGen
-SampleMaterial.lc 1225:29-1225:31
+1225:29-1225:31
     forall a . [a]
-SampleMaterial.lc 1226:31-1226:42
+1226:31-1226:42
     StageTexture
-SampleMaterial.lc 1227:34-1227:38
+1227:34-1227:38
     Bool
-SampleMaterial.lc 1228:33-1228:41
+1228:33-1228:41
     DepthFunction
-SampleMaterial.lc 1229:33-1229:40
+1229:33-1229:40
     forall a . Maybe a
-SampleMaterial.lc 1230:41-1230:46
+1230:41-1230:46
     Bool
-SampleMaterial.lc 1231:38-1231:54
+1231:38-1231:54
     String
-SampleMaterial.lc 1234:21-1234:26
+1234:21-1234:26
     Bool
-SampleMaterial.lc 1237:5-1279:6
+1237:5-1279:6
     (String, CommonAttrs)
-SampleMaterial.lc 1237:5-2182:6
+1237:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1237:7-1237:41
+1237:7-1237:41
     String
-SampleMaterial.lc 1238:7-1238:18
+1238:7-1238:18
     ()
       -> ()
         -> Bool
@@ -10259,68 +10259,68 @@ SampleMaterial.lc 1238:7-1238:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1238:7-1239:26
+1238:7-1239:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1238:7-1240:26
+1238:7-1240:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1238:7-1241:27
+1238:7-1241:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1238:7-1242:21
+1238:7-1242:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1238:7-1243:35
+1238:7-1243:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1238:7-1244:28
+1238:7-1244:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1238:7-1245:33
+1238:7-1245:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1238:7-1246:32
+1238:7-1246:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1238:7-1247:30
+1238:7-1247:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1238:7-1248:34
+1238:7-1248:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1238:7-1276:14
+1238:7-1276:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1238:7-1278:10
+1238:7-1278:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1239:24-1239:26
+1239:24-1239:26
     ()
-SampleMaterial.lc 1240:24-1240:26
+1240:24-1240:26
     ()
-SampleMaterial.lc 1241:22-1241:27
+1241:22-1241:27
     Bool
-SampleMaterial.lc 1242:20-1242:21
+1242:20-1242:21
     _b
-SampleMaterial.lc 1243:30-1243:35
+1243:30-1243:35
     Bool
-SampleMaterial.lc 1244:23-1244:28
+1244:23-1244:28
     Bool
-SampleMaterial.lc 1245:20-1245:33
+1245:20-1245:33
     CullType
-SampleMaterial.lc 1246:30-1246:32
+1246:30-1246:32
     forall a . [a]
-SampleMaterial.lc 1247:25-1247:30
+1247:25-1247:30
     Bool
-SampleMaterial.lc 1248:29-1248:34
+1248:29-1248:34
     Bool
-SampleMaterial.lc 1250:13-1276:14
+1250:13-1276:14
     [StageAttrs]
-SampleMaterial.lc 1250:15-1250:25
+1250:15-1250:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -10328,70 +10328,70 @@ SampleMaterial.lc 1250:15-1250:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1250:15-1251:36
+1250:15-1251:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1250:15-1252:50
+1250:15-1252:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1250:15-1253:42
+1250:15-1253:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1250:15-1254:36
+1250:15-1254:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1250:15-1255:31
+1250:15-1255:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1250:15-1256:72
+1250:15-1256:72
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1250:15-1257:38
+1250:15-1257:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1250:15-1258:41
+1250:15-1258:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1250:15-1259:40
+1250:15-1259:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1250:15-1260:46
+1250:15-1260:46
     String -> StageAttrs
-SampleMaterial.lc 1250:15-1262:18
+1250:15-1262:18
     StageAttrs
-SampleMaterial.lc 1251:29-1251:36
+1251:29-1251:36
     forall a . Maybe a
-SampleMaterial.lc 1252:30-1252:50
+1252:30-1252:50
     RGBGen
-SampleMaterial.lc 1253:32-1253:42
+1253:32-1253:42
     AlphaGen
-SampleMaterial.lc 1254:29-1254:36
+1254:29-1254:36
     TCGen
-SampleMaterial.lc 1255:29-1255:31
+1255:29-1255:31
     forall a . [a]
-SampleMaterial.lc 1256:31-1256:37
+1256:31-1256:37
     String -> StageTexture
-SampleMaterial.lc 1256:31-1256:72
+1256:31-1256:72
     StageTexture
-SampleMaterial.lc 1256:38-1256:72
+1256:38-1256:72
     String
-SampleMaterial.lc 1257:34-1257:38
+1257:34-1257:38
     Bool
-SampleMaterial.lc 1258:33-1258:41
+1258:33-1258:41
     DepthFunction
-SampleMaterial.lc 1259:33-1259:40
+1259:33-1259:40
     forall a . Maybe a
-SampleMaterial.lc 1260:41-1260:46
+1260:41-1260:46
     Bool
-SampleMaterial.lc 1261:38-1261:54
+1261:38-1261:54
     String
-SampleMaterial.lc 1263:15-1263:25
+1263:15-1263:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -10399,82 +10399,82 @@ SampleMaterial.lc 1263:15-1263:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1263:15-1264:57
+1263:15-1264:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1263:15-1265:50
+1263:15-1265:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1263:15-1266:42
+1263:15-1266:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1263:15-1267:40
+1263:15-1267:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1263:15-1268:31
+1263:15-1268:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1263:15-1269:42
+1263:15-1269:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1263:15-1270:38
+1263:15-1270:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1263:15-1271:41
+1263:15-1271:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1263:15-1272:40
+1263:15-1272:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1263:15-1273:46
+1263:15-1273:46
     String -> StageAttrs
-SampleMaterial.lc 1263:15-1275:18
+1263:15-1275:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1264:29-1264:33
+1264:29-1264:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1264:29-1264:57
+1264:29-1264:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1264:34-1264:57
+1264:34-1264:57
     (Blending', Blending')
-SampleMaterial.lc 1264:36-1264:46
+1264:36-1264:46
     Blending'
-SampleMaterial.lc 1264:49-1264:55
+1264:49-1264:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1265:30-1265:50
+1265:30-1265:50
     RGBGen
-SampleMaterial.lc 1266:32-1266:42
+1266:32-1266:42
     AlphaGen
-SampleMaterial.lc 1267:29-1267:40
+1267:29-1267:40
     TCGen
-SampleMaterial.lc 1268:29-1268:31
+1268:29-1268:31
     forall a . [a]
-SampleMaterial.lc 1269:31-1269:42
+1269:31-1269:42
     StageTexture
-SampleMaterial.lc 1270:34-1270:38
+1270:34-1270:38
     Bool
-SampleMaterial.lc 1271:33-1271:41
+1271:33-1271:41
     DepthFunction
-SampleMaterial.lc 1272:33-1272:40
+1272:33-1272:40
     forall a . Maybe a
-SampleMaterial.lc 1273:41-1273:46
+1273:41-1273:46
     Bool
-SampleMaterial.lc 1274:38-1274:54
+1274:38-1274:54
     String
-SampleMaterial.lc 1277:21-1277:26
+1277:21-1277:26
     Bool
-SampleMaterial.lc 1280:5-1322:6
+1280:5-1322:6
     (String, CommonAttrs)
-SampleMaterial.lc 1280:5-2182:6
+1280:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1280:7-1280:44
+1280:7-1280:44
     String
-SampleMaterial.lc 1281:7-1281:18
+1281:7-1281:18
     ()
       -> ()
         -> Bool
@@ -10482,68 +10482,68 @@ SampleMaterial.lc 1281:7-1281:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1281:7-1282:26
+1281:7-1282:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1281:7-1283:26
+1281:7-1283:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1281:7-1284:27
+1281:7-1284:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1281:7-1285:21
+1281:7-1285:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1281:7-1286:35
+1281:7-1286:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1281:7-1287:28
+1281:7-1287:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1281:7-1288:33
+1281:7-1288:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1281:7-1289:32
+1281:7-1289:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1281:7-1290:30
+1281:7-1290:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1281:7-1291:34
+1281:7-1291:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1281:7-1319:14
+1281:7-1319:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1281:7-1321:10
+1281:7-1321:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1282:24-1282:26
+1282:24-1282:26
     ()
-SampleMaterial.lc 1283:24-1283:26
+1283:24-1283:26
     ()
-SampleMaterial.lc 1284:22-1284:27
+1284:22-1284:27
     Bool
-SampleMaterial.lc 1285:20-1285:21
+1285:20-1285:21
     _b
-SampleMaterial.lc 1286:30-1286:35
+1286:30-1286:35
     Bool
-SampleMaterial.lc 1287:23-1287:28
+1287:23-1287:28
     Bool
-SampleMaterial.lc 1288:20-1288:33
+1288:20-1288:33
     CullType
-SampleMaterial.lc 1289:30-1289:32
+1289:30-1289:32
     forall a . [a]
-SampleMaterial.lc 1290:25-1290:30
+1290:25-1290:30
     Bool
-SampleMaterial.lc 1291:29-1291:34
+1291:29-1291:34
     Bool
-SampleMaterial.lc 1293:13-1319:14
+1293:13-1319:14
     [StageAttrs]
-SampleMaterial.lc 1293:15-1293:25
+1293:15-1293:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -10551,70 +10551,70 @@ SampleMaterial.lc 1293:15-1293:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1293:15-1294:36
+1293:15-1294:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1293:15-1295:50
+1293:15-1295:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1293:15-1296:42
+1293:15-1296:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1293:15-1297:36
+1293:15-1297:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1293:15-1298:31
+1293:15-1298:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1293:15-1299:75
+1293:15-1299:75
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1293:15-1300:38
+1293:15-1300:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1293:15-1301:41
+1293:15-1301:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1293:15-1302:40
+1293:15-1302:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1293:15-1303:46
+1293:15-1303:46
     String -> StageAttrs
-SampleMaterial.lc 1293:15-1305:18
+1293:15-1305:18
     StageAttrs
-SampleMaterial.lc 1294:29-1294:36
+1294:29-1294:36
     forall a . Maybe a
-SampleMaterial.lc 1295:30-1295:50
+1295:30-1295:50
     RGBGen
-SampleMaterial.lc 1296:32-1296:42
+1296:32-1296:42
     AlphaGen
-SampleMaterial.lc 1297:29-1297:36
+1297:29-1297:36
     TCGen
-SampleMaterial.lc 1298:29-1298:31
+1298:29-1298:31
     forall a . [a]
-SampleMaterial.lc 1299:31-1299:37
+1299:31-1299:37
     String -> StageTexture
-SampleMaterial.lc 1299:31-1299:75
+1299:31-1299:75
     StageTexture
-SampleMaterial.lc 1299:38-1299:75
+1299:38-1299:75
     String
-SampleMaterial.lc 1300:34-1300:38
+1300:34-1300:38
     Bool
-SampleMaterial.lc 1301:33-1301:41
+1301:33-1301:41
     DepthFunction
-SampleMaterial.lc 1302:33-1302:40
+1302:33-1302:40
     forall a . Maybe a
-SampleMaterial.lc 1303:41-1303:46
+1303:41-1303:46
     Bool
-SampleMaterial.lc 1304:38-1304:54
+1304:38-1304:54
     String
-SampleMaterial.lc 1306:15-1306:25
+1306:15-1306:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -10622,82 +10622,82 @@ SampleMaterial.lc 1306:15-1306:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1306:15-1307:57
+1306:15-1307:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1306:15-1308:50
+1306:15-1308:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1306:15-1309:42
+1306:15-1309:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1306:15-1310:40
+1306:15-1310:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1306:15-1311:31
+1306:15-1311:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1306:15-1312:42
+1306:15-1312:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1306:15-1313:38
+1306:15-1313:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1306:15-1314:41
+1306:15-1314:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1306:15-1315:40
+1306:15-1315:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1306:15-1316:46
+1306:15-1316:46
     String -> StageAttrs
-SampleMaterial.lc 1306:15-1318:18
+1306:15-1318:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1307:29-1307:33
+1307:29-1307:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1307:29-1307:57
+1307:29-1307:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1307:34-1307:57
+1307:34-1307:57
     (Blending', Blending')
-SampleMaterial.lc 1307:36-1307:46
+1307:36-1307:46
     Blending'
-SampleMaterial.lc 1307:49-1307:55
+1307:49-1307:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1308:30-1308:50
+1308:30-1308:50
     RGBGen
-SampleMaterial.lc 1309:32-1309:42
+1309:32-1309:42
     AlphaGen
-SampleMaterial.lc 1310:29-1310:40
+1310:29-1310:40
     TCGen
-SampleMaterial.lc 1311:29-1311:31
+1311:29-1311:31
     forall a . [a]
-SampleMaterial.lc 1312:31-1312:42
+1312:31-1312:42
     StageTexture
-SampleMaterial.lc 1313:34-1313:38
+1313:34-1313:38
     Bool
-SampleMaterial.lc 1314:33-1314:41
+1314:33-1314:41
     DepthFunction
-SampleMaterial.lc 1315:33-1315:40
+1315:33-1315:40
     forall a . Maybe a
-SampleMaterial.lc 1316:41-1316:46
+1316:41-1316:46
     Bool
-SampleMaterial.lc 1317:38-1317:54
+1317:38-1317:54
     String
-SampleMaterial.lc 1320:21-1320:26
+1320:21-1320:26
     Bool
-SampleMaterial.lc 1323:5-1365:6
+1323:5-1365:6
     (String, CommonAttrs)
-SampleMaterial.lc 1323:5-2182:6
+1323:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1323:7-1323:43
+1323:7-1323:43
     String
-SampleMaterial.lc 1324:7-1324:18
+1324:7-1324:18
     ()
       -> ()
         -> Bool
@@ -10705,68 +10705,68 @@ SampleMaterial.lc 1324:7-1324:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1324:7-1325:26
+1324:7-1325:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1324:7-1326:26
+1324:7-1326:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1324:7-1327:27
+1324:7-1327:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1324:7-1328:21
+1324:7-1328:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1324:7-1329:35
+1324:7-1329:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1324:7-1330:28
+1324:7-1330:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1324:7-1331:33
+1324:7-1331:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1324:7-1332:32
+1324:7-1332:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1324:7-1333:30
+1324:7-1333:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1324:7-1334:34
+1324:7-1334:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1324:7-1362:14
+1324:7-1362:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1324:7-1364:10
+1324:7-1364:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1325:24-1325:26
+1325:24-1325:26
     ()
-SampleMaterial.lc 1326:24-1326:26
+1326:24-1326:26
     ()
-SampleMaterial.lc 1327:22-1327:27
+1327:22-1327:27
     Bool
-SampleMaterial.lc 1328:20-1328:21
+1328:20-1328:21
     _b
-SampleMaterial.lc 1329:30-1329:35
+1329:30-1329:35
     Bool
-SampleMaterial.lc 1330:23-1330:28
+1330:23-1330:28
     Bool
-SampleMaterial.lc 1331:20-1331:33
+1331:20-1331:33
     CullType
-SampleMaterial.lc 1332:30-1332:32
+1332:30-1332:32
     forall a . [a]
-SampleMaterial.lc 1333:25-1333:30
+1333:25-1333:30
     Bool
-SampleMaterial.lc 1334:29-1334:34
+1334:29-1334:34
     Bool
-SampleMaterial.lc 1336:13-1362:14
+1336:13-1362:14
     [StageAttrs]
-SampleMaterial.lc 1336:15-1336:25
+1336:15-1336:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -10774,70 +10774,70 @@ SampleMaterial.lc 1336:15-1336:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1336:15-1337:36
+1336:15-1337:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1336:15-1338:50
+1336:15-1338:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1336:15-1339:42
+1336:15-1339:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1336:15-1340:36
+1336:15-1340:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1336:15-1341:31
+1336:15-1341:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1336:15-1342:74
+1336:15-1342:74
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1336:15-1343:38
+1336:15-1343:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1336:15-1344:41
+1336:15-1344:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1336:15-1345:40
+1336:15-1345:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1336:15-1346:46
+1336:15-1346:46
     String -> StageAttrs
-SampleMaterial.lc 1336:15-1348:18
+1336:15-1348:18
     StageAttrs
-SampleMaterial.lc 1337:29-1337:36
+1337:29-1337:36
     forall a . Maybe a
-SampleMaterial.lc 1338:30-1338:50
+1338:30-1338:50
     RGBGen
-SampleMaterial.lc 1339:32-1339:42
+1339:32-1339:42
     AlphaGen
-SampleMaterial.lc 1340:29-1340:36
+1340:29-1340:36
     TCGen
-SampleMaterial.lc 1341:29-1341:31
+1341:29-1341:31
     forall a . [a]
-SampleMaterial.lc 1342:31-1342:37
+1342:31-1342:37
     String -> StageTexture
-SampleMaterial.lc 1342:31-1342:74
+1342:31-1342:74
     StageTexture
-SampleMaterial.lc 1342:38-1342:74
+1342:38-1342:74
     String
-SampleMaterial.lc 1343:34-1343:38
+1343:34-1343:38
     Bool
-SampleMaterial.lc 1344:33-1344:41
+1344:33-1344:41
     DepthFunction
-SampleMaterial.lc 1345:33-1345:40
+1345:33-1345:40
     forall a . Maybe a
-SampleMaterial.lc 1346:41-1346:46
+1346:41-1346:46
     Bool
-SampleMaterial.lc 1347:38-1347:54
+1347:38-1347:54
     String
-SampleMaterial.lc 1349:15-1349:25
+1349:15-1349:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -10845,82 +10845,82 @@ SampleMaterial.lc 1349:15-1349:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1349:15-1350:57
+1349:15-1350:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1349:15-1351:50
+1349:15-1351:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1349:15-1352:42
+1349:15-1352:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1349:15-1353:40
+1349:15-1353:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1349:15-1354:31
+1349:15-1354:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1349:15-1355:42
+1349:15-1355:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1349:15-1356:38
+1349:15-1356:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1349:15-1357:41
+1349:15-1357:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1349:15-1358:40
+1349:15-1358:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1349:15-1359:46
+1349:15-1359:46
     String -> StageAttrs
-SampleMaterial.lc 1349:15-1361:18
+1349:15-1361:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1350:29-1350:33
+1350:29-1350:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1350:29-1350:57
+1350:29-1350:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1350:34-1350:57
+1350:34-1350:57
     (Blending', Blending')
-SampleMaterial.lc 1350:36-1350:46
+1350:36-1350:46
     Blending'
-SampleMaterial.lc 1350:49-1350:55
+1350:49-1350:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1351:30-1351:50
+1351:30-1351:50
     RGBGen
-SampleMaterial.lc 1352:32-1352:42
+1352:32-1352:42
     AlphaGen
-SampleMaterial.lc 1353:29-1353:40
+1353:29-1353:40
     TCGen
-SampleMaterial.lc 1354:29-1354:31
+1354:29-1354:31
     forall a . [a]
-SampleMaterial.lc 1355:31-1355:42
+1355:31-1355:42
     StageTexture
-SampleMaterial.lc 1356:34-1356:38
+1356:34-1356:38
     Bool
-SampleMaterial.lc 1357:33-1357:41
+1357:33-1357:41
     DepthFunction
-SampleMaterial.lc 1358:33-1358:40
+1358:33-1358:40
     forall a . Maybe a
-SampleMaterial.lc 1359:41-1359:46
+1359:41-1359:46
     Bool
-SampleMaterial.lc 1360:38-1360:54
+1360:38-1360:54
     String
-SampleMaterial.lc 1363:21-1363:26
+1363:21-1363:26
     Bool
-SampleMaterial.lc 1366:5-1408:6
+1366:5-1408:6
     (String, CommonAttrs)
-SampleMaterial.lc 1366:5-2182:6
+1366:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1366:7-1366:44
+1366:7-1366:44
     String
-SampleMaterial.lc 1367:7-1367:18
+1367:7-1367:18
     ()
       -> ()
         -> Bool
@@ -10928,68 +10928,68 @@ SampleMaterial.lc 1367:7-1367:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1367:7-1368:26
+1367:7-1368:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1367:7-1369:26
+1367:7-1369:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1367:7-1370:27
+1367:7-1370:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1367:7-1371:21
+1367:7-1371:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1367:7-1372:35
+1367:7-1372:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1367:7-1373:28
+1367:7-1373:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1367:7-1374:33
+1367:7-1374:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1367:7-1375:32
+1367:7-1375:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1367:7-1376:30
+1367:7-1376:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1367:7-1377:34
+1367:7-1377:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1367:7-1405:14
+1367:7-1405:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1367:7-1407:10
+1367:7-1407:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1368:24-1368:26
+1368:24-1368:26
     ()
-SampleMaterial.lc 1369:24-1369:26
+1369:24-1369:26
     ()
-SampleMaterial.lc 1370:22-1370:27
+1370:22-1370:27
     Bool
-SampleMaterial.lc 1371:20-1371:21
+1371:20-1371:21
     _b
-SampleMaterial.lc 1372:30-1372:35
+1372:30-1372:35
     Bool
-SampleMaterial.lc 1373:23-1373:28
+1373:23-1373:28
     Bool
-SampleMaterial.lc 1374:20-1374:33
+1374:20-1374:33
     CullType
-SampleMaterial.lc 1375:30-1375:32
+1375:30-1375:32
     forall a . [a]
-SampleMaterial.lc 1376:25-1376:30
+1376:25-1376:30
     Bool
-SampleMaterial.lc 1377:29-1377:34
+1377:29-1377:34
     Bool
-SampleMaterial.lc 1379:13-1405:14
+1379:13-1405:14
     [StageAttrs]
-SampleMaterial.lc 1379:15-1379:25
+1379:15-1379:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -10997,70 +10997,70 @@ SampleMaterial.lc 1379:15-1379:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1379:15-1380:36
+1379:15-1380:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1379:15-1381:50
+1379:15-1381:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1379:15-1382:42
+1379:15-1382:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1379:15-1383:36
+1379:15-1383:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1379:15-1384:31
+1379:15-1384:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1379:15-1385:75
+1379:15-1385:75
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1379:15-1386:38
+1379:15-1386:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1379:15-1387:41
+1379:15-1387:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1379:15-1388:40
+1379:15-1388:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1379:15-1389:46
+1379:15-1389:46
     String -> StageAttrs
-SampleMaterial.lc 1379:15-1391:18
+1379:15-1391:18
     StageAttrs
-SampleMaterial.lc 1380:29-1380:36
+1380:29-1380:36
     forall a . Maybe a
-SampleMaterial.lc 1381:30-1381:50
+1381:30-1381:50
     RGBGen
-SampleMaterial.lc 1382:32-1382:42
+1382:32-1382:42
     AlphaGen
-SampleMaterial.lc 1383:29-1383:36
+1383:29-1383:36
     TCGen
-SampleMaterial.lc 1384:29-1384:31
+1384:29-1384:31
     forall a . [a]
-SampleMaterial.lc 1385:31-1385:37
+1385:31-1385:37
     String -> StageTexture
-SampleMaterial.lc 1385:31-1385:75
+1385:31-1385:75
     StageTexture
-SampleMaterial.lc 1385:38-1385:75
+1385:38-1385:75
     String
-SampleMaterial.lc 1386:34-1386:38
+1386:34-1386:38
     Bool
-SampleMaterial.lc 1387:33-1387:41
+1387:33-1387:41
     DepthFunction
-SampleMaterial.lc 1388:33-1388:40
+1388:33-1388:40
     forall a . Maybe a
-SampleMaterial.lc 1389:41-1389:46
+1389:41-1389:46
     Bool
-SampleMaterial.lc 1390:38-1390:54
+1390:38-1390:54
     String
-SampleMaterial.lc 1392:15-1392:25
+1392:15-1392:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -11068,82 +11068,82 @@ SampleMaterial.lc 1392:15-1392:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1392:15-1393:57
+1392:15-1393:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1392:15-1394:50
+1392:15-1394:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1392:15-1395:42
+1392:15-1395:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1392:15-1396:40
+1392:15-1396:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1392:15-1397:31
+1392:15-1397:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1392:15-1398:42
+1392:15-1398:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1392:15-1399:38
+1392:15-1399:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1392:15-1400:41
+1392:15-1400:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1392:15-1401:40
+1392:15-1401:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1392:15-1402:46
+1392:15-1402:46
     String -> StageAttrs
-SampleMaterial.lc 1392:15-1404:18
+1392:15-1404:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1393:29-1393:33
+1393:29-1393:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1393:29-1393:57
+1393:29-1393:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1393:34-1393:57
+1393:34-1393:57
     (Blending', Blending')
-SampleMaterial.lc 1393:36-1393:46
+1393:36-1393:46
     Blending'
-SampleMaterial.lc 1393:49-1393:55
+1393:49-1393:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1394:30-1394:50
+1394:30-1394:50
     RGBGen
-SampleMaterial.lc 1395:32-1395:42
+1395:32-1395:42
     AlphaGen
-SampleMaterial.lc 1396:29-1396:40
+1396:29-1396:40
     TCGen
-SampleMaterial.lc 1397:29-1397:31
+1397:29-1397:31
     forall a . [a]
-SampleMaterial.lc 1398:31-1398:42
+1398:31-1398:42
     StageTexture
-SampleMaterial.lc 1399:34-1399:38
+1399:34-1399:38
     Bool
-SampleMaterial.lc 1400:33-1400:41
+1400:33-1400:41
     DepthFunction
-SampleMaterial.lc 1401:33-1401:40
+1401:33-1401:40
     forall a . Maybe a
-SampleMaterial.lc 1402:41-1402:46
+1402:41-1402:46
     Bool
-SampleMaterial.lc 1403:38-1403:54
+1403:38-1403:54
     String
-SampleMaterial.lc 1406:21-1406:26
+1406:21-1406:26
     Bool
-SampleMaterial.lc 1409:5-1451:6
+1409:5-1451:6
     (String, CommonAttrs)
-SampleMaterial.lc 1409:5-2182:6
+1409:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1409:7-1409:44
+1409:7-1409:44
     String
-SampleMaterial.lc 1410:7-1410:18
+1410:7-1410:18
     ()
       -> ()
         -> Bool
@@ -11151,68 +11151,68 @@ SampleMaterial.lc 1410:7-1410:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1410:7-1411:26
+1410:7-1411:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1410:7-1412:26
+1410:7-1412:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1410:7-1413:27
+1410:7-1413:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1410:7-1414:21
+1410:7-1414:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1410:7-1415:35
+1410:7-1415:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1410:7-1416:28
+1410:7-1416:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1410:7-1417:33
+1410:7-1417:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1410:7-1418:32
+1410:7-1418:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1410:7-1419:30
+1410:7-1419:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1410:7-1420:34
+1410:7-1420:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1410:7-1448:14
+1410:7-1448:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1410:7-1450:10
+1410:7-1450:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1411:24-1411:26
+1411:24-1411:26
     ()
-SampleMaterial.lc 1412:24-1412:26
+1412:24-1412:26
     ()
-SampleMaterial.lc 1413:22-1413:27
+1413:22-1413:27
     Bool
-SampleMaterial.lc 1414:20-1414:21
+1414:20-1414:21
     _b
-SampleMaterial.lc 1415:30-1415:35
+1415:30-1415:35
     Bool
-SampleMaterial.lc 1416:23-1416:28
+1416:23-1416:28
     Bool
-SampleMaterial.lc 1417:20-1417:33
+1417:20-1417:33
     CullType
-SampleMaterial.lc 1418:30-1418:32
+1418:30-1418:32
     forall a . [a]
-SampleMaterial.lc 1419:25-1419:30
+1419:25-1419:30
     Bool
-SampleMaterial.lc 1420:29-1420:34
+1420:29-1420:34
     Bool
-SampleMaterial.lc 1422:13-1448:14
+1422:13-1448:14
     [StageAttrs]
-SampleMaterial.lc 1422:15-1422:25
+1422:15-1422:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -11220,70 +11220,70 @@ SampleMaterial.lc 1422:15-1422:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1422:15-1423:36
+1422:15-1423:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1422:15-1424:50
+1422:15-1424:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1422:15-1425:42
+1422:15-1425:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1422:15-1426:36
+1422:15-1426:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1422:15-1427:31
+1422:15-1427:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1422:15-1428:75
+1422:15-1428:75
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1422:15-1429:38
+1422:15-1429:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1422:15-1430:41
+1422:15-1430:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1422:15-1431:40
+1422:15-1431:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1422:15-1432:46
+1422:15-1432:46
     String -> StageAttrs
-SampleMaterial.lc 1422:15-1434:18
+1422:15-1434:18
     StageAttrs
-SampleMaterial.lc 1423:29-1423:36
+1423:29-1423:36
     forall a . Maybe a
-SampleMaterial.lc 1424:30-1424:50
+1424:30-1424:50
     RGBGen
-SampleMaterial.lc 1425:32-1425:42
+1425:32-1425:42
     AlphaGen
-SampleMaterial.lc 1426:29-1426:36
+1426:29-1426:36
     TCGen
-SampleMaterial.lc 1427:29-1427:31
+1427:29-1427:31
     forall a . [a]
-SampleMaterial.lc 1428:31-1428:37
+1428:31-1428:37
     String -> StageTexture
-SampleMaterial.lc 1428:31-1428:75
+1428:31-1428:75
     StageTexture
-SampleMaterial.lc 1428:38-1428:75
+1428:38-1428:75
     String
-SampleMaterial.lc 1429:34-1429:38
+1429:34-1429:38
     Bool
-SampleMaterial.lc 1430:33-1430:41
+1430:33-1430:41
     DepthFunction
-SampleMaterial.lc 1431:33-1431:40
+1431:33-1431:40
     forall a . Maybe a
-SampleMaterial.lc 1432:41-1432:46
+1432:41-1432:46
     Bool
-SampleMaterial.lc 1433:38-1433:54
+1433:38-1433:54
     String
-SampleMaterial.lc 1435:15-1435:25
+1435:15-1435:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -11291,82 +11291,82 @@ SampleMaterial.lc 1435:15-1435:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1435:15-1436:57
+1435:15-1436:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1435:15-1437:50
+1435:15-1437:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1435:15-1438:42
+1435:15-1438:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1435:15-1439:40
+1435:15-1439:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1435:15-1440:31
+1435:15-1440:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1435:15-1441:42
+1435:15-1441:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1435:15-1442:38
+1435:15-1442:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1435:15-1443:41
+1435:15-1443:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1435:15-1444:40
+1435:15-1444:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1435:15-1445:46
+1435:15-1445:46
     String -> StageAttrs
-SampleMaterial.lc 1435:15-1447:18
+1435:15-1447:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1436:29-1436:33
+1436:29-1436:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1436:29-1436:57
+1436:29-1436:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1436:34-1436:57
+1436:34-1436:57
     (Blending', Blending')
-SampleMaterial.lc 1436:36-1436:46
+1436:36-1436:46
     Blending'
-SampleMaterial.lc 1436:49-1436:55
+1436:49-1436:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1437:30-1437:50
+1437:30-1437:50
     RGBGen
-SampleMaterial.lc 1438:32-1438:42
+1438:32-1438:42
     AlphaGen
-SampleMaterial.lc 1439:29-1439:40
+1439:29-1439:40
     TCGen
-SampleMaterial.lc 1440:29-1440:31
+1440:29-1440:31
     forall a . [a]
-SampleMaterial.lc 1441:31-1441:42
+1441:31-1441:42
     StageTexture
-SampleMaterial.lc 1442:34-1442:38
+1442:34-1442:38
     Bool
-SampleMaterial.lc 1443:33-1443:41
+1443:33-1443:41
     DepthFunction
-SampleMaterial.lc 1444:33-1444:40
+1444:33-1444:40
     forall a . Maybe a
-SampleMaterial.lc 1445:41-1445:46
+1445:41-1445:46
     Bool
-SampleMaterial.lc 1446:38-1446:54
+1446:38-1446:54
     String
-SampleMaterial.lc 1449:21-1449:26
+1449:21-1449:26
     Bool
-SampleMaterial.lc 1452:5-1494:6
+1452:5-1494:6
     (String, CommonAttrs)
-SampleMaterial.lc 1452:5-2182:6
+1452:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1452:7-1452:44
+1452:7-1452:44
     String
-SampleMaterial.lc 1453:7-1453:18
+1453:7-1453:18
     ()
       -> ()
         -> Bool
@@ -11374,68 +11374,68 @@ SampleMaterial.lc 1453:7-1453:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1453:7-1454:26
+1453:7-1454:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1453:7-1455:26
+1453:7-1455:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1453:7-1456:27
+1453:7-1456:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1453:7-1457:21
+1453:7-1457:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1453:7-1458:35
+1453:7-1458:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1453:7-1459:28
+1453:7-1459:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1453:7-1460:33
+1453:7-1460:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1453:7-1461:32
+1453:7-1461:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1453:7-1462:30
+1453:7-1462:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1453:7-1463:34
+1453:7-1463:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1453:7-1491:14
+1453:7-1491:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1453:7-1493:10
+1453:7-1493:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1454:24-1454:26
+1454:24-1454:26
     ()
-SampleMaterial.lc 1455:24-1455:26
+1455:24-1455:26
     ()
-SampleMaterial.lc 1456:22-1456:27
+1456:22-1456:27
     Bool
-SampleMaterial.lc 1457:20-1457:21
+1457:20-1457:21
     _b
-SampleMaterial.lc 1458:30-1458:35
+1458:30-1458:35
     Bool
-SampleMaterial.lc 1459:23-1459:28
+1459:23-1459:28
     Bool
-SampleMaterial.lc 1460:20-1460:33
+1460:20-1460:33
     CullType
-SampleMaterial.lc 1461:30-1461:32
+1461:30-1461:32
     forall a . [a]
-SampleMaterial.lc 1462:25-1462:30
+1462:25-1462:30
     Bool
-SampleMaterial.lc 1463:29-1463:34
+1463:29-1463:34
     Bool
-SampleMaterial.lc 1465:13-1491:14
+1465:13-1491:14
     [StageAttrs]
-SampleMaterial.lc 1465:15-1465:25
+1465:15-1465:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -11443,70 +11443,70 @@ SampleMaterial.lc 1465:15-1465:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1465:15-1466:36
+1465:15-1466:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1465:15-1467:50
+1465:15-1467:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1465:15-1468:42
+1465:15-1468:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1465:15-1469:36
+1465:15-1469:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1465:15-1470:31
+1465:15-1470:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1465:15-1471:75
+1465:15-1471:75
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1465:15-1472:38
+1465:15-1472:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1465:15-1473:41
+1465:15-1473:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1465:15-1474:40
+1465:15-1474:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1465:15-1475:46
+1465:15-1475:46
     String -> StageAttrs
-SampleMaterial.lc 1465:15-1477:18
+1465:15-1477:18
     StageAttrs
-SampleMaterial.lc 1466:29-1466:36
+1466:29-1466:36
     forall a . Maybe a
-SampleMaterial.lc 1467:30-1467:50
+1467:30-1467:50
     RGBGen
-SampleMaterial.lc 1468:32-1468:42
+1468:32-1468:42
     AlphaGen
-SampleMaterial.lc 1469:29-1469:36
+1469:29-1469:36
     TCGen
-SampleMaterial.lc 1470:29-1470:31
+1470:29-1470:31
     forall a . [a]
-SampleMaterial.lc 1471:31-1471:37
+1471:31-1471:37
     String -> StageTexture
-SampleMaterial.lc 1471:31-1471:75
+1471:31-1471:75
     StageTexture
-SampleMaterial.lc 1471:38-1471:75
+1471:38-1471:75
     String
-SampleMaterial.lc 1472:34-1472:38
+1472:34-1472:38
     Bool
-SampleMaterial.lc 1473:33-1473:41
+1473:33-1473:41
     DepthFunction
-SampleMaterial.lc 1474:33-1474:40
+1474:33-1474:40
     forall a . Maybe a
-SampleMaterial.lc 1475:41-1475:46
+1475:41-1475:46
     Bool
-SampleMaterial.lc 1476:38-1476:54
+1476:38-1476:54
     String
-SampleMaterial.lc 1478:15-1478:25
+1478:15-1478:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -11514,82 +11514,82 @@ SampleMaterial.lc 1478:15-1478:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1478:15-1479:57
+1478:15-1479:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1478:15-1480:50
+1478:15-1480:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1478:15-1481:42
+1478:15-1481:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1478:15-1482:40
+1478:15-1482:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1478:15-1483:31
+1478:15-1483:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1478:15-1484:42
+1478:15-1484:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1478:15-1485:38
+1478:15-1485:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1478:15-1486:41
+1478:15-1486:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1478:15-1487:40
+1478:15-1487:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1478:15-1488:46
+1478:15-1488:46
     String -> StageAttrs
-SampleMaterial.lc 1478:15-1490:18
+1478:15-1490:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1479:29-1479:33
+1479:29-1479:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1479:29-1479:57
+1479:29-1479:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1479:34-1479:57
+1479:34-1479:57
     (Blending', Blending')
-SampleMaterial.lc 1479:36-1479:46
+1479:36-1479:46
     Blending'
-SampleMaterial.lc 1479:49-1479:55
+1479:49-1479:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1480:30-1480:50
+1480:30-1480:50
     RGBGen
-SampleMaterial.lc 1481:32-1481:42
+1481:32-1481:42
     AlphaGen
-SampleMaterial.lc 1482:29-1482:40
+1482:29-1482:40
     TCGen
-SampleMaterial.lc 1483:29-1483:31
+1483:29-1483:31
     forall a . [a]
-SampleMaterial.lc 1484:31-1484:42
+1484:31-1484:42
     StageTexture
-SampleMaterial.lc 1485:34-1485:38
+1485:34-1485:38
     Bool
-SampleMaterial.lc 1486:33-1486:41
+1486:33-1486:41
     DepthFunction
-SampleMaterial.lc 1487:33-1487:40
+1487:33-1487:40
     forall a . Maybe a
-SampleMaterial.lc 1488:41-1488:46
+1488:41-1488:46
     Bool
-SampleMaterial.lc 1489:38-1489:54
+1489:38-1489:54
     String
-SampleMaterial.lc 1492:21-1492:26
+1492:21-1492:26
     Bool
-SampleMaterial.lc 1495:5-1537:6
+1495:5-1537:6
     (String, CommonAttrs)
-SampleMaterial.lc 1495:5-2182:6
+1495:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1495:7-1495:45
+1495:7-1495:45
     String
-SampleMaterial.lc 1496:7-1496:18
+1496:7-1496:18
     ()
       -> ()
         -> Bool
@@ -11597,68 +11597,68 @@ SampleMaterial.lc 1496:7-1496:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1496:7-1497:26
+1496:7-1497:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1496:7-1498:26
+1496:7-1498:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1496:7-1499:27
+1496:7-1499:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1496:7-1500:21
+1496:7-1500:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1496:7-1501:35
+1496:7-1501:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1496:7-1502:28
+1496:7-1502:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1496:7-1503:33
+1496:7-1503:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1496:7-1504:32
+1496:7-1504:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1496:7-1505:30
+1496:7-1505:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1496:7-1506:34
+1496:7-1506:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1496:7-1534:14
+1496:7-1534:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1496:7-1536:10
+1496:7-1536:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1497:24-1497:26
+1497:24-1497:26
     ()
-SampleMaterial.lc 1498:24-1498:26
+1498:24-1498:26
     ()
-SampleMaterial.lc 1499:22-1499:27
+1499:22-1499:27
     Bool
-SampleMaterial.lc 1500:20-1500:21
+1500:20-1500:21
     _b
-SampleMaterial.lc 1501:30-1501:35
+1501:30-1501:35
     Bool
-SampleMaterial.lc 1502:23-1502:28
+1502:23-1502:28
     Bool
-SampleMaterial.lc 1503:20-1503:33
+1503:20-1503:33
     CullType
-SampleMaterial.lc 1504:30-1504:32
+1504:30-1504:32
     forall a . [a]
-SampleMaterial.lc 1505:25-1505:30
+1505:25-1505:30
     Bool
-SampleMaterial.lc 1506:29-1506:34
+1506:29-1506:34
     Bool
-SampleMaterial.lc 1508:13-1534:14
+1508:13-1534:14
     [StageAttrs]
-SampleMaterial.lc 1508:15-1508:25
+1508:15-1508:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -11666,70 +11666,70 @@ SampleMaterial.lc 1508:15-1508:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1508:15-1509:36
+1508:15-1509:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1508:15-1510:50
+1508:15-1510:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1508:15-1511:42
+1508:15-1511:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1508:15-1512:36
+1508:15-1512:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1508:15-1513:31
+1508:15-1513:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1508:15-1514:76
+1508:15-1514:76
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1508:15-1515:38
+1508:15-1515:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1508:15-1516:41
+1508:15-1516:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1508:15-1517:40
+1508:15-1517:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1508:15-1518:46
+1508:15-1518:46
     String -> StageAttrs
-SampleMaterial.lc 1508:15-1520:18
+1508:15-1520:18
     StageAttrs
-SampleMaterial.lc 1509:29-1509:36
+1509:29-1509:36
     forall a . Maybe a
-SampleMaterial.lc 1510:30-1510:50
+1510:30-1510:50
     RGBGen
-SampleMaterial.lc 1511:32-1511:42
+1511:32-1511:42
     AlphaGen
-SampleMaterial.lc 1512:29-1512:36
+1512:29-1512:36
     TCGen
-SampleMaterial.lc 1513:29-1513:31
+1513:29-1513:31
     forall a . [a]
-SampleMaterial.lc 1514:31-1514:37
+1514:31-1514:37
     String -> StageTexture
-SampleMaterial.lc 1514:31-1514:76
+1514:31-1514:76
     StageTexture
-SampleMaterial.lc 1514:38-1514:76
+1514:38-1514:76
     String
-SampleMaterial.lc 1515:34-1515:38
+1515:34-1515:38
     Bool
-SampleMaterial.lc 1516:33-1516:41
+1516:33-1516:41
     DepthFunction
-SampleMaterial.lc 1517:33-1517:40
+1517:33-1517:40
     forall a . Maybe a
-SampleMaterial.lc 1518:41-1518:46
+1518:41-1518:46
     Bool
-SampleMaterial.lc 1519:38-1519:54
+1519:38-1519:54
     String
-SampleMaterial.lc 1521:15-1521:25
+1521:15-1521:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -11737,82 +11737,82 @@ SampleMaterial.lc 1521:15-1521:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1521:15-1522:57
+1521:15-1522:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1521:15-1523:50
+1521:15-1523:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1521:15-1524:42
+1521:15-1524:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1521:15-1525:40
+1521:15-1525:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1521:15-1526:31
+1521:15-1526:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1521:15-1527:42
+1521:15-1527:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1521:15-1528:38
+1521:15-1528:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1521:15-1529:41
+1521:15-1529:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1521:15-1530:40
+1521:15-1530:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1521:15-1531:46
+1521:15-1531:46
     String -> StageAttrs
-SampleMaterial.lc 1521:15-1533:18
+1521:15-1533:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1522:29-1522:33
+1522:29-1522:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1522:29-1522:57
+1522:29-1522:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1522:34-1522:57
+1522:34-1522:57
     (Blending', Blending')
-SampleMaterial.lc 1522:36-1522:46
+1522:36-1522:46
     Blending'
-SampleMaterial.lc 1522:49-1522:55
+1522:49-1522:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1523:30-1523:50
+1523:30-1523:50
     RGBGen
-SampleMaterial.lc 1524:32-1524:42
+1524:32-1524:42
     AlphaGen
-SampleMaterial.lc 1525:29-1525:40
+1525:29-1525:40
     TCGen
-SampleMaterial.lc 1526:29-1526:31
+1526:29-1526:31
     forall a . [a]
-SampleMaterial.lc 1527:31-1527:42
+1527:31-1527:42
     StageTexture
-SampleMaterial.lc 1528:34-1528:38
+1528:34-1528:38
     Bool
-SampleMaterial.lc 1529:33-1529:41
+1529:33-1529:41
     DepthFunction
-SampleMaterial.lc 1530:33-1530:40
+1530:33-1530:40
     forall a . Maybe a
-SampleMaterial.lc 1531:41-1531:46
+1531:41-1531:46
     Bool
-SampleMaterial.lc 1532:38-1532:54
+1532:38-1532:54
     String
-SampleMaterial.lc 1535:21-1535:26
+1535:21-1535:26
     Bool
-SampleMaterial.lc 1538:5-1580:6
+1538:5-1580:6
     (String, CommonAttrs)
-SampleMaterial.lc 1538:5-2182:6
+1538:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1538:7-1538:47
+1538:7-1538:47
     String
-SampleMaterial.lc 1539:7-1539:18
+1539:7-1539:18
     ()
       -> ()
         -> Bool
@@ -11820,68 +11820,68 @@ SampleMaterial.lc 1539:7-1539:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1539:7-1540:26
+1539:7-1540:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1539:7-1541:26
+1539:7-1541:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1539:7-1542:27
+1539:7-1542:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1539:7-1543:21
+1539:7-1543:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1539:7-1544:35
+1539:7-1544:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1539:7-1545:28
+1539:7-1545:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1539:7-1546:33
+1539:7-1546:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1539:7-1547:32
+1539:7-1547:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1539:7-1548:30
+1539:7-1548:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1539:7-1549:34
+1539:7-1549:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1539:7-1577:14
+1539:7-1577:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1539:7-1579:10
+1539:7-1579:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1540:24-1540:26
+1540:24-1540:26
     ()
-SampleMaterial.lc 1541:24-1541:26
+1541:24-1541:26
     ()
-SampleMaterial.lc 1542:22-1542:27
+1542:22-1542:27
     Bool
-SampleMaterial.lc 1543:20-1543:21
+1543:20-1543:21
     _b
-SampleMaterial.lc 1544:30-1544:35
+1544:30-1544:35
     Bool
-SampleMaterial.lc 1545:23-1545:28
+1545:23-1545:28
     Bool
-SampleMaterial.lc 1546:20-1546:33
+1546:20-1546:33
     CullType
-SampleMaterial.lc 1547:30-1547:32
+1547:30-1547:32
     forall a . [a]
-SampleMaterial.lc 1548:25-1548:30
+1548:25-1548:30
     Bool
-SampleMaterial.lc 1549:29-1549:34
+1549:29-1549:34
     Bool
-SampleMaterial.lc 1551:13-1577:14
+1551:13-1577:14
     [StageAttrs]
-SampleMaterial.lc 1551:15-1551:25
+1551:15-1551:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -11889,70 +11889,70 @@ SampleMaterial.lc 1551:15-1551:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1551:15-1552:36
+1551:15-1552:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1551:15-1553:50
+1551:15-1553:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1551:15-1554:42
+1551:15-1554:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1551:15-1555:36
+1551:15-1555:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1551:15-1556:31
+1551:15-1556:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1551:15-1557:78
+1551:15-1557:78
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1551:15-1558:38
+1551:15-1558:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1551:15-1559:41
+1551:15-1559:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1551:15-1560:40
+1551:15-1560:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1551:15-1561:46
+1551:15-1561:46
     String -> StageAttrs
-SampleMaterial.lc 1551:15-1563:18
+1551:15-1563:18
     StageAttrs
-SampleMaterial.lc 1552:29-1552:36
+1552:29-1552:36
     forall a . Maybe a
-SampleMaterial.lc 1553:30-1553:50
+1553:30-1553:50
     RGBGen
-SampleMaterial.lc 1554:32-1554:42
+1554:32-1554:42
     AlphaGen
-SampleMaterial.lc 1555:29-1555:36
+1555:29-1555:36
     TCGen
-SampleMaterial.lc 1556:29-1556:31
+1556:29-1556:31
     forall a . [a]
-SampleMaterial.lc 1557:31-1557:37
+1557:31-1557:37
     String -> StageTexture
-SampleMaterial.lc 1557:31-1557:78
+1557:31-1557:78
     StageTexture
-SampleMaterial.lc 1557:38-1557:78
+1557:38-1557:78
     String
-SampleMaterial.lc 1558:34-1558:38
+1558:34-1558:38
     Bool
-SampleMaterial.lc 1559:33-1559:41
+1559:33-1559:41
     DepthFunction
-SampleMaterial.lc 1560:33-1560:40
+1560:33-1560:40
     forall a . Maybe a
-SampleMaterial.lc 1561:41-1561:46
+1561:41-1561:46
     Bool
-SampleMaterial.lc 1562:38-1562:54
+1562:38-1562:54
     String
-SampleMaterial.lc 1564:15-1564:25
+1564:15-1564:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -11960,82 +11960,82 @@ SampleMaterial.lc 1564:15-1564:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1564:15-1565:57
+1564:15-1565:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1564:15-1566:50
+1564:15-1566:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1564:15-1567:42
+1564:15-1567:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1564:15-1568:40
+1564:15-1568:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1564:15-1569:31
+1564:15-1569:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1564:15-1570:42
+1564:15-1570:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1564:15-1571:38
+1564:15-1571:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1564:15-1572:41
+1564:15-1572:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1564:15-1573:40
+1564:15-1573:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1564:15-1574:46
+1564:15-1574:46
     String -> StageAttrs
-SampleMaterial.lc 1564:15-1576:18
+1564:15-1576:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1565:29-1565:33
+1565:29-1565:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1565:29-1565:57
+1565:29-1565:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1565:34-1565:57
+1565:34-1565:57
     (Blending', Blending')
-SampleMaterial.lc 1565:36-1565:46
+1565:36-1565:46
     Blending'
-SampleMaterial.lc 1565:49-1565:55
+1565:49-1565:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1566:30-1566:50
+1566:30-1566:50
     RGBGen
-SampleMaterial.lc 1567:32-1567:42
+1567:32-1567:42
     AlphaGen
-SampleMaterial.lc 1568:29-1568:40
+1568:29-1568:40
     TCGen
-SampleMaterial.lc 1569:29-1569:31
+1569:29-1569:31
     forall a . [a]
-SampleMaterial.lc 1570:31-1570:42
+1570:31-1570:42
     StageTexture
-SampleMaterial.lc 1571:34-1571:38
+1571:34-1571:38
     Bool
-SampleMaterial.lc 1572:33-1572:41
+1572:33-1572:41
     DepthFunction
-SampleMaterial.lc 1573:33-1573:40
+1573:33-1573:40
     forall a . Maybe a
-SampleMaterial.lc 1574:41-1574:46
+1574:41-1574:46
     Bool
-SampleMaterial.lc 1575:38-1575:54
+1575:38-1575:54
     String
-SampleMaterial.lc 1578:21-1578:26
+1578:21-1578:26
     Bool
-SampleMaterial.lc 1581:5-1623:6
+1581:5-1623:6
     (String, CommonAttrs)
-SampleMaterial.lc 1581:5-2182:6
+1581:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1581:7-1581:49
+1581:7-1581:49
     String
-SampleMaterial.lc 1582:7-1582:18
+1582:7-1582:18
     ()
       -> ()
         -> Bool
@@ -12043,68 +12043,68 @@ SampleMaterial.lc 1582:7-1582:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1582:7-1583:26
+1582:7-1583:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1582:7-1584:26
+1582:7-1584:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1582:7-1585:27
+1582:7-1585:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1582:7-1586:21
+1582:7-1586:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1582:7-1587:35
+1582:7-1587:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1582:7-1588:28
+1582:7-1588:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1582:7-1589:33
+1582:7-1589:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1582:7-1590:32
+1582:7-1590:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1582:7-1591:30
+1582:7-1591:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1582:7-1592:34
+1582:7-1592:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1582:7-1620:14
+1582:7-1620:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1582:7-1622:10
+1582:7-1622:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1583:24-1583:26
+1583:24-1583:26
     ()
-SampleMaterial.lc 1584:24-1584:26
+1584:24-1584:26
     ()
-SampleMaterial.lc 1585:22-1585:27
+1585:22-1585:27
     Bool
-SampleMaterial.lc 1586:20-1586:21
+1586:20-1586:21
     _b
-SampleMaterial.lc 1587:30-1587:35
+1587:30-1587:35
     Bool
-SampleMaterial.lc 1588:23-1588:28
+1588:23-1588:28
     Bool
-SampleMaterial.lc 1589:20-1589:33
+1589:20-1589:33
     CullType
-SampleMaterial.lc 1590:30-1590:32
+1590:30-1590:32
     forall a . [a]
-SampleMaterial.lc 1591:25-1591:30
+1591:25-1591:30
     Bool
-SampleMaterial.lc 1592:29-1592:34
+1592:29-1592:34
     Bool
-SampleMaterial.lc 1594:13-1620:14
+1594:13-1620:14
     [StageAttrs]
-SampleMaterial.lc 1594:15-1594:25
+1594:15-1594:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -12112,70 +12112,70 @@ SampleMaterial.lc 1594:15-1594:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1594:15-1595:36
+1594:15-1595:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1594:15-1596:50
+1594:15-1596:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1594:15-1597:42
+1594:15-1597:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1594:15-1598:36
+1594:15-1598:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1594:15-1599:31
+1594:15-1599:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1594:15-1600:80
+1594:15-1600:80
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1594:15-1601:38
+1594:15-1601:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1594:15-1602:41
+1594:15-1602:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1594:15-1603:40
+1594:15-1603:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1594:15-1604:46
+1594:15-1604:46
     String -> StageAttrs
-SampleMaterial.lc 1594:15-1606:18
+1594:15-1606:18
     StageAttrs
-SampleMaterial.lc 1595:29-1595:36
+1595:29-1595:36
     forall a . Maybe a
-SampleMaterial.lc 1596:30-1596:50
+1596:30-1596:50
     RGBGen
-SampleMaterial.lc 1597:32-1597:42
+1597:32-1597:42
     AlphaGen
-SampleMaterial.lc 1598:29-1598:36
+1598:29-1598:36
     TCGen
-SampleMaterial.lc 1599:29-1599:31
+1599:29-1599:31
     forall a . [a]
-SampleMaterial.lc 1600:31-1600:37
+1600:31-1600:37
     String -> StageTexture
-SampleMaterial.lc 1600:31-1600:80
+1600:31-1600:80
     StageTexture
-SampleMaterial.lc 1600:38-1600:80
+1600:38-1600:80
     String
-SampleMaterial.lc 1601:34-1601:38
+1601:34-1601:38
     Bool
-SampleMaterial.lc 1602:33-1602:41
+1602:33-1602:41
     DepthFunction
-SampleMaterial.lc 1603:33-1603:40
+1603:33-1603:40
     forall a . Maybe a
-SampleMaterial.lc 1604:41-1604:46
+1604:41-1604:46
     Bool
-SampleMaterial.lc 1605:38-1605:54
+1605:38-1605:54
     String
-SampleMaterial.lc 1607:15-1607:25
+1607:15-1607:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -12183,82 +12183,82 @@ SampleMaterial.lc 1607:15-1607:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1607:15-1608:57
+1607:15-1608:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1607:15-1609:50
+1607:15-1609:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1607:15-1610:42
+1607:15-1610:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1607:15-1611:40
+1607:15-1611:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1607:15-1612:31
+1607:15-1612:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1607:15-1613:42
+1607:15-1613:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1607:15-1614:38
+1607:15-1614:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1607:15-1615:41
+1607:15-1615:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1607:15-1616:40
+1607:15-1616:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1607:15-1617:46
+1607:15-1617:46
     String -> StageAttrs
-SampleMaterial.lc 1607:15-1619:18
+1607:15-1619:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1608:29-1608:33
+1608:29-1608:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1608:29-1608:57
+1608:29-1608:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1608:34-1608:57
+1608:34-1608:57
     (Blending', Blending')
-SampleMaterial.lc 1608:36-1608:46
+1608:36-1608:46
     Blending'
-SampleMaterial.lc 1608:49-1608:55
+1608:49-1608:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1609:30-1609:50
+1609:30-1609:50
     RGBGen
-SampleMaterial.lc 1610:32-1610:42
+1610:32-1610:42
     AlphaGen
-SampleMaterial.lc 1611:29-1611:40
+1611:29-1611:40
     TCGen
-SampleMaterial.lc 1612:29-1612:31
+1612:29-1612:31
     forall a . [a]
-SampleMaterial.lc 1613:31-1613:42
+1613:31-1613:42
     StageTexture
-SampleMaterial.lc 1614:34-1614:38
+1614:34-1614:38
     Bool
-SampleMaterial.lc 1615:33-1615:41
+1615:33-1615:41
     DepthFunction
-SampleMaterial.lc 1616:33-1616:40
+1616:33-1616:40
     forall a . Maybe a
-SampleMaterial.lc 1617:41-1617:46
+1617:41-1617:46
     Bool
-SampleMaterial.lc 1618:38-1618:54
+1618:38-1618:54
     String
-SampleMaterial.lc 1621:21-1621:26
+1621:21-1621:26
     Bool
-SampleMaterial.lc 1624:5-1666:6
+1624:5-1666:6
     (String, CommonAttrs)
-SampleMaterial.lc 1624:5-2182:6
+1624:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1624:7-1624:44
+1624:7-1624:44
     String
-SampleMaterial.lc 1625:7-1625:18
+1625:7-1625:18
     ()
       -> ()
         -> Bool
@@ -12266,68 +12266,68 @@ SampleMaterial.lc 1625:7-1625:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1625:7-1626:26
+1625:7-1626:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1625:7-1627:26
+1625:7-1627:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1625:7-1628:27
+1625:7-1628:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1625:7-1629:21
+1625:7-1629:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1625:7-1630:35
+1625:7-1630:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1625:7-1631:28
+1625:7-1631:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1625:7-1632:33
+1625:7-1632:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1625:7-1633:32
+1625:7-1633:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1625:7-1634:30
+1625:7-1634:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1625:7-1635:34
+1625:7-1635:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1625:7-1663:14
+1625:7-1663:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1625:7-1665:10
+1625:7-1665:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1626:24-1626:26
+1626:24-1626:26
     ()
-SampleMaterial.lc 1627:24-1627:26
+1627:24-1627:26
     ()
-SampleMaterial.lc 1628:22-1628:27
+1628:22-1628:27
     Bool
-SampleMaterial.lc 1629:20-1629:21
+1629:20-1629:21
     _b
-SampleMaterial.lc 1630:30-1630:35
+1630:30-1630:35
     Bool
-SampleMaterial.lc 1631:23-1631:28
+1631:23-1631:28
     Bool
-SampleMaterial.lc 1632:20-1632:33
+1632:20-1632:33
     CullType
-SampleMaterial.lc 1633:30-1633:32
+1633:30-1633:32
     forall a . [a]
-SampleMaterial.lc 1634:25-1634:30
+1634:25-1634:30
     Bool
-SampleMaterial.lc 1635:29-1635:34
+1635:29-1635:34
     Bool
-SampleMaterial.lc 1637:13-1663:14
+1637:13-1663:14
     [StageAttrs]
-SampleMaterial.lc 1637:15-1637:25
+1637:15-1637:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -12335,70 +12335,70 @@ SampleMaterial.lc 1637:15-1637:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1637:15-1638:36
+1637:15-1638:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1637:15-1639:50
+1637:15-1639:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1637:15-1640:42
+1637:15-1640:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1637:15-1641:36
+1637:15-1641:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1637:15-1642:31
+1637:15-1642:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1637:15-1643:75
+1637:15-1643:75
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1637:15-1644:38
+1637:15-1644:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1637:15-1645:41
+1637:15-1645:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1637:15-1646:40
+1637:15-1646:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1637:15-1647:46
+1637:15-1647:46
     String -> StageAttrs
-SampleMaterial.lc 1637:15-1649:18
+1637:15-1649:18
     StageAttrs
-SampleMaterial.lc 1638:29-1638:36
+1638:29-1638:36
     forall a . Maybe a
-SampleMaterial.lc 1639:30-1639:50
+1639:30-1639:50
     RGBGen
-SampleMaterial.lc 1640:32-1640:42
+1640:32-1640:42
     AlphaGen
-SampleMaterial.lc 1641:29-1641:36
+1641:29-1641:36
     TCGen
-SampleMaterial.lc 1642:29-1642:31
+1642:29-1642:31
     forall a . [a]
-SampleMaterial.lc 1643:31-1643:37
+1643:31-1643:37
     String -> StageTexture
-SampleMaterial.lc 1643:31-1643:75
+1643:31-1643:75
     StageTexture
-SampleMaterial.lc 1643:38-1643:75
+1643:38-1643:75
     String
-SampleMaterial.lc 1644:34-1644:38
+1644:34-1644:38
     Bool
-SampleMaterial.lc 1645:33-1645:41
+1645:33-1645:41
     DepthFunction
-SampleMaterial.lc 1646:33-1646:40
+1646:33-1646:40
     forall a . Maybe a
-SampleMaterial.lc 1647:41-1647:46
+1647:41-1647:46
     Bool
-SampleMaterial.lc 1648:38-1648:54
+1648:38-1648:54
     String
-SampleMaterial.lc 1650:15-1650:25
+1650:15-1650:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -12406,82 +12406,82 @@ SampleMaterial.lc 1650:15-1650:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1650:15-1651:57
+1650:15-1651:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1650:15-1652:50
+1650:15-1652:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1650:15-1653:42
+1650:15-1653:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1650:15-1654:40
+1650:15-1654:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1650:15-1655:31
+1650:15-1655:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1650:15-1656:42
+1650:15-1656:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1650:15-1657:38
+1650:15-1657:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1650:15-1658:41
+1650:15-1658:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1650:15-1659:40
+1650:15-1659:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1650:15-1660:46
+1650:15-1660:46
     String -> StageAttrs
-SampleMaterial.lc 1650:15-1662:18
+1650:15-1662:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1651:29-1651:33
+1651:29-1651:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1651:29-1651:57
+1651:29-1651:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1651:34-1651:57
+1651:34-1651:57
     (Blending', Blending')
-SampleMaterial.lc 1651:36-1651:46
+1651:36-1651:46
     Blending'
-SampleMaterial.lc 1651:49-1651:55
+1651:49-1651:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1652:30-1652:50
+1652:30-1652:50
     RGBGen
-SampleMaterial.lc 1653:32-1653:42
+1653:32-1653:42
     AlphaGen
-SampleMaterial.lc 1654:29-1654:40
+1654:29-1654:40
     TCGen
-SampleMaterial.lc 1655:29-1655:31
+1655:29-1655:31
     forall a . [a]
-SampleMaterial.lc 1656:31-1656:42
+1656:31-1656:42
     StageTexture
-SampleMaterial.lc 1657:34-1657:38
+1657:34-1657:38
     Bool
-SampleMaterial.lc 1658:33-1658:41
+1658:33-1658:41
     DepthFunction
-SampleMaterial.lc 1659:33-1659:40
+1659:33-1659:40
     forall a . Maybe a
-SampleMaterial.lc 1660:41-1660:46
+1660:41-1660:46
     Bool
-SampleMaterial.lc 1661:38-1661:54
+1661:38-1661:54
     String
-SampleMaterial.lc 1664:21-1664:26
+1664:21-1664:26
     Bool
-SampleMaterial.lc 1667:5-1709:6
+1667:5-1709:6
     (String, CommonAttrs)
-SampleMaterial.lc 1667:5-2182:6
+1667:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1667:7-1667:43
+1667:7-1667:43
     String
-SampleMaterial.lc 1668:7-1668:18
+1668:7-1668:18
     ()
       -> ()
         -> Bool
@@ -12489,68 +12489,68 @@ SampleMaterial.lc 1668:7-1668:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1668:7-1669:26
+1668:7-1669:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1668:7-1670:26
+1668:7-1670:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1668:7-1671:27
+1668:7-1671:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1668:7-1672:21
+1668:7-1672:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1668:7-1673:35
+1668:7-1673:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1668:7-1674:28
+1668:7-1674:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1668:7-1675:33
+1668:7-1675:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1668:7-1676:32
+1668:7-1676:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1668:7-1677:30
+1668:7-1677:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1668:7-1678:34
+1668:7-1678:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1668:7-1706:14
+1668:7-1706:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1668:7-1708:10
+1668:7-1708:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1669:24-1669:26
+1669:24-1669:26
     ()
-SampleMaterial.lc 1670:24-1670:26
+1670:24-1670:26
     ()
-SampleMaterial.lc 1671:22-1671:27
+1671:22-1671:27
     Bool
-SampleMaterial.lc 1672:20-1672:21
+1672:20-1672:21
     _b
-SampleMaterial.lc 1673:30-1673:35
+1673:30-1673:35
     Bool
-SampleMaterial.lc 1674:23-1674:28
+1674:23-1674:28
     Bool
-SampleMaterial.lc 1675:20-1675:33
+1675:20-1675:33
     CullType
-SampleMaterial.lc 1676:30-1676:32
+1676:30-1676:32
     forall a . [a]
-SampleMaterial.lc 1677:25-1677:30
+1677:25-1677:30
     Bool
-SampleMaterial.lc 1678:29-1678:34
+1678:29-1678:34
     Bool
-SampleMaterial.lc 1680:13-1706:14
+1680:13-1706:14
     [StageAttrs]
-SampleMaterial.lc 1680:15-1680:25
+1680:15-1680:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -12558,70 +12558,70 @@ SampleMaterial.lc 1680:15-1680:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1680:15-1681:36
+1680:15-1681:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1680:15-1682:50
+1680:15-1682:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1680:15-1683:42
+1680:15-1683:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1680:15-1684:36
+1680:15-1684:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1680:15-1685:31
+1680:15-1685:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1680:15-1686:74
+1680:15-1686:74
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1680:15-1687:38
+1680:15-1687:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1680:15-1688:41
+1680:15-1688:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1680:15-1689:40
+1680:15-1689:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1680:15-1690:46
+1680:15-1690:46
     String -> StageAttrs
-SampleMaterial.lc 1680:15-1692:18
+1680:15-1692:18
     StageAttrs
-SampleMaterial.lc 1681:29-1681:36
+1681:29-1681:36
     forall a . Maybe a
-SampleMaterial.lc 1682:30-1682:50
+1682:30-1682:50
     RGBGen
-SampleMaterial.lc 1683:32-1683:42
+1683:32-1683:42
     AlphaGen
-SampleMaterial.lc 1684:29-1684:36
+1684:29-1684:36
     TCGen
-SampleMaterial.lc 1685:29-1685:31
+1685:29-1685:31
     forall a . [a]
-SampleMaterial.lc 1686:31-1686:37
+1686:31-1686:37
     String -> StageTexture
-SampleMaterial.lc 1686:31-1686:74
+1686:31-1686:74
     StageTexture
-SampleMaterial.lc 1686:38-1686:74
+1686:38-1686:74
     String
-SampleMaterial.lc 1687:34-1687:38
+1687:34-1687:38
     Bool
-SampleMaterial.lc 1688:33-1688:41
+1688:33-1688:41
     DepthFunction
-SampleMaterial.lc 1689:33-1689:40
+1689:33-1689:40
     forall a . Maybe a
-SampleMaterial.lc 1690:41-1690:46
+1690:41-1690:46
     Bool
-SampleMaterial.lc 1691:38-1691:54
+1691:38-1691:54
     String
-SampleMaterial.lc 1693:15-1693:25
+1693:15-1693:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -12629,82 +12629,82 @@ SampleMaterial.lc 1693:15-1693:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1693:15-1694:57
+1693:15-1694:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1693:15-1695:50
+1693:15-1695:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1693:15-1696:42
+1693:15-1696:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1693:15-1697:40
+1693:15-1697:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1693:15-1698:31
+1693:15-1698:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1693:15-1699:42
+1693:15-1699:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1693:15-1700:38
+1693:15-1700:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1693:15-1701:41
+1693:15-1701:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1693:15-1702:40
+1693:15-1702:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1693:15-1703:46
+1693:15-1703:46
     String -> StageAttrs
-SampleMaterial.lc 1693:15-1705:18
+1693:15-1705:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1694:29-1694:33
+1694:29-1694:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1694:29-1694:57
+1694:29-1694:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1694:34-1694:57
+1694:34-1694:57
     (Blending', Blending')
-SampleMaterial.lc 1694:36-1694:46
+1694:36-1694:46
     Blending'
-SampleMaterial.lc 1694:49-1694:55
+1694:49-1694:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1695:30-1695:50
+1695:30-1695:50
     RGBGen
-SampleMaterial.lc 1696:32-1696:42
+1696:32-1696:42
     AlphaGen
-SampleMaterial.lc 1697:29-1697:40
+1697:29-1697:40
     TCGen
-SampleMaterial.lc 1698:29-1698:31
+1698:29-1698:31
     forall a . [a]
-SampleMaterial.lc 1699:31-1699:42
+1699:31-1699:42
     StageTexture
-SampleMaterial.lc 1700:34-1700:38
+1700:34-1700:38
     Bool
-SampleMaterial.lc 1701:33-1701:41
+1701:33-1701:41
     DepthFunction
-SampleMaterial.lc 1702:33-1702:40
+1702:33-1702:40
     forall a . Maybe a
-SampleMaterial.lc 1703:41-1703:46
+1703:41-1703:46
     Bool
-SampleMaterial.lc 1704:38-1704:54
+1704:38-1704:54
     String
-SampleMaterial.lc 1707:21-1707:26
+1707:21-1707:26
     Bool
-SampleMaterial.lc 1710:5-1752:6
+1710:5-1752:6
     (String, CommonAttrs)
-SampleMaterial.lc 1710:5-2182:6
+1710:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1710:7-1710:41
+1710:7-1710:41
     String
-SampleMaterial.lc 1711:7-1711:18
+1711:7-1711:18
     ()
       -> ()
         -> Bool
@@ -12712,68 +12712,68 @@ SampleMaterial.lc 1711:7-1711:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1711:7-1712:26
+1711:7-1712:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1711:7-1713:26
+1711:7-1713:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1711:7-1714:27
+1711:7-1714:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1711:7-1715:21
+1711:7-1715:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1711:7-1716:35
+1711:7-1716:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1711:7-1717:28
+1711:7-1717:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1711:7-1718:33
+1711:7-1718:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1711:7-1719:32
+1711:7-1719:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1711:7-1720:30
+1711:7-1720:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1711:7-1721:34
+1711:7-1721:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1711:7-1749:14
+1711:7-1749:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1711:7-1751:10
+1711:7-1751:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1712:24-1712:26
+1712:24-1712:26
     ()
-SampleMaterial.lc 1713:24-1713:26
+1713:24-1713:26
     ()
-SampleMaterial.lc 1714:22-1714:27
+1714:22-1714:27
     Bool
-SampleMaterial.lc 1715:20-1715:21
+1715:20-1715:21
     _b
-SampleMaterial.lc 1716:30-1716:35
+1716:30-1716:35
     Bool
-SampleMaterial.lc 1717:23-1717:28
+1717:23-1717:28
     Bool
-SampleMaterial.lc 1718:20-1718:33
+1718:20-1718:33
     CullType
-SampleMaterial.lc 1719:30-1719:32
+1719:30-1719:32
     forall a . [a]
-SampleMaterial.lc 1720:25-1720:30
+1720:25-1720:30
     Bool
-SampleMaterial.lc 1721:29-1721:34
+1721:29-1721:34
     Bool
-SampleMaterial.lc 1723:13-1749:14
+1723:13-1749:14
     [StageAttrs]
-SampleMaterial.lc 1723:15-1723:25
+1723:15-1723:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -12781,70 +12781,70 @@ SampleMaterial.lc 1723:15-1723:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1723:15-1724:36
+1723:15-1724:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1723:15-1725:50
+1723:15-1725:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1723:15-1726:42
+1723:15-1726:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1723:15-1727:36
+1723:15-1727:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1723:15-1728:31
+1723:15-1728:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1723:15-1729:72
+1723:15-1729:72
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1723:15-1730:38
+1723:15-1730:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1723:15-1731:41
+1723:15-1731:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1723:15-1732:40
+1723:15-1732:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1723:15-1733:46
+1723:15-1733:46
     String -> StageAttrs
-SampleMaterial.lc 1723:15-1735:18
+1723:15-1735:18
     StageAttrs
-SampleMaterial.lc 1724:29-1724:36
+1724:29-1724:36
     forall a . Maybe a
-SampleMaterial.lc 1725:30-1725:50
+1725:30-1725:50
     RGBGen
-SampleMaterial.lc 1726:32-1726:42
+1726:32-1726:42
     AlphaGen
-SampleMaterial.lc 1727:29-1727:36
+1727:29-1727:36
     TCGen
-SampleMaterial.lc 1728:29-1728:31
+1728:29-1728:31
     forall a . [a]
-SampleMaterial.lc 1729:31-1729:37
+1729:31-1729:37
     String -> StageTexture
-SampleMaterial.lc 1729:31-1729:72
+1729:31-1729:72
     StageTexture
-SampleMaterial.lc 1729:38-1729:72
+1729:38-1729:72
     String
-SampleMaterial.lc 1730:34-1730:38
+1730:34-1730:38
     Bool
-SampleMaterial.lc 1731:33-1731:41
+1731:33-1731:41
     DepthFunction
-SampleMaterial.lc 1732:33-1732:40
+1732:33-1732:40
     forall a . Maybe a
-SampleMaterial.lc 1733:41-1733:46
+1733:41-1733:46
     Bool
-SampleMaterial.lc 1734:38-1734:54
+1734:38-1734:54
     String
-SampleMaterial.lc 1736:15-1736:25
+1736:15-1736:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -12852,82 +12852,82 @@ SampleMaterial.lc 1736:15-1736:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1736:15-1737:57
+1736:15-1737:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1736:15-1738:50
+1736:15-1738:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1736:15-1739:42
+1736:15-1739:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1736:15-1740:40
+1736:15-1740:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1736:15-1741:31
+1736:15-1741:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1736:15-1742:42
+1736:15-1742:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1736:15-1743:38
+1736:15-1743:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1736:15-1744:41
+1736:15-1744:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1736:15-1745:40
+1736:15-1745:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1736:15-1746:46
+1736:15-1746:46
     String -> StageAttrs
-SampleMaterial.lc 1736:15-1748:18
+1736:15-1748:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1737:29-1737:33
+1737:29-1737:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1737:29-1737:57
+1737:29-1737:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1737:34-1737:57
+1737:34-1737:57
     (Blending', Blending')
-SampleMaterial.lc 1737:36-1737:46
+1737:36-1737:46
     Blending'
-SampleMaterial.lc 1737:49-1737:55
+1737:49-1737:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1738:30-1738:50
+1738:30-1738:50
     RGBGen
-SampleMaterial.lc 1739:32-1739:42
+1739:32-1739:42
     AlphaGen
-SampleMaterial.lc 1740:29-1740:40
+1740:29-1740:40
     TCGen
-SampleMaterial.lc 1741:29-1741:31
+1741:29-1741:31
     forall a . [a]
-SampleMaterial.lc 1742:31-1742:42
+1742:31-1742:42
     StageTexture
-SampleMaterial.lc 1743:34-1743:38
+1743:34-1743:38
     Bool
-SampleMaterial.lc 1744:33-1744:41
+1744:33-1744:41
     DepthFunction
-SampleMaterial.lc 1745:33-1745:40
+1745:33-1745:40
     forall a . Maybe a
-SampleMaterial.lc 1746:41-1746:46
+1746:41-1746:46
     Bool
-SampleMaterial.lc 1747:38-1747:54
+1747:38-1747:54
     String
-SampleMaterial.lc 1750:21-1750:26
+1750:21-1750:26
     Bool
-SampleMaterial.lc 1753:5-1795:6
+1753:5-1795:6
     (String, CommonAttrs)
-SampleMaterial.lc 1753:5-2182:6
+1753:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1753:7-1753:42
+1753:7-1753:42
     String
-SampleMaterial.lc 1754:7-1754:18
+1754:7-1754:18
     ()
       -> ()
         -> Bool
@@ -12935,68 +12935,68 @@ SampleMaterial.lc 1754:7-1754:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1754:7-1755:26
+1754:7-1755:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1754:7-1756:26
+1754:7-1756:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1754:7-1757:27
+1754:7-1757:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1754:7-1758:21
+1754:7-1758:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1754:7-1759:35
+1754:7-1759:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1754:7-1760:28
+1754:7-1760:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1754:7-1761:33
+1754:7-1761:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1754:7-1762:32
+1754:7-1762:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1754:7-1763:30
+1754:7-1763:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1754:7-1764:34
+1754:7-1764:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1754:7-1792:14
+1754:7-1792:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1754:7-1794:10
+1754:7-1794:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1755:24-1755:26
+1755:24-1755:26
     ()
-SampleMaterial.lc 1756:24-1756:26
+1756:24-1756:26
     ()
-SampleMaterial.lc 1757:22-1757:27
+1757:22-1757:27
     Bool
-SampleMaterial.lc 1758:20-1758:21
+1758:20-1758:21
     _b
-SampleMaterial.lc 1759:30-1759:35
+1759:30-1759:35
     Bool
-SampleMaterial.lc 1760:23-1760:28
+1760:23-1760:28
     Bool
-SampleMaterial.lc 1761:20-1761:33
+1761:20-1761:33
     CullType
-SampleMaterial.lc 1762:30-1762:32
+1762:30-1762:32
     forall a . [a]
-SampleMaterial.lc 1763:25-1763:30
+1763:25-1763:30
     Bool
-SampleMaterial.lc 1764:29-1764:34
+1764:29-1764:34
     Bool
-SampleMaterial.lc 1766:13-1792:14
+1766:13-1792:14
     [StageAttrs]
-SampleMaterial.lc 1766:15-1766:25
+1766:15-1766:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -13004,70 +13004,70 @@ SampleMaterial.lc 1766:15-1766:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1766:15-1767:36
+1766:15-1767:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1766:15-1768:50
+1766:15-1768:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1766:15-1769:42
+1766:15-1769:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1766:15-1770:36
+1766:15-1770:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1766:15-1771:31
+1766:15-1771:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1766:15-1772:73
+1766:15-1772:73
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1766:15-1773:38
+1766:15-1773:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1766:15-1774:41
+1766:15-1774:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1766:15-1775:40
+1766:15-1775:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1766:15-1776:46
+1766:15-1776:46
     String -> StageAttrs
-SampleMaterial.lc 1766:15-1778:18
+1766:15-1778:18
     StageAttrs
-SampleMaterial.lc 1767:29-1767:36
+1767:29-1767:36
     forall a . Maybe a
-SampleMaterial.lc 1768:30-1768:50
+1768:30-1768:50
     RGBGen
-SampleMaterial.lc 1769:32-1769:42
+1769:32-1769:42
     AlphaGen
-SampleMaterial.lc 1770:29-1770:36
+1770:29-1770:36
     TCGen
-SampleMaterial.lc 1771:29-1771:31
+1771:29-1771:31
     forall a . [a]
-SampleMaterial.lc 1772:31-1772:37
+1772:31-1772:37
     String -> StageTexture
-SampleMaterial.lc 1772:31-1772:73
+1772:31-1772:73
     StageTexture
-SampleMaterial.lc 1772:38-1772:73
+1772:38-1772:73
     String
-SampleMaterial.lc 1773:34-1773:38
+1773:34-1773:38
     Bool
-SampleMaterial.lc 1774:33-1774:41
+1774:33-1774:41
     DepthFunction
-SampleMaterial.lc 1775:33-1775:40
+1775:33-1775:40
     forall a . Maybe a
-SampleMaterial.lc 1776:41-1776:46
+1776:41-1776:46
     Bool
-SampleMaterial.lc 1777:38-1777:54
+1777:38-1777:54
     String
-SampleMaterial.lc 1779:15-1779:25
+1779:15-1779:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -13075,82 +13075,82 @@ SampleMaterial.lc 1779:15-1779:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1779:15-1780:57
+1779:15-1780:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1779:15-1781:50
+1779:15-1781:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1779:15-1782:42
+1779:15-1782:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1779:15-1783:40
+1779:15-1783:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1779:15-1784:31
+1779:15-1784:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1779:15-1785:42
+1779:15-1785:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1779:15-1786:38
+1779:15-1786:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1779:15-1787:41
+1779:15-1787:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1779:15-1788:40
+1779:15-1788:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1779:15-1789:46
+1779:15-1789:46
     String -> StageAttrs
-SampleMaterial.lc 1779:15-1791:18
+1779:15-1791:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1780:29-1780:33
+1780:29-1780:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1780:29-1780:57
+1780:29-1780:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1780:34-1780:57
+1780:34-1780:57
     (Blending', Blending')
-SampleMaterial.lc 1780:36-1780:46
+1780:36-1780:46
     Blending'
-SampleMaterial.lc 1780:49-1780:55
+1780:49-1780:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1781:30-1781:50
+1781:30-1781:50
     RGBGen
-SampleMaterial.lc 1782:32-1782:42
+1782:32-1782:42
     AlphaGen
-SampleMaterial.lc 1783:29-1783:40
+1783:29-1783:40
     TCGen
-SampleMaterial.lc 1784:29-1784:31
+1784:29-1784:31
     forall a . [a]
-SampleMaterial.lc 1785:31-1785:42
+1785:31-1785:42
     StageTexture
-SampleMaterial.lc 1786:34-1786:38
+1786:34-1786:38
     Bool
-SampleMaterial.lc 1787:33-1787:41
+1787:33-1787:41
     DepthFunction
-SampleMaterial.lc 1788:33-1788:40
+1788:33-1788:40
     forall a . Maybe a
-SampleMaterial.lc 1789:41-1789:46
+1789:41-1789:46
     Bool
-SampleMaterial.lc 1790:38-1790:54
+1790:38-1790:54
     String
-SampleMaterial.lc 1793:21-1793:26
+1793:21-1793:26
     Bool
-SampleMaterial.lc 1796:5-1838:6
+1796:5-1838:6
     (String, CommonAttrs)
-SampleMaterial.lc 1796:5-2182:6
+1796:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1796:7-1796:48
+1796:7-1796:48
     String
-SampleMaterial.lc 1797:7-1797:18
+1797:7-1797:18
     ()
       -> ()
         -> Bool
@@ -13158,68 +13158,68 @@ SampleMaterial.lc 1797:7-1797:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1797:7-1798:26
+1797:7-1798:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1797:7-1799:26
+1797:7-1799:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1797:7-1800:27
+1797:7-1800:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1797:7-1801:21
+1797:7-1801:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1797:7-1802:35
+1797:7-1802:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1797:7-1803:28
+1797:7-1803:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1797:7-1804:33
+1797:7-1804:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1797:7-1805:32
+1797:7-1805:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1797:7-1806:30
+1797:7-1806:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1797:7-1807:34
+1797:7-1807:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1797:7-1835:14
+1797:7-1835:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1797:7-1837:10
+1797:7-1837:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1798:24-1798:26
+1798:24-1798:26
     ()
-SampleMaterial.lc 1799:24-1799:26
+1799:24-1799:26
     ()
-SampleMaterial.lc 1800:22-1800:27
+1800:22-1800:27
     Bool
-SampleMaterial.lc 1801:20-1801:21
+1801:20-1801:21
     _b
-SampleMaterial.lc 1802:30-1802:35
+1802:30-1802:35
     Bool
-SampleMaterial.lc 1803:23-1803:28
+1803:23-1803:28
     Bool
-SampleMaterial.lc 1804:20-1804:33
+1804:20-1804:33
     CullType
-SampleMaterial.lc 1805:30-1805:32
+1805:30-1805:32
     forall a . [a]
-SampleMaterial.lc 1806:25-1806:30
+1806:25-1806:30
     Bool
-SampleMaterial.lc 1807:29-1807:34
+1807:29-1807:34
     Bool
-SampleMaterial.lc 1809:13-1835:14
+1809:13-1835:14
     [StageAttrs]
-SampleMaterial.lc 1809:15-1809:25
+1809:15-1809:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -13227,66 +13227,66 @@ SampleMaterial.lc 1809:15-1809:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1809:15-1810:36
+1809:15-1810:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1809:15-1811:42
+1809:15-1811:42
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1809:15-1812:42
+1809:15-1812:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1809:15-1813:40
+1809:15-1813:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1809:15-1814:31
+1809:15-1814:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1809:15-1815:42
+1809:15-1815:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1809:15-1816:38
+1809:15-1816:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1809:15-1817:41
+1809:15-1817:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1809:15-1818:40
+1809:15-1818:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1809:15-1819:46
+1809:15-1819:46
     String -> StageAttrs
-SampleMaterial.lc 1809:15-1821:18
+1809:15-1821:18
     StageAttrs
-SampleMaterial.lc 1810:29-1810:36
+1810:29-1810:36
     forall a . Maybe a
-SampleMaterial.lc 1811:30-1811:42
+1811:30-1811:42
     RGBGen
-SampleMaterial.lc 1812:32-1812:42
+1812:32-1812:42
     AlphaGen
-SampleMaterial.lc 1813:29-1813:40
+1813:29-1813:40
     TCGen
-SampleMaterial.lc 1814:29-1814:31
+1814:29-1814:31
     forall a . [a]
-SampleMaterial.lc 1815:31-1815:42
+1815:31-1815:42
     StageTexture
-SampleMaterial.lc 1816:34-1816:38
+1816:34-1816:38
     Bool
-SampleMaterial.lc 1817:33-1817:41
+1817:33-1817:41
     DepthFunction
-SampleMaterial.lc 1818:33-1818:40
+1818:33-1818:40
     forall a . Maybe a
-SampleMaterial.lc 1819:41-1819:46
+1819:41-1819:46
     Bool
-SampleMaterial.lc 1820:38-1820:53
+1820:38-1820:53
     String
-SampleMaterial.lc 1822:15-1822:25
+1822:15-1822:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -13294,86 +13294,86 @@ SampleMaterial.lc 1822:15-1822:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1822:15-1823:57
+1822:15-1823:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1822:15-1824:42
+1822:15-1824:42
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1822:15-1825:42
+1822:15-1825:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1822:15-1826:36
+1822:15-1826:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1822:15-1827:31
+1822:15-1827:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1822:15-1828:77
+1822:15-1828:77
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1822:15-1829:39
+1822:15-1829:39
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1822:15-1830:41
+1822:15-1830:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1822:15-1831:40
+1822:15-1831:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1822:15-1832:46
+1822:15-1832:46
     String -> StageAttrs
-SampleMaterial.lc 1822:15-1834:18
+1822:15-1834:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1823:29-1823:33
+1823:29-1823:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1823:29-1823:57
+1823:29-1823:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1823:34-1823:57
+1823:34-1823:57
     (Blending', Blending')
-SampleMaterial.lc 1823:36-1823:46
+1823:36-1823:46
     Blending'
-SampleMaterial.lc 1823:49-1823:55
+1823:49-1823:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1824:30-1824:42
+1824:30-1824:42
     RGBGen
-SampleMaterial.lc 1825:32-1825:42
+1825:32-1825:42
     AlphaGen
-SampleMaterial.lc 1826:29-1826:36
+1826:29-1826:36
     TCGen
-SampleMaterial.lc 1827:29-1827:31
+1827:29-1827:31
     forall a . [a]
-SampleMaterial.lc 1828:31-1828:37
+1828:31-1828:37
     String -> StageTexture
-SampleMaterial.lc 1828:31-1828:77
+1828:31-1828:77
     StageTexture
-SampleMaterial.lc 1828:38-1828:77
+1828:38-1828:77
     String
-SampleMaterial.lc 1829:34-1829:39
+1829:34-1829:39
     Bool
-SampleMaterial.lc 1830:33-1830:41
+1830:33-1830:41
     DepthFunction
-SampleMaterial.lc 1831:33-1831:40
+1831:33-1831:40
     forall a . Maybe a
-SampleMaterial.lc 1832:41-1832:46
+1832:41-1832:46
     Bool
-SampleMaterial.lc 1833:38-1833:54
+1833:38-1833:54
     String
-SampleMaterial.lc 1836:21-1836:26
+1836:21-1836:26
     Bool
-SampleMaterial.lc 1839:5-1881:6
+1839:5-1881:6
     (String, CommonAttrs)
-SampleMaterial.lc 1839:5-2182:6
+1839:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1839:7-1839:42
+1839:7-1839:42
     String
-SampleMaterial.lc 1840:7-1840:18
+1840:7-1840:18
     ()
       -> ()
         -> Bool
@@ -13381,68 +13381,68 @@ SampleMaterial.lc 1840:7-1840:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1840:7-1841:26
+1840:7-1841:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1840:7-1842:26
+1840:7-1842:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1840:7-1843:27
+1840:7-1843:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1840:7-1844:21
+1840:7-1844:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1840:7-1845:35
+1840:7-1845:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1840:7-1846:28
+1840:7-1846:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1840:7-1847:33
+1840:7-1847:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1840:7-1848:32
+1840:7-1848:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1840:7-1849:30
+1840:7-1849:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1840:7-1850:34
+1840:7-1850:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1840:7-1878:14
+1840:7-1878:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1840:7-1880:10
+1840:7-1880:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1841:24-1841:26
+1841:24-1841:26
     ()
-SampleMaterial.lc 1842:24-1842:26
+1842:24-1842:26
     ()
-SampleMaterial.lc 1843:22-1843:27
+1843:22-1843:27
     Bool
-SampleMaterial.lc 1844:20-1844:21
+1844:20-1844:21
     _b
-SampleMaterial.lc 1845:30-1845:35
+1845:30-1845:35
     Bool
-SampleMaterial.lc 1846:23-1846:28
+1846:23-1846:28
     Bool
-SampleMaterial.lc 1847:20-1847:33
+1847:20-1847:33
     CullType
-SampleMaterial.lc 1848:30-1848:32
+1848:30-1848:32
     forall a . [a]
-SampleMaterial.lc 1849:25-1849:30
+1849:25-1849:30
     Bool
-SampleMaterial.lc 1850:29-1850:34
+1850:29-1850:34
     Bool
-SampleMaterial.lc 1852:13-1878:14
+1852:13-1878:14
     [StageAttrs]
-SampleMaterial.lc 1852:15-1852:25
+1852:15-1852:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -13450,70 +13450,70 @@ SampleMaterial.lc 1852:15-1852:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1852:15-1853:36
+1852:15-1853:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1852:15-1854:50
+1852:15-1854:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1852:15-1855:42
+1852:15-1855:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1852:15-1856:36
+1852:15-1856:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1852:15-1857:31
+1852:15-1857:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1852:15-1858:73
+1852:15-1858:73
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1852:15-1859:38
+1852:15-1859:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1852:15-1860:41
+1852:15-1860:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1852:15-1861:40
+1852:15-1861:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1852:15-1862:46
+1852:15-1862:46
     String -> StageAttrs
-SampleMaterial.lc 1852:15-1864:18
+1852:15-1864:18
     StageAttrs
-SampleMaterial.lc 1853:29-1853:36
+1853:29-1853:36
     forall a . Maybe a
-SampleMaterial.lc 1854:30-1854:50
+1854:30-1854:50
     RGBGen
-SampleMaterial.lc 1855:32-1855:42
+1855:32-1855:42
     AlphaGen
-SampleMaterial.lc 1856:29-1856:36
+1856:29-1856:36
     TCGen
-SampleMaterial.lc 1857:29-1857:31
+1857:29-1857:31
     forall a . [a]
-SampleMaterial.lc 1858:31-1858:37
+1858:31-1858:37
     String -> StageTexture
-SampleMaterial.lc 1858:31-1858:73
+1858:31-1858:73
     StageTexture
-SampleMaterial.lc 1858:38-1858:73
+1858:38-1858:73
     String
-SampleMaterial.lc 1859:34-1859:38
+1859:34-1859:38
     Bool
-SampleMaterial.lc 1860:33-1860:41
+1860:33-1860:41
     DepthFunction
-SampleMaterial.lc 1861:33-1861:40
+1861:33-1861:40
     forall a . Maybe a
-SampleMaterial.lc 1862:41-1862:46
+1862:41-1862:46
     Bool
-SampleMaterial.lc 1863:38-1863:54
+1863:38-1863:54
     String
-SampleMaterial.lc 1865:15-1865:25
+1865:15-1865:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -13521,82 +13521,82 @@ SampleMaterial.lc 1865:15-1865:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1865:15-1866:57
+1865:15-1866:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1865:15-1867:50
+1865:15-1867:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1865:15-1868:42
+1865:15-1868:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1865:15-1869:40
+1865:15-1869:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1865:15-1870:31
+1865:15-1870:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1865:15-1871:42
+1865:15-1871:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1865:15-1872:38
+1865:15-1872:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1865:15-1873:41
+1865:15-1873:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1865:15-1874:40
+1865:15-1874:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1865:15-1875:46
+1865:15-1875:46
     String -> StageAttrs
-SampleMaterial.lc 1865:15-1877:18
+1865:15-1877:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1866:29-1866:33
+1866:29-1866:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1866:29-1866:57
+1866:29-1866:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1866:34-1866:57
+1866:34-1866:57
     (Blending', Blending')
-SampleMaterial.lc 1866:36-1866:46
+1866:36-1866:46
     Blending'
-SampleMaterial.lc 1866:49-1866:55
+1866:49-1866:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1867:30-1867:50
+1867:30-1867:50
     RGBGen
-SampleMaterial.lc 1868:32-1868:42
+1868:32-1868:42
     AlphaGen
-SampleMaterial.lc 1869:29-1869:40
+1869:29-1869:40
     TCGen
-SampleMaterial.lc 1870:29-1870:31
+1870:29-1870:31
     forall a . [a]
-SampleMaterial.lc 1871:31-1871:42
+1871:31-1871:42
     StageTexture
-SampleMaterial.lc 1872:34-1872:38
+1872:34-1872:38
     Bool
-SampleMaterial.lc 1873:33-1873:41
+1873:33-1873:41
     DepthFunction
-SampleMaterial.lc 1874:33-1874:40
+1874:33-1874:40
     forall a . Maybe a
-SampleMaterial.lc 1875:41-1875:46
+1875:41-1875:46
     Bool
-SampleMaterial.lc 1876:38-1876:54
+1876:38-1876:54
     String
-SampleMaterial.lc 1879:21-1879:26
+1879:21-1879:26
     Bool
-SampleMaterial.lc 1882:5-1924:6
+1882:5-1924:6
     (String, CommonAttrs)
-SampleMaterial.lc 1882:5-2182:6
+1882:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1882:7-1882:47
+1882:7-1882:47
     String
-SampleMaterial.lc 1883:7-1883:18
+1883:7-1883:18
     ()
       -> ()
         -> Bool
@@ -13604,68 +13604,68 @@ SampleMaterial.lc 1883:7-1883:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1883:7-1884:26
+1883:7-1884:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1883:7-1885:26
+1883:7-1885:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1883:7-1886:27
+1883:7-1886:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1883:7-1887:21
+1883:7-1887:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1883:7-1888:35
+1883:7-1888:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1883:7-1889:28
+1883:7-1889:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1883:7-1890:33
+1883:7-1890:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1883:7-1891:32
+1883:7-1891:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1883:7-1892:30
+1883:7-1892:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1883:7-1893:34
+1883:7-1893:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1883:7-1921:14
+1883:7-1921:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1883:7-1923:10
+1883:7-1923:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1884:24-1884:26
+1884:24-1884:26
     ()
-SampleMaterial.lc 1885:24-1885:26
+1885:24-1885:26
     ()
-SampleMaterial.lc 1886:22-1886:27
+1886:22-1886:27
     Bool
-SampleMaterial.lc 1887:20-1887:21
+1887:20-1887:21
     _b
-SampleMaterial.lc 1888:30-1888:35
+1888:30-1888:35
     Bool
-SampleMaterial.lc 1889:23-1889:28
+1889:23-1889:28
     Bool
-SampleMaterial.lc 1890:20-1890:33
+1890:20-1890:33
     CullType
-SampleMaterial.lc 1891:30-1891:32
+1891:30-1891:32
     forall a . [a]
-SampleMaterial.lc 1892:25-1892:30
+1892:25-1892:30
     Bool
-SampleMaterial.lc 1893:29-1893:34
+1893:29-1893:34
     Bool
-SampleMaterial.lc 1895:13-1921:14
+1895:13-1921:14
     [StageAttrs]
-SampleMaterial.lc 1895:15-1895:25
+1895:15-1895:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -13673,70 +13673,70 @@ SampleMaterial.lc 1895:15-1895:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1895:15-1896:36
+1895:15-1896:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1895:15-1897:50
+1895:15-1897:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1895:15-1898:42
+1895:15-1898:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1895:15-1899:36
+1895:15-1899:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1895:15-1900:31
+1895:15-1900:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1895:15-1901:78
+1895:15-1901:78
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1895:15-1902:38
+1895:15-1902:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1895:15-1903:41
+1895:15-1903:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1895:15-1904:40
+1895:15-1904:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1895:15-1905:46
+1895:15-1905:46
     String -> StageAttrs
-SampleMaterial.lc 1895:15-1907:18
+1895:15-1907:18
     StageAttrs
-SampleMaterial.lc 1896:29-1896:36
+1896:29-1896:36
     forall a . Maybe a
-SampleMaterial.lc 1897:30-1897:50
+1897:30-1897:50
     RGBGen
-SampleMaterial.lc 1898:32-1898:42
+1898:32-1898:42
     AlphaGen
-SampleMaterial.lc 1899:29-1899:36
+1899:29-1899:36
     TCGen
-SampleMaterial.lc 1900:29-1900:31
+1900:29-1900:31
     forall a . [a]
-SampleMaterial.lc 1901:31-1901:37
+1901:31-1901:37
     String -> StageTexture
-SampleMaterial.lc 1901:31-1901:78
+1901:31-1901:78
     StageTexture
-SampleMaterial.lc 1901:38-1901:78
+1901:38-1901:78
     String
-SampleMaterial.lc 1902:34-1902:38
+1902:34-1902:38
     Bool
-SampleMaterial.lc 1903:33-1903:41
+1903:33-1903:41
     DepthFunction
-SampleMaterial.lc 1904:33-1904:40
+1904:33-1904:40
     forall a . Maybe a
-SampleMaterial.lc 1905:41-1905:46
+1905:41-1905:46
     Bool
-SampleMaterial.lc 1906:38-1906:54
+1906:38-1906:54
     String
-SampleMaterial.lc 1908:15-1908:25
+1908:15-1908:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -13744,82 +13744,82 @@ SampleMaterial.lc 1908:15-1908:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1908:15-1909:57
+1908:15-1909:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1908:15-1910:50
+1908:15-1910:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1908:15-1911:42
+1908:15-1911:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1908:15-1912:40
+1908:15-1912:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1908:15-1913:31
+1908:15-1913:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1908:15-1914:42
+1908:15-1914:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1908:15-1915:38
+1908:15-1915:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1908:15-1916:41
+1908:15-1916:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1908:15-1917:40
+1908:15-1917:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1908:15-1918:46
+1908:15-1918:46
     String -> StageAttrs
-SampleMaterial.lc 1908:15-1920:18
+1908:15-1920:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1909:29-1909:33
+1909:29-1909:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1909:29-1909:57
+1909:29-1909:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1909:34-1909:57
+1909:34-1909:57
     (Blending', Blending')
-SampleMaterial.lc 1909:36-1909:46
+1909:36-1909:46
     Blending'
-SampleMaterial.lc 1909:49-1909:55
+1909:49-1909:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1910:30-1910:50
+1910:30-1910:50
     RGBGen
-SampleMaterial.lc 1911:32-1911:42
+1911:32-1911:42
     AlphaGen
-SampleMaterial.lc 1912:29-1912:40
+1912:29-1912:40
     TCGen
-SampleMaterial.lc 1913:29-1913:31
+1913:29-1913:31
     forall a . [a]
-SampleMaterial.lc 1914:31-1914:42
+1914:31-1914:42
     StageTexture
-SampleMaterial.lc 1915:34-1915:38
+1915:34-1915:38
     Bool
-SampleMaterial.lc 1916:33-1916:41
+1916:33-1916:41
     DepthFunction
-SampleMaterial.lc 1917:33-1917:40
+1917:33-1917:40
     forall a . Maybe a
-SampleMaterial.lc 1918:41-1918:46
+1918:41-1918:46
     Bool
-SampleMaterial.lc 1919:38-1919:54
+1919:38-1919:54
     String
-SampleMaterial.lc 1922:21-1922:26
+1922:21-1922:26
     Bool
-SampleMaterial.lc 1925:5-1967:6
+1925:5-1967:6
     (String, CommonAttrs)
-SampleMaterial.lc 1925:5-2182:6
+1925:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1925:7-1925:38
+1925:7-1925:38
     String
-SampleMaterial.lc 1926:7-1926:18
+1926:7-1926:18
     ()
       -> ()
         -> Bool
@@ -13827,68 +13827,68 @@ SampleMaterial.lc 1926:7-1926:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1926:7-1927:26
+1926:7-1927:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1926:7-1928:26
+1926:7-1928:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1926:7-1929:27
+1926:7-1929:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1926:7-1930:21
+1926:7-1930:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1926:7-1931:35
+1926:7-1931:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1926:7-1932:28
+1926:7-1932:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1926:7-1933:33
+1926:7-1933:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1926:7-1934:32
+1926:7-1934:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1926:7-1935:30
+1926:7-1935:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1926:7-1936:34
+1926:7-1936:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1926:7-1964:14
+1926:7-1964:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1926:7-1966:10
+1926:7-1966:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1927:24-1927:26
+1927:24-1927:26
     ()
-SampleMaterial.lc 1928:24-1928:26
+1928:24-1928:26
     ()
-SampleMaterial.lc 1929:22-1929:27
+1929:22-1929:27
     Bool
-SampleMaterial.lc 1930:20-1930:21
+1930:20-1930:21
     _b
-SampleMaterial.lc 1931:30-1931:35
+1931:30-1931:35
     Bool
-SampleMaterial.lc 1932:23-1932:28
+1932:23-1932:28
     Bool
-SampleMaterial.lc 1933:20-1933:33
+1933:20-1933:33
     CullType
-SampleMaterial.lc 1934:30-1934:32
+1934:30-1934:32
     forall a . [a]
-SampleMaterial.lc 1935:25-1935:30
+1935:25-1935:30
     Bool
-SampleMaterial.lc 1936:29-1936:34
+1936:29-1936:34
     Bool
-SampleMaterial.lc 1938:13-1964:14
+1938:13-1964:14
     [StageAttrs]
-SampleMaterial.lc 1938:15-1938:25
+1938:15-1938:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -13896,70 +13896,70 @@ SampleMaterial.lc 1938:15-1938:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1938:15-1939:36
+1938:15-1939:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1938:15-1940:50
+1938:15-1940:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1938:15-1941:42
+1938:15-1941:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1938:15-1942:36
+1938:15-1942:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1938:15-1943:31
+1938:15-1943:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1938:15-1944:69
+1938:15-1944:69
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1938:15-1945:38
+1938:15-1945:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1938:15-1946:41
+1938:15-1946:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1938:15-1947:40
+1938:15-1947:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1938:15-1948:46
+1938:15-1948:46
     String -> StageAttrs
-SampleMaterial.lc 1938:15-1950:18
+1938:15-1950:18
     StageAttrs
-SampleMaterial.lc 1939:29-1939:36
+1939:29-1939:36
     forall a . Maybe a
-SampleMaterial.lc 1940:30-1940:50
+1940:30-1940:50
     RGBGen
-SampleMaterial.lc 1941:32-1941:42
+1941:32-1941:42
     AlphaGen
-SampleMaterial.lc 1942:29-1942:36
+1942:29-1942:36
     TCGen
-SampleMaterial.lc 1943:29-1943:31
+1943:29-1943:31
     forall a . [a]
-SampleMaterial.lc 1944:31-1944:37
+1944:31-1944:37
     String -> StageTexture
-SampleMaterial.lc 1944:31-1944:69
+1944:31-1944:69
     StageTexture
-SampleMaterial.lc 1944:38-1944:69
+1944:38-1944:69
     String
-SampleMaterial.lc 1945:34-1945:38
+1945:34-1945:38
     Bool
-SampleMaterial.lc 1946:33-1946:41
+1946:33-1946:41
     DepthFunction
-SampleMaterial.lc 1947:33-1947:40
+1947:33-1947:40
     forall a . Maybe a
-SampleMaterial.lc 1948:41-1948:46
+1948:41-1948:46
     Bool
-SampleMaterial.lc 1949:38-1949:54
+1949:38-1949:54
     String
-SampleMaterial.lc 1951:15-1951:25
+1951:15-1951:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -13967,82 +13967,82 @@ SampleMaterial.lc 1951:15-1951:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1951:15-1952:57
+1951:15-1952:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1951:15-1953:50
+1951:15-1953:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1951:15-1954:42
+1951:15-1954:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1951:15-1955:40
+1951:15-1955:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1951:15-1956:31
+1951:15-1956:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1951:15-1957:42
+1951:15-1957:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1951:15-1958:38
+1951:15-1958:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1951:15-1959:41
+1951:15-1959:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1951:15-1960:40
+1951:15-1960:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1951:15-1961:46
+1951:15-1961:46
     String -> StageAttrs
-SampleMaterial.lc 1951:15-1963:18
+1951:15-1963:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1952:29-1952:33
+1952:29-1952:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1952:29-1952:57
+1952:29-1952:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1952:34-1952:57
+1952:34-1952:57
     (Blending', Blending')
-SampleMaterial.lc 1952:36-1952:46
+1952:36-1952:46
     Blending'
-SampleMaterial.lc 1952:49-1952:55
+1952:49-1952:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1953:30-1953:50
+1953:30-1953:50
     RGBGen
-SampleMaterial.lc 1954:32-1954:42
+1954:32-1954:42
     AlphaGen
-SampleMaterial.lc 1955:29-1955:40
+1955:29-1955:40
     TCGen
-SampleMaterial.lc 1956:29-1956:31
+1956:29-1956:31
     forall a . [a]
-SampleMaterial.lc 1957:31-1957:42
+1957:31-1957:42
     StageTexture
-SampleMaterial.lc 1958:34-1958:38
+1958:34-1958:38
     Bool
-SampleMaterial.lc 1959:33-1959:41
+1959:33-1959:41
     DepthFunction
-SampleMaterial.lc 1960:33-1960:40
+1960:33-1960:40
     forall a . Maybe a
-SampleMaterial.lc 1961:41-1961:46
+1961:41-1961:46
     Bool
-SampleMaterial.lc 1962:38-1962:54
+1962:38-1962:54
     String
-SampleMaterial.lc 1965:21-1965:26
+1965:21-1965:26
     Bool
-SampleMaterial.lc 1968:5-2010:6
+1968:5-2010:6
     (String, CommonAttrs)
-SampleMaterial.lc 1968:5-2182:6
+1968:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 1968:7-1968:43
+1968:7-1968:43
     String
-SampleMaterial.lc 1969:7-1969:18
+1969:7-1969:18
     ()
       -> ()
         -> Bool
@@ -14050,68 +14050,68 @@ SampleMaterial.lc 1969:7-1969:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1969:7-1970:26
+1969:7-1970:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1969:7-1971:26
+1969:7-1971:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1969:7-1972:27
+1969:7-1972:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1969:7-1973:21
+1969:7-1973:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1969:7-1974:35
+1969:7-1974:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1969:7-1975:28
+1969:7-1975:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1969:7-1976:33
+1969:7-1976:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1969:7-1977:32
+1969:7-1977:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1969:7-1978:30
+1969:7-1978:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1969:7-1979:34
+1969:7-1979:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 1969:7-2007:14
+1969:7-2007:14
     Bool -> CommonAttrs
-SampleMaterial.lc 1969:7-2009:10
+1969:7-2009:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 1970:24-1970:26
+1970:24-1970:26
     ()
-SampleMaterial.lc 1971:24-1971:26
+1971:24-1971:26
     ()
-SampleMaterial.lc 1972:22-1972:27
+1972:22-1972:27
     Bool
-SampleMaterial.lc 1973:20-1973:21
+1973:20-1973:21
     _b
-SampleMaterial.lc 1974:30-1974:35
+1974:30-1974:35
     Bool
-SampleMaterial.lc 1975:23-1975:28
+1975:23-1975:28
     Bool
-SampleMaterial.lc 1976:20-1976:33
+1976:20-1976:33
     CullType
-SampleMaterial.lc 1977:30-1977:32
+1977:30-1977:32
     forall a . [a]
-SampleMaterial.lc 1978:25-1978:30
+1978:25-1978:30
     Bool
-SampleMaterial.lc 1979:29-1979:34
+1979:29-1979:34
     Bool
-SampleMaterial.lc 1981:13-2007:14
+1981:13-2007:14
     [StageAttrs]
-SampleMaterial.lc 1981:15-1981:25
+1981:15-1981:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -14119,70 +14119,70 @@ SampleMaterial.lc 1981:15-1981:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1981:15-1982:36
+1981:15-1982:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1981:15-1983:50
+1981:15-1983:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1981:15-1984:42
+1981:15-1984:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1981:15-1985:36
+1981:15-1985:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1981:15-1986:31
+1981:15-1986:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1981:15-1987:74
+1981:15-1987:74
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1981:15-1988:38
+1981:15-1988:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1981:15-1989:41
+1981:15-1989:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1981:15-1990:40
+1981:15-1990:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1981:15-1991:46
+1981:15-1991:46
     String -> StageAttrs
-SampleMaterial.lc 1981:15-1993:18
+1981:15-1993:18
     StageAttrs
-SampleMaterial.lc 1982:29-1982:36
+1982:29-1982:36
     forall a . Maybe a
-SampleMaterial.lc 1983:30-1983:50
+1983:30-1983:50
     RGBGen
-SampleMaterial.lc 1984:32-1984:42
+1984:32-1984:42
     AlphaGen
-SampleMaterial.lc 1985:29-1985:36
+1985:29-1985:36
     TCGen
-SampleMaterial.lc 1986:29-1986:31
+1986:29-1986:31
     forall a . [a]
-SampleMaterial.lc 1987:31-1987:37
+1987:31-1987:37
     String -> StageTexture
-SampleMaterial.lc 1987:31-1987:74
+1987:31-1987:74
     StageTexture
-SampleMaterial.lc 1987:38-1987:74
+1987:38-1987:74
     String
-SampleMaterial.lc 1988:34-1988:38
+1988:34-1988:38
     Bool
-SampleMaterial.lc 1989:33-1989:41
+1989:33-1989:41
     DepthFunction
-SampleMaterial.lc 1990:33-1990:40
+1990:33-1990:40
     forall a . Maybe a
-SampleMaterial.lc 1991:41-1991:46
+1991:41-1991:46
     Bool
-SampleMaterial.lc 1992:38-1992:53
+1992:38-1992:53
     String
-SampleMaterial.lc 1994:15-1994:25
+1994:15-1994:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -14190,82 +14190,82 @@ SampleMaterial.lc 1994:15-1994:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1994:15-1995:57
+1994:15-1995:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1994:15-1996:50
+1994:15-1996:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1994:15-1997:42
+1994:15-1997:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1994:15-1998:40
+1994:15-1998:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1994:15-1999:31
+1994:15-1999:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1994:15-2000:42
+1994:15-2000:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1994:15-2001:38
+1994:15-2001:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1994:15-2002:41
+1994:15-2002:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 1994:15-2003:40
+1994:15-2003:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 1994:15-2004:46
+1994:15-2004:46
     String -> StageAttrs
-SampleMaterial.lc 1994:15-2006:18
+1994:15-2006:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 1995:29-1995:33
+1995:29-1995:33
     forall a . a -> Maybe a
-SampleMaterial.lc 1995:29-1995:57
+1995:29-1995:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 1995:34-1995:57
+1995:34-1995:57
     (Blending', Blending')
-SampleMaterial.lc 1995:36-1995:46
+1995:36-1995:46
     Blending'
-SampleMaterial.lc 1995:49-1995:55
+1995:49-1995:55
     Blending' | ((Blending'))
-SampleMaterial.lc 1996:30-1996:50
+1996:30-1996:50
     RGBGen
-SampleMaterial.lc 1997:32-1997:42
+1997:32-1997:42
     AlphaGen
-SampleMaterial.lc 1998:29-1998:40
+1998:29-1998:40
     TCGen
-SampleMaterial.lc 1999:29-1999:31
+1999:29-1999:31
     forall a . [a]
-SampleMaterial.lc 2000:31-2000:42
+2000:31-2000:42
     StageTexture
-SampleMaterial.lc 2001:34-2001:38
+2001:34-2001:38
     Bool
-SampleMaterial.lc 2002:33-2002:41
+2002:33-2002:41
     DepthFunction
-SampleMaterial.lc 2003:33-2003:40
+2003:33-2003:40
     forall a . Maybe a
-SampleMaterial.lc 2004:41-2004:46
+2004:41-2004:46
     Bool
-SampleMaterial.lc 2005:38-2005:54
+2005:38-2005:54
     String
-SampleMaterial.lc 2008:21-2008:26
+2008:21-2008:26
     Bool
-SampleMaterial.lc 2011:5-2053:6
+2011:5-2053:6
     (String, CommonAttrs)
-SampleMaterial.lc 2011:5-2182:6
+2011:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 2011:7-2011:36
+2011:7-2011:36
     String
-SampleMaterial.lc 2012:7-2012:18
+2012:7-2012:18
     ()
       -> ()
         -> Bool
@@ -14273,68 +14273,68 @@ SampleMaterial.lc 2012:7-2012:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2012:7-2013:26
+2012:7-2013:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2012:7-2014:26
+2012:7-2014:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2012:7-2015:27
+2012:7-2015:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2012:7-2016:21
+2012:7-2016:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2012:7-2017:35
+2012:7-2017:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2012:7-2018:28
+2012:7-2018:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2012:7-2019:33
+2012:7-2019:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2012:7-2020:32
+2012:7-2020:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2012:7-2021:30
+2012:7-2021:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2012:7-2022:34
+2012:7-2022:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2012:7-2050:14
+2012:7-2050:14
     Bool -> CommonAttrs
-SampleMaterial.lc 2012:7-2052:10
+2012:7-2052:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 2013:24-2013:26
+2013:24-2013:26
     ()
-SampleMaterial.lc 2014:24-2014:26
+2014:24-2014:26
     ()
-SampleMaterial.lc 2015:22-2015:27
+2015:22-2015:27
     Bool
-SampleMaterial.lc 2016:20-2016:21
+2016:20-2016:21
     _b
-SampleMaterial.lc 2017:30-2017:35
+2017:30-2017:35
     Bool
-SampleMaterial.lc 2018:23-2018:28
+2018:23-2018:28
     Bool
-SampleMaterial.lc 2019:20-2019:33
+2019:20-2019:33
     CullType
-SampleMaterial.lc 2020:30-2020:32
+2020:30-2020:32
     forall a . [a]
-SampleMaterial.lc 2021:25-2021:30
+2021:25-2021:30
     Bool
-SampleMaterial.lc 2022:29-2022:34
+2022:29-2022:34
     Bool
-SampleMaterial.lc 2024:13-2050:14
+2024:13-2050:14
     [StageAttrs]
-SampleMaterial.lc 2024:15-2024:25
+2024:15-2024:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -14342,70 +14342,70 @@ SampleMaterial.lc 2024:15-2024:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2024:15-2025:36
+2024:15-2025:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2024:15-2026:50
+2024:15-2026:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2024:15-2027:42
+2024:15-2027:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2024:15-2028:36
+2024:15-2028:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2024:15-2029:31
+2024:15-2029:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2024:15-2030:67
+2024:15-2030:67
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2024:15-2031:38
+2024:15-2031:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2024:15-2032:41
+2024:15-2032:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2024:15-2033:40
+2024:15-2033:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 2024:15-2034:46
+2024:15-2034:46
     String -> StageAttrs
-SampleMaterial.lc 2024:15-2036:18
+2024:15-2036:18
     StageAttrs
-SampleMaterial.lc 2025:29-2025:36
+2025:29-2025:36
     forall a . Maybe a
-SampleMaterial.lc 2026:30-2026:50
+2026:30-2026:50
     RGBGen
-SampleMaterial.lc 2027:32-2027:42
+2027:32-2027:42
     AlphaGen
-SampleMaterial.lc 2028:29-2028:36
+2028:29-2028:36
     TCGen
-SampleMaterial.lc 2029:29-2029:31
+2029:29-2029:31
     forall a . [a]
-SampleMaterial.lc 2030:31-2030:37
+2030:31-2030:37
     String -> StageTexture
-SampleMaterial.lc 2030:31-2030:67
+2030:31-2030:67
     StageTexture
-SampleMaterial.lc 2030:38-2030:67
+2030:38-2030:67
     String
-SampleMaterial.lc 2031:34-2031:38
+2031:34-2031:38
     Bool
-SampleMaterial.lc 2032:33-2032:41
+2032:33-2032:41
     DepthFunction
-SampleMaterial.lc 2033:33-2033:40
+2033:33-2033:40
     forall a . Maybe a
-SampleMaterial.lc 2034:41-2034:46
+2034:41-2034:46
     Bool
-SampleMaterial.lc 2035:38-2035:54
+2035:38-2035:54
     String
-SampleMaterial.lc 2037:15-2037:25
+2037:15-2037:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -14413,82 +14413,82 @@ SampleMaterial.lc 2037:15-2037:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2037:15-2038:57
+2037:15-2038:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2037:15-2039:50
+2037:15-2039:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2037:15-2040:42
+2037:15-2040:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2037:15-2041:40
+2037:15-2041:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2037:15-2042:31
+2037:15-2042:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2037:15-2043:42
+2037:15-2043:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2037:15-2044:38
+2037:15-2044:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2037:15-2045:41
+2037:15-2045:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2037:15-2046:40
+2037:15-2046:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 2037:15-2047:46
+2037:15-2047:46
     String -> StageAttrs
-SampleMaterial.lc 2037:15-2049:18
+2037:15-2049:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 2038:29-2038:33
+2038:29-2038:33
     forall a . a -> Maybe a
-SampleMaterial.lc 2038:29-2038:57
+2038:29-2038:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 2038:34-2038:57
+2038:34-2038:57
     (Blending', Blending')
-SampleMaterial.lc 2038:36-2038:46
+2038:36-2038:46
     Blending'
-SampleMaterial.lc 2038:49-2038:55
+2038:49-2038:55
     Blending' | ((Blending'))
-SampleMaterial.lc 2039:30-2039:50
+2039:30-2039:50
     RGBGen
-SampleMaterial.lc 2040:32-2040:42
+2040:32-2040:42
     AlphaGen
-SampleMaterial.lc 2041:29-2041:40
+2041:29-2041:40
     TCGen
-SampleMaterial.lc 2042:29-2042:31
+2042:29-2042:31
     forall a . [a]
-SampleMaterial.lc 2043:31-2043:42
+2043:31-2043:42
     StageTexture
-SampleMaterial.lc 2044:34-2044:38
+2044:34-2044:38
     Bool
-SampleMaterial.lc 2045:33-2045:41
+2045:33-2045:41
     DepthFunction
-SampleMaterial.lc 2046:33-2046:40
+2046:33-2046:40
     forall a . Maybe a
-SampleMaterial.lc 2047:41-2047:46
+2047:41-2047:46
     Bool
-SampleMaterial.lc 2048:38-2048:54
+2048:38-2048:54
     String
-SampleMaterial.lc 2051:21-2051:26
+2051:21-2051:26
     Bool
-SampleMaterial.lc 2054:5-2096:6
+2054:5-2096:6
     (String, CommonAttrs)
-SampleMaterial.lc 2054:5-2182:6
+2054:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 2054:7-2054:40
+2054:7-2054:40
     String
-SampleMaterial.lc 2055:7-2055:18
+2055:7-2055:18
     ()
       -> ()
         -> Bool
@@ -14496,68 +14496,68 @@ SampleMaterial.lc 2055:7-2055:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2055:7-2056:26
+2055:7-2056:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2055:7-2057:26
+2055:7-2057:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2055:7-2058:27
+2055:7-2058:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2055:7-2059:21
+2055:7-2059:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2055:7-2060:35
+2055:7-2060:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2055:7-2061:28
+2055:7-2061:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2055:7-2062:33
+2055:7-2062:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2055:7-2063:32
+2055:7-2063:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2055:7-2064:30
+2055:7-2064:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2055:7-2065:34
+2055:7-2065:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2055:7-2093:14
+2055:7-2093:14
     Bool -> CommonAttrs
-SampleMaterial.lc 2055:7-2095:10
+2055:7-2095:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 2056:24-2056:26
+2056:24-2056:26
     ()
-SampleMaterial.lc 2057:24-2057:26
+2057:24-2057:26
     ()
-SampleMaterial.lc 2058:22-2058:27
+2058:22-2058:27
     Bool
-SampleMaterial.lc 2059:20-2059:21
+2059:20-2059:21
     _b
-SampleMaterial.lc 2060:30-2060:35
+2060:30-2060:35
     Bool
-SampleMaterial.lc 2061:23-2061:28
+2061:23-2061:28
     Bool
-SampleMaterial.lc 2062:20-2062:33
+2062:20-2062:33
     CullType
-SampleMaterial.lc 2063:30-2063:32
+2063:30-2063:32
     forall a . [a]
-SampleMaterial.lc 2064:25-2064:30
+2064:25-2064:30
     Bool
-SampleMaterial.lc 2065:29-2065:34
+2065:29-2065:34
     Bool
-SampleMaterial.lc 2067:13-2093:14
+2067:13-2093:14
     [StageAttrs]
-SampleMaterial.lc 2067:15-2067:25
+2067:15-2067:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -14565,70 +14565,70 @@ SampleMaterial.lc 2067:15-2067:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2067:15-2068:36
+2067:15-2068:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2067:15-2069:50
+2067:15-2069:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2067:15-2070:42
+2067:15-2070:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2067:15-2071:36
+2067:15-2071:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2067:15-2072:31
+2067:15-2072:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2067:15-2073:71
+2067:15-2073:71
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2067:15-2074:38
+2067:15-2074:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2067:15-2075:41
+2067:15-2075:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2067:15-2076:40
+2067:15-2076:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 2067:15-2077:46
+2067:15-2077:46
     String -> StageAttrs
-SampleMaterial.lc 2067:15-2079:18
+2067:15-2079:18
     StageAttrs
-SampleMaterial.lc 2068:29-2068:36
+2068:29-2068:36
     forall a . Maybe a
-SampleMaterial.lc 2069:30-2069:50
+2069:30-2069:50
     RGBGen
-SampleMaterial.lc 2070:32-2070:42
+2070:32-2070:42
     AlphaGen
-SampleMaterial.lc 2071:29-2071:36
+2071:29-2071:36
     TCGen
-SampleMaterial.lc 2072:29-2072:31
+2072:29-2072:31
     forall a . [a]
-SampleMaterial.lc 2073:31-2073:37
+2073:31-2073:37
     String -> StageTexture
-SampleMaterial.lc 2073:31-2073:71
+2073:31-2073:71
     StageTexture
-SampleMaterial.lc 2073:38-2073:71
+2073:38-2073:71
     String
-SampleMaterial.lc 2074:34-2074:38
+2074:34-2074:38
     Bool
-SampleMaterial.lc 2075:33-2075:41
+2075:33-2075:41
     DepthFunction
-SampleMaterial.lc 2076:33-2076:40
+2076:33-2076:40
     forall a . Maybe a
-SampleMaterial.lc 2077:41-2077:46
+2077:41-2077:46
     Bool
-SampleMaterial.lc 2078:38-2078:54
+2078:38-2078:54
     String
-SampleMaterial.lc 2080:15-2080:25
+2080:15-2080:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -14636,82 +14636,82 @@ SampleMaterial.lc 2080:15-2080:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2080:15-2081:57
+2080:15-2081:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2080:15-2082:50
+2080:15-2082:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2080:15-2083:42
+2080:15-2083:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2080:15-2084:40
+2080:15-2084:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2080:15-2085:31
+2080:15-2085:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2080:15-2086:42
+2080:15-2086:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2080:15-2087:38
+2080:15-2087:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2080:15-2088:41
+2080:15-2088:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2080:15-2089:40
+2080:15-2089:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 2080:15-2090:46
+2080:15-2090:46
     String -> StageAttrs
-SampleMaterial.lc 2080:15-2092:18
+2080:15-2092:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 2081:29-2081:33
+2081:29-2081:33
     forall a . a -> Maybe a
-SampleMaterial.lc 2081:29-2081:57
+2081:29-2081:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 2081:34-2081:57
+2081:34-2081:57
     (Blending', Blending')
-SampleMaterial.lc 2081:36-2081:46
+2081:36-2081:46
     Blending'
-SampleMaterial.lc 2081:49-2081:55
+2081:49-2081:55
     Blending' | ((Blending'))
-SampleMaterial.lc 2082:30-2082:50
+2082:30-2082:50
     RGBGen
-SampleMaterial.lc 2083:32-2083:42
+2083:32-2083:42
     AlphaGen
-SampleMaterial.lc 2084:29-2084:40
+2084:29-2084:40
     TCGen
-SampleMaterial.lc 2085:29-2085:31
+2085:29-2085:31
     forall a . [a]
-SampleMaterial.lc 2086:31-2086:42
+2086:31-2086:42
     StageTexture
-SampleMaterial.lc 2087:34-2087:38
+2087:34-2087:38
     Bool
-SampleMaterial.lc 2088:33-2088:41
+2088:33-2088:41
     DepthFunction
-SampleMaterial.lc 2089:33-2089:40
+2089:33-2089:40
     forall a . Maybe a
-SampleMaterial.lc 2090:41-2090:46
+2090:41-2090:46
     Bool
-SampleMaterial.lc 2091:38-2091:54
+2091:38-2091:54
     String
-SampleMaterial.lc 2094:21-2094:26
+2094:21-2094:26
     Bool
-SampleMaterial.lc 2097:5-2139:6
+2097:5-2139:6
     (String, CommonAttrs)
-SampleMaterial.lc 2097:5-2182:6
+2097:5-2182:6
     [(String, CommonAttrs)]
-SampleMaterial.lc 2097:7-2097:50
+2097:7-2097:50
     String
-SampleMaterial.lc 2098:7-2098:18
+2098:7-2098:18
     ()
       -> ()
         -> Bool
@@ -14719,68 +14719,68 @@ SampleMaterial.lc 2098:7-2098:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2098:7-2099:26
+2098:7-2099:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2098:7-2100:26
+2098:7-2100:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2098:7-2101:27
+2098:7-2101:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2098:7-2102:21
+2098:7-2102:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2098:7-2103:35
+2098:7-2103:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2098:7-2104:28
+2098:7-2104:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2098:7-2105:33
+2098:7-2105:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2098:7-2106:32
+2098:7-2106:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2098:7-2107:30
+2098:7-2107:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2098:7-2108:34
+2098:7-2108:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2098:7-2136:14
+2098:7-2136:14
     Bool -> CommonAttrs
-SampleMaterial.lc 2098:7-2138:10
+2098:7-2138:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 2099:24-2099:26
+2099:24-2099:26
     ()
-SampleMaterial.lc 2100:24-2100:26
+2100:24-2100:26
     ()
-SampleMaterial.lc 2101:22-2101:27
+2101:22-2101:27
     Bool
-SampleMaterial.lc 2102:20-2102:21
+2102:20-2102:21
     _b
-SampleMaterial.lc 2103:30-2103:35
+2103:30-2103:35
     Bool
-SampleMaterial.lc 2104:23-2104:28
+2104:23-2104:28
     Bool
-SampleMaterial.lc 2105:20-2105:33
+2105:20-2105:33
     CullType
-SampleMaterial.lc 2106:30-2106:32
+2106:30-2106:32
     forall a . [a]
-SampleMaterial.lc 2107:25-2107:30
+2107:25-2107:30
     Bool
-SampleMaterial.lc 2108:29-2108:34
+2108:29-2108:34
     Bool
-SampleMaterial.lc 2110:13-2136:14
+2110:13-2136:14
     [StageAttrs]
-SampleMaterial.lc 2110:15-2110:25
+2110:15-2110:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -14788,70 +14788,70 @@ SampleMaterial.lc 2110:15-2110:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2110:15-2111:36
+2110:15-2111:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2110:15-2112:50
+2110:15-2112:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2110:15-2113:42
+2110:15-2113:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2110:15-2114:36
+2110:15-2114:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2110:15-2115:31
+2110:15-2115:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2110:15-2116:81
+2110:15-2116:81
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2110:15-2117:38
+2110:15-2117:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2110:15-2118:41
+2110:15-2118:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2110:15-2119:40
+2110:15-2119:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 2110:15-2120:46
+2110:15-2120:46
     String -> StageAttrs
-SampleMaterial.lc 2110:15-2122:18
+2110:15-2122:18
     StageAttrs
-SampleMaterial.lc 2111:29-2111:36
+2111:29-2111:36
     forall a . Maybe a
-SampleMaterial.lc 2112:30-2112:50
+2112:30-2112:50
     RGBGen
-SampleMaterial.lc 2113:32-2113:42
+2113:32-2113:42
     AlphaGen
-SampleMaterial.lc 2114:29-2114:36
+2114:29-2114:36
     TCGen
-SampleMaterial.lc 2115:29-2115:31
+2115:29-2115:31
     forall a . [a]
-SampleMaterial.lc 2116:31-2116:37
+2116:31-2116:37
     String -> StageTexture
-SampleMaterial.lc 2116:31-2116:81
+2116:31-2116:81
     StageTexture
-SampleMaterial.lc 2116:38-2116:81
+2116:38-2116:81
     String
-SampleMaterial.lc 2117:34-2117:38
+2117:34-2117:38
     Bool
-SampleMaterial.lc 2118:33-2118:41
+2118:33-2118:41
     DepthFunction
-SampleMaterial.lc 2119:33-2119:40
+2119:33-2119:40
     forall a . Maybe a
-SampleMaterial.lc 2120:41-2120:46
+2120:41-2120:46
     Bool
-SampleMaterial.lc 2121:38-2121:53
+2121:38-2121:53
     String
-SampleMaterial.lc 2123:15-2123:25
+2123:15-2123:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -14859,80 +14859,80 @@ SampleMaterial.lc 2123:15-2123:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2123:15-2124:57
+2123:15-2124:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2123:15-2125:50
+2123:15-2125:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2123:15-2126:42
+2123:15-2126:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2123:15-2127:40
+2123:15-2127:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2123:15-2128:31
+2123:15-2128:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2123:15-2129:42
+2123:15-2129:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2123:15-2130:38
+2123:15-2130:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2123:15-2131:41
+2123:15-2131:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2123:15-2132:40
+2123:15-2132:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 2123:15-2133:46
+2123:15-2133:46
     String -> StageAttrs
-SampleMaterial.lc 2123:15-2135:18
+2123:15-2135:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 2124:29-2124:33
+2124:29-2124:33
     forall a . a -> Maybe a
-SampleMaterial.lc 2124:29-2124:57
+2124:29-2124:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 2124:34-2124:57
+2124:34-2124:57
     (Blending', Blending')
-SampleMaterial.lc 2124:36-2124:46
+2124:36-2124:46
     Blending'
-SampleMaterial.lc 2124:49-2124:55
+2124:49-2124:55
     Blending' | ((Blending'))
-SampleMaterial.lc 2125:30-2125:50
+2125:30-2125:50
     RGBGen
-SampleMaterial.lc 2126:32-2126:42
+2126:32-2126:42
     AlphaGen
-SampleMaterial.lc 2127:29-2127:40
+2127:29-2127:40
     TCGen
-SampleMaterial.lc 2128:29-2128:31
+2128:29-2128:31
     forall a . [a]
-SampleMaterial.lc 2129:31-2129:42
+2129:31-2129:42
     StageTexture
-SampleMaterial.lc 2130:34-2130:38
+2130:34-2130:38
     Bool
-SampleMaterial.lc 2131:33-2131:41
+2131:33-2131:41
     DepthFunction
-SampleMaterial.lc 2132:33-2132:40
+2132:33-2132:40
     forall a . Maybe a
-SampleMaterial.lc 2133:41-2133:46
+2133:41-2133:46
     Bool
-SampleMaterial.lc 2134:38-2134:54
+2134:38-2134:54
     String
-SampleMaterial.lc 2137:21-2137:26
+2137:21-2137:26
     Bool
-SampleMaterial.lc 2140:5-2182:6
+2140:5-2182:6
     (String, CommonAttrs) | [(String, CommonAttrs)]
-SampleMaterial.lc 2140:7-2140:50
+2140:7-2140:50
     String
-SampleMaterial.lc 2141:7-2141:18
+2141:7-2141:18
     ()
       -> ()
         -> Bool
@@ -14940,68 +14940,68 @@ SampleMaterial.lc 2141:7-2141:18
             -> Bool
               -> Bool
                 -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2141:7-2142:26
+2141:7-2142:26
     ()
       -> Bool
         -> Float
           -> Bool
             -> Bool
               -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2141:7-2143:26
+2141:7-2143:26
     Bool
       -> Float
         -> Bool
           -> Bool
             -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2141:7-2144:27
+2141:7-2144:27
     Float
       -> Bool
         -> Bool
           -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2141:7-2145:21
+2141:7-2145:21
     Bool
       -> Bool
         -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2141:7-2146:35
+2141:7-2146:35
     Bool
       -> CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2141:7-2147:28
+2141:7-2147:28
     CullType -> [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2141:7-2148:33
+2141:7-2148:33
     [Deform] -> Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2141:7-2149:32
+2141:7-2149:32
     Bool -> Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2141:7-2150:30
+2141:7-2150:30
     Bool -> [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2141:7-2151:34
+2141:7-2151:34
     [StageAttrs] -> Bool -> CommonAttrs
-SampleMaterial.lc 2141:7-2179:14
+2141:7-2179:14
     Bool -> CommonAttrs
-SampleMaterial.lc 2141:7-2181:10
+2141:7-2181:10
     CommonAttrs | ((CommonAttrs))
-SampleMaterial.lc 2142:24-2142:26
+2142:24-2142:26
     ()
-SampleMaterial.lc 2143:24-2143:26
+2143:24-2143:26
     ()
-SampleMaterial.lc 2144:22-2144:27
+2144:22-2144:27
     Bool
-SampleMaterial.lc 2145:20-2145:21
+2145:20-2145:21
     _b
-SampleMaterial.lc 2146:30-2146:35
+2146:30-2146:35
     Bool
-SampleMaterial.lc 2147:23-2147:28
+2147:23-2147:28
     Bool
-SampleMaterial.lc 2148:20-2148:33
+2148:20-2148:33
     CullType
-SampleMaterial.lc 2149:30-2149:32
+2149:30-2149:32
     forall a . [a]
-SampleMaterial.lc 2150:25-2150:30
+2150:25-2150:30
     Bool
-SampleMaterial.lc 2151:29-2151:34
+2151:29-2151:34
     Bool
-SampleMaterial.lc 2153:13-2179:14
+2153:13-2179:14
     [StageAttrs]
-SampleMaterial.lc 2153:15-2153:25
+2153:15-2153:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -15009,70 +15009,70 @@ SampleMaterial.lc 2153:15-2153:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2153:15-2154:36
+2153:15-2154:36
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2153:15-2155:50
+2153:15-2155:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2153:15-2156:42
+2153:15-2156:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2153:15-2157:36
+2153:15-2157:36
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2153:15-2158:31
+2153:15-2158:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2153:15-2159:81
+2153:15-2159:81
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2153:15-2160:38
+2153:15-2160:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2153:15-2161:41
+2153:15-2161:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2153:15-2162:40
+2153:15-2162:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 2153:15-2163:46
+2153:15-2163:46
     String -> StageAttrs
-SampleMaterial.lc 2153:15-2165:18
+2153:15-2165:18
     StageAttrs
-SampleMaterial.lc 2154:29-2154:36
+2154:29-2154:36
     forall a . Maybe a
-SampleMaterial.lc 2155:30-2155:50
+2155:30-2155:50
     RGBGen
-SampleMaterial.lc 2156:32-2156:42
+2156:32-2156:42
     AlphaGen
-SampleMaterial.lc 2157:29-2157:36
+2157:29-2157:36
     TCGen
-SampleMaterial.lc 2158:29-2158:31
+2158:29-2158:31
     forall a . [a]
-SampleMaterial.lc 2159:31-2159:37
+2159:31-2159:37
     String -> StageTexture
-SampleMaterial.lc 2159:31-2159:81
+2159:31-2159:81
     StageTexture
-SampleMaterial.lc 2159:38-2159:81
+2159:38-2159:81
     String
-SampleMaterial.lc 2160:34-2160:38
+2160:34-2160:38
     Bool
-SampleMaterial.lc 2161:33-2161:41
+2161:33-2161:41
     DepthFunction
-SampleMaterial.lc 2162:33-2162:40
+2162:33-2162:40
     forall a . Maybe a
-SampleMaterial.lc 2163:41-2163:46
+2163:41-2163:46
     Bool
-SampleMaterial.lc 2164:38-2164:54
+2164:38-2164:54
     String
-SampleMaterial.lc 2166:15-2166:25
+2166:15-2166:25
     Maybe (Blending', Blending')
       -> RGBGen
         -> AlphaGen
@@ -15080,72 +15080,72 @@ SampleMaterial.lc 2166:15-2166:25
             -> [TCMod]
               -> StageTexture
                 -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2166:15-2167:57
+2166:15-2167:57
     RGBGen
       -> AlphaGen
         -> TCGen
           -> [TCMod]
             -> StageTexture
               -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2166:15-2168:50
+2166:15-2168:50
     AlphaGen
       -> TCGen
         -> [TCMod]
           -> StageTexture
             -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2166:15-2169:42
+2166:15-2169:42
     TCGen
       -> [TCMod]
         -> StageTexture
           -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2166:15-2170:40
+2166:15-2170:40
     [TCMod]
       -> StageTexture
         -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2166:15-2171:31
+2166:15-2171:31
     StageTexture
       -> Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2166:15-2172:42
+2166:15-2172:42
     Bool -> DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2166:15-2173:38
+2166:15-2173:38
     DepthFunction -> Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2166:15-2174:41
+2166:15-2174:41
     Maybe AlphaFunction -> Bool -> String -> StageAttrs
-SampleMaterial.lc 2166:15-2175:40
+2166:15-2175:40
     Bool -> String -> StageAttrs
-SampleMaterial.lc 2166:15-2176:46
+2166:15-2176:46
     String -> StageAttrs
-SampleMaterial.lc 2166:15-2178:18
+2166:15-2178:18
     StageAttrs | [StageAttrs]
-SampleMaterial.lc 2167:29-2167:33
+2167:29-2167:33
     forall a . a -> Maybe a
-SampleMaterial.lc 2167:29-2167:57
+2167:29-2167:57
     Maybe (Blending', Blending')
-SampleMaterial.lc 2167:34-2167:57
+2167:34-2167:57
     (Blending', Blending')
-SampleMaterial.lc 2167:36-2167:46
+2167:36-2167:46
     Blending'
-SampleMaterial.lc 2167:49-2167:55
+2167:49-2167:55
     Blending' | ((Blending'))
-SampleMaterial.lc 2168:30-2168:50
+2168:30-2168:50
     RGBGen
-SampleMaterial.lc 2169:32-2169:42
+2169:32-2169:42
     AlphaGen
-SampleMaterial.lc 2170:29-2170:40
+2170:29-2170:40
     TCGen
-SampleMaterial.lc 2171:29-2171:31
+2171:29-2171:31
     forall a . [a]
-SampleMaterial.lc 2172:31-2172:42
+2172:31-2172:42
     StageTexture
-SampleMaterial.lc 2173:34-2173:38
+2173:34-2173:38
     Bool
-SampleMaterial.lc 2174:33-2174:41
+2174:33-2174:41
     DepthFunction
-SampleMaterial.lc 2175:33-2175:40
+2175:33-2175:40
     forall a . Maybe a
-SampleMaterial.lc 2176:41-2176:46
+2176:41-2176:46
     Bool
-SampleMaterial.lc 2177:38-2177:54
+2177:38-2177:54
     String
-SampleMaterial.lc 2180:21-2180:26
+2180:21-2180:26
     Bool
\ No newline at end of file
diff --git a/testdata/primes.out b/testdata/primes.out
index 176f48ab..2bd162c9 100644
--- a/testdata/primes.out
+++ b/testdata/primes.out
@@ -194,358 +194,358 @@ takeWhile
       (\e f -> case'Bool (\_ -> [a]) (_rhs []) (_rhs (e : b c f)) (c e))
       d
 ------------ tooltips
-testdata/primes.lc 7:3-7:4
+7:3-7:4
     forall a b . (a -> b) -> a -> b
-testdata/primes.lc 7:9-7:10
+7:9-7:10
     _d
-testdata/primes.lc 7:11-7:12
+7:11-7:12
     _e
-testdata/primes.lc 9:1-9:3
+9:1-9:3
     forall a . a -> a
-testdata/primes.lc 9:8-9:9
+9:8-9:9
     _b
-testdata/primes.lc 11:1-11:6
+11:1-11:6
     forall a b . (b -> a -> a) -> a -> [b] -> a
-testdata/primes.lc 11:16-11:17
+11:16-11:17
     _f
-testdata/primes.lc 11:16-12:39
+11:16-12:39
     [_b] -> _f
-testdata/primes.lc 12:21-12:22
+12:21-12:22
     _k
-testdata/primes.lc 12:21-12:26
+12:21-12:26
     _b -> _a
-testdata/primes.lc 12:21-12:39
+12:21-12:39
     _h
-testdata/primes.lc 12:23-12:24
+12:23-12:24
     _h
-testdata/primes.lc 12:25-12:26
+12:25-12:26
     forall a b . (a -> b) -> a -> b
-testdata/primes.lc 12:27-12:32
+12:27-12:32
     _k
-testdata/primes.lc 12:33-12:34
+12:33-12:34
     _g -> _d -> _k
-testdata/primes.lc 12:35-12:36
+12:35-12:36
     _l
-testdata/primes.lc 12:37-12:39
+12:37-12:39
     [_h]
-testdata/primes.lc 19:1-19:7
+19:1-19:7
     forall a . (a -> Bool) -> [a] -> [a]
-testdata/primes.lc 19:12-19:17
+19:12-19:17
     forall a b . (b -> a -> a) -> a -> [b] -> a
-testdata/primes.lc 19:12-19:54
+19:12-19:54
     [_a] -> [_a] -> [_a]
-testdata/primes.lc 19:12-19:57
+19:12-19:57
     [_a] -> [_a]
-testdata/primes.lc 19:28-19:53
+19:28-19:53
     [_c]
-testdata/primes.lc 19:31-19:32
+19:31-19:32
     _g
-testdata/primes.lc 19:31-19:45
+19:31-19:45
     [_c] -> [_c]
-testdata/primes.lc 19:33-19:34
+19:33-19:34
     _g
-testdata/primes.lc 19:40-19:41
+19:40-19:41
     _e
-testdata/primes.lc 19:40-19:42
+19:40-19:42
     [_d] -> [_d]
-testdata/primes.lc 19:40-19:45
+19:40-19:45
     [_c]
-testdata/primes.lc 19:41-19:42
+19:41-19:42
     forall a . a -> [a] -> [a]
-testdata/primes.lc 19:43-19:45
+19:43-19:45
     _d
-testdata/primes.lc 19:51-19:53
+19:51-19:53
     [_c]
-testdata/primes.lc 19:55-19:57
+19:55-19:57
     forall a . [a]
-testdata/primes.lc 21:6-21:8
+21:6-21:8
     Bool -> Bool -> Bool
-testdata/primes.lc 21:13-21:14
+21:13-21:14
     _b
-testdata/primes.lc 21:13-22:19
+21:13-22:19
     Bool -> Bool
-testdata/primes.lc 22:14-22:19
+22:14-22:19
     Bool
-testdata/primes.lc 24:1-24:4
+24:1-24:4
     [Bool] -> Bool
-testdata/primes.lc 24:7-24:12
+24:7-24:12
     forall a b . (b -> a -> a) -> a -> [b] -> a
-testdata/primes.lc 24:7-24:17
+24:7-24:17
     Bool -> [Bool] -> Bool
-testdata/primes.lc 24:7-24:22
+24:7-24:22
     [Bool] -> Bool
-testdata/primes.lc 24:13-24:17
+24:13-24:17
     Bool -> Bool -> Bool
-testdata/primes.lc 24:18-24:22
+24:18-24:22
     Bool
-testdata/primes.lc 26:1-26:4
+26:1-26:4
     forall a b . (a -> b) -> [a] -> [b]
-testdata/primes.lc 26:9-26:14
+26:9-26:14
     forall a b . (b -> a -> a) -> a -> [b] -> a
-testdata/primes.lc 26:9-26:33
+26:9-26:33
     [_a] -> [_b] -> [_a]
-testdata/primes.lc 26:9-26:36
+26:9-26:36
     [_b] -> [_a]
-testdata/primes.lc 26:25-26:26
+26:25-26:26
     _g
-testdata/primes.lc 26:25-26:29
+26:25-26:29
     [_a] -> [_a]
-testdata/primes.lc 26:25-26:32
+26:25-26:32
     [_a]
-testdata/primes.lc 26:27-26:28
+26:27-26:28
     _g
-testdata/primes.lc 26:28-26:29
+26:28-26:29
     forall a . a -> [a] -> [a]
-testdata/primes.lc 26:30-26:32
+26:30-26:32
     [_a]
-testdata/primes.lc 26:34-26:36
+26:34-26:36
     forall a . [a]
-testdata/primes.lc 28:1-28:4
+28:1-28:4
     Int -> Int -> Int
-testdata/primes.lc 28:7-28:17
+28:7-28:17
     Int -> Int -> Int
-testdata/primes.lc 29:1-29:6
+29:1-29:6
     Int -> Int
-testdata/primes.lc 29:11-29:20
+29:11-29:20
     Float -> Int
-testdata/primes.lc 29:11-29:55
+29:11-29:55
     Int
-testdata/primes.lc 29:22-29:35
+29:22-29:35
     Float -> Float
-testdata/primes.lc 29:22-29:54
+29:22-29:54
     Float
-testdata/primes.lc 29:37-29:51
+29:37-29:51
     Int -> Float
-testdata/primes.lc 29:37-29:53
+29:37-29:53
     Float
-testdata/primes.lc 29:52-29:53
+29:52-29:53
     _b
-testdata/primes.lc 30:2-30:3
+30:2-30:3
     Int -> Int -> Int
-testdata/primes.lc 30:7-30:17
+30:7-30:17
     Int -> Int -> Int
-testdata/primes.lc 31:2-31:3
+31:2-31:3
     Int -> Int -> Int
-testdata/primes.lc 31:7-31:17
+31:7-31:17
     Int -> Int -> Int
-testdata/primes.lc 33:3-33:5
+33:3-33:5
     Int -> Int -> Bool
-testdata/primes.lc 33:10-35:14
+33:10-35:14
     Bool
-testdata/primes.lc 33:15-33:29
+33:15-33:29
     Int -> Int -> Ordering
-testdata/primes.lc 33:15-33:31
+33:15-33:31
     Int -> Ordering
-testdata/primes.lc 33:15-33:33
+33:15-33:33
     Ordering
-testdata/primes.lc 33:30-33:31
+33:30-33:31
     _d
-testdata/primes.lc 33:32-33:33
+33:32-33:33
     _b
-testdata/primes.lc 34:11-34:16
+34:11-34:16
     Bool
-testdata/primes.lc 34:11-35:14
+34:11-35:14
     Ordering -> Bool
-testdata/primes.lc 35:10-35:14
+35:10-35:14
     Bool | Bool
-testdata/primes.lc 37:1-37:4
+37:1-37:4
     Bool -> Bool
-testdata/primes.lc 37:13-37:17
+37:13-37:17
     Bool
-testdata/primes.lc 37:13-38:17
+37:13-38:17
     Bool -> Bool
-testdata/primes.lc 38:12-38:17
+38:12-38:17
     Bool
-testdata/primes.lc 40:3-40:5
+40:3-40:5
     forall a . Eq a => a -> a -> Bool
-testdata/primes.lc 40:10-40:13
+40:10-40:13
     Bool -> Bool
-testdata/primes.lc 40:10-40:15
+40:10-40:15
     Bool -> Bool
-testdata/primes.lc 40:10-40:22
+40:10-40:22
     Bool
-testdata/primes.lc 40:14-40:15
+40:14-40:15
     forall a b . (a -> b) -> a -> b
-testdata/primes.lc 40:16-40:17
+40:16-40:17
     _f
-testdata/primes.lc 40:16-40:20
+40:16-40:20
     _e -> Bool
-testdata/primes.lc 40:16-40:22
+40:16-40:22
     Bool
-testdata/primes.lc 40:18-40:20
+40:18-40:20
     forall a . Eq a => a -> a -> Bool
-testdata/primes.lc 40:21-40:22
+40:21-40:22
     _c
-testdata/primes.lc 42:1-42:10
+42:1-42:10
     forall a . (a -> Bool) -> [a] -> [a]
-testdata/primes.lc 42:23-42:24
+42:23-42:24
     _g
-testdata/primes.lc 42:23-43:19
+42:23-43:19
     [_c]
-testdata/primes.lc 42:25-42:26
+42:25-42:26
     _f
-testdata/primes.lc 42:29-42:30
+42:29-42:30
     _f
-testdata/primes.lc 42:29-42:31
+42:29-42:31
     [_e] -> [_e]
-testdata/primes.lc 42:29-42:46
+42:29-42:46
     [_d]
-testdata/primes.lc 42:29-43:19
+42:29-43:19
     Bool -> [_d]
-testdata/primes.lc 42:30-42:31
+42:30-42:31
     forall a . a -> [a] -> [a]
-testdata/primes.lc 42:32-42:41
+42:32-42:41
     _j
-testdata/primes.lc 42:42-42:43
+42:42-42:43
     _k
-testdata/primes.lc 42:44-42:46
+42:44-42:46
     [_h]
-testdata/primes.lc 43:17-43:19
+43:17-43:19
     forall a . [a] | forall a . [a]
-testdata/primes.lc 45:1-45:5
+45:1-45:5
     Int -> [Int]
-testdata/primes.lc 45:10-45:11
+45:10-45:11
     _c
-testdata/primes.lc 45:10-45:12
+45:10-45:12
     [_b] -> [_b]
-testdata/primes.lc 45:10-45:25
+45:10-45:25
     [Int]
-testdata/primes.lc 45:11-45:12
+45:11-45:12
     forall a . a -> [a] -> [a]
-testdata/primes.lc 45:13-45:17
+45:13-45:17
     _d
-testdata/primes.lc 45:19-45:20
+45:19-45:20
     _e
-testdata/primes.lc 45:19-45:22
+45:19-45:22
     Int -> Int
-testdata/primes.lc 45:19-45:24
+45:19-45:24
     Int
-testdata/primes.lc 45:21-45:22
+45:21-45:22
     Int -> Int -> Int
-testdata/primes.lc 45:23-45:24
+45:23-45:24
     _b
-testdata/primes.lc 47:11-47:16
+47:11-47:16
     Type
-testdata/primes.lc 47:12-47:15
+47:12-47:15
     Type
-testdata/primes.lc 48:1-48:7
+48:1-48:7
     [Int]
-testdata/primes.lc 48:10-48:11
+48:10-48:11
     _b
-testdata/primes.lc 48:10-48:12
+48:10-48:12
     [_b] -> [_b]
-testdata/primes.lc 48:10-48:111
+48:10-48:111
     [Int]
-testdata/primes.lc 48:11-48:12
+48:11-48:12
     forall a . a -> [a] -> [a]
-testdata/primes.lc 48:12-48:13
+48:12-48:13
     _b
-testdata/primes.lc 48:12-48:14
+48:12-48:14
     [_b] -> [_b]
-testdata/primes.lc 48:12-48:111
+48:12-48:111
     [Int]
-testdata/primes.lc 48:13-48:14
+48:13-48:14
     forall a . a -> [a] -> [a]
-testdata/primes.lc 48:15-48:21
+48:15-48:21
     forall a . (a -> Bool) -> [a] -> [a]
-testdata/primes.lc 48:15-48:102
+48:15-48:102
     [Int] -> [Int]
-testdata/primes.lc 48:15-48:111
+48:15-48:111
     [Int]
-testdata/primes.lc 48:29-48:32
+48:29-48:32
     [Bool] -> Bool
-testdata/primes.lc 48:29-48:34
+48:29-48:34
     [Bool] -> Bool
-testdata/primes.lc 48:29-48:101
+48:29-48:101
     Bool
-testdata/primes.lc 48:33-48:34
+48:33-48:34
     forall a b . (a -> b) -> a -> b
-testdata/primes.lc 48:35-48:38
+48:35-48:38
     forall a b . (a -> b) -> [a] -> [b]
-testdata/primes.lc 48:35-48:61
+48:35-48:61
     [Int] -> [Bool]
-testdata/primes.lc 48:35-48:101
+48:35-48:101
     [Bool]
-testdata/primes.lc 48:46-48:47
+48:46-48:47
     _g
-testdata/primes.lc 48:46-48:53
+48:46-48:53
     Int -> Int
-testdata/primes.lc 48:46-48:55
+48:46-48:55
     Int
-testdata/primes.lc 48:46-48:58
+48:46-48:58
     Int -> Bool
-testdata/primes.lc 48:46-48:60
+48:46-48:60
     Bool
-testdata/primes.lc 48:48-48:53
+48:48-48:53
     Int -> Int -> Int
-testdata/primes.lc 48:54-48:55
+48:54-48:55
     _d
-testdata/primes.lc 48:56-48:58
+48:56-48:58
     forall a . Eq a => a -> a -> Bool
-testdata/primes.lc 48:59-48:60
+48:59-48:60
     _b
-testdata/primes.lc 48:63-48:72
+48:63-48:72
     forall a . (a -> Bool) -> [a] -> [a]
-testdata/primes.lc 48:63-48:93
+48:63-48:93
     [Int] -> [Int]
-testdata/primes.lc 48:63-48:100
+48:63-48:100
     [Int]
-testdata/primes.lc 48:80-48:81
+48:80-48:81
     _b
-testdata/primes.lc 48:80-48:84
+48:80-48:84
     Int -> Bool
-testdata/primes.lc 48:80-48:92
+48:80-48:92
     Bool
-testdata/primes.lc 48:82-48:84
+48:82-48:84
     Int -> Int -> Bool
-testdata/primes.lc 48:85-48:90
+48:85-48:90
     Int -> Int
-testdata/primes.lc 48:85-48:92
+48:85-48:92
     Int
-testdata/primes.lc 48:91-48:92
+48:91-48:92
     Int
-testdata/primes.lc 48:94-48:100
+48:94-48:100
     [Int]
-testdata/primes.lc 48:104-48:108
+48:104-48:108
     Int -> [Int]
-testdata/primes.lc 48:104-48:110
+48:104-48:110
     [Int]
-testdata/primes.lc 48:109-48:110
+48:109-48:110
     _b
-testdata/primes.lc 50:8-50:10
+50:8-50:10
     forall a . [a] -> Int -> a
-testdata/primes.lc 50:15-50:16
+50:15-50:16
     _e
-testdata/primes.lc 50:15-51:28
+50:15-51:28
     Bool -> _d | _c
-testdata/primes.lc 51:17-51:19
+51:17-51:19
     [_h]
-testdata/primes.lc 51:20-51:22
+51:20-51:22
     _k
-testdata/primes.lc 51:24-51:25
+51:24-51:25
     _k
-testdata/primes.lc 51:24-51:26
+51:24-51:26
     Int -> Int
-testdata/primes.lc 51:24-51:27
+51:24-51:27
     Int
-testdata/primes.lc 51:25-51:26
+51:25-51:26
     Int -> Int -> Int
-testdata/primes.lc 51:26-51:27
+51:26-51:27
     _b
-testdata/primes.lc 53:1-53:5
+53:1-53:5
     Int
-testdata/primes.lc 53:8-53:14
+53:8-53:14
     [Int]
-testdata/primes.lc 53:8-53:17
+53:8-53:17
     Int -> Int
-testdata/primes.lc 53:8-53:21
+53:8-53:21
     Int
-testdata/primes.lc 53:15-53:17
+53:15-53:17
     forall a . [a] -> Int -> a
-testdata/primes.lc 53:18-53:21
+53:18-53:21
     _b
 ------------ warnings
-Uncovered pattern(s) at testdata/primes.lc:50:8:
+Uncovered pattern(s) at ./testdata/primes.lc:50:8:
 (x: _) !! 0 = x
 (_ : xs) !! n = xs !! (n-1)
 Missing case(s):
diff --git a/testdata/record01.reject.out b/testdata/record01.reject.out
index 0221ad8b..322d5ae3 100644
--- a/testdata/record01.reject.out
+++ b/testdata/record01.reject.out
@@ -2,7 +2,7 @@ type error: can not unify
   FrameBuffer _b _a
 with
   Float
-in record01.reject.lc:26:15:
+in ./testdata/record01.reject.lc:26:15:
  in ScreenOut record.fieldA
               ^^^^^^
 ------------ trace
@@ -10,414 +10,414 @@ in record01.reject.lc:26:15:
   FrameBuffer _b _a
 with
   Float
-in record01.reject.lc:26:15:
+in ./testdata/record01.reject.lc:26:15:
  in ScreenOut record.fieldA
               ^^^^^^
 ------------ tooltips
-record01.reject.lc 2:16-2:21
+2:16-2:21
     (BlendEquation, BlendEquation)
       -> ((BlendingFactor, BlendingFactor), (BlendingFactor, BlendingFactor))
         -> Vec 4 Float -> Blending Float
-record01.reject.lc 2:16-2:23
+2:16-2:23
     ((BlendingFactor, BlendingFactor), (BlendingFactor, BlendingFactor))
       -> Vec 4 Float -> Blending Float
-record01.reject.lc 2:16-2:81
+2:16-2:81
     Vec 4 Float -> Blending Float
-record01.reject.lc 2:16-2:102
+2:16-2:102
     Blending Float
-record01.reject.lc 2:22-2:23
+2:22-2:23
     _b
-record01.reject.lc 2:24-2:81
+2:24-2:81
     ((BlendingFactor, BlendingFactor), (BlendingFactor, BlendingFactor))
-record01.reject.lc 2:25-2:52
+2:25-2:52
     (BlendingFactor, BlendingFactor)
-record01.reject.lc 2:26-2:34
+2:26-2:34
     BlendingFactor
-record01.reject.lc 2:35-2:51
+2:35-2:51
     BlendingFactor | ((BlendingFactor))
-record01.reject.lc 2:53-2:80
+2:53-2:80
     (BlendingFactor, BlendingFactor) | (((BlendingFactor, BlendingFactor)))
-record01.reject.lc 2:54-2:62
+2:54-2:62
     BlendingFactor
-record01.reject.lc 2:63-2:79
+2:63-2:79
     BlendingFactor | ((BlendingFactor))
-record01.reject.lc 2:83-2:85
+2:83-2:85
     forall a . a -> a -> a -> a -> VecS a 4
-record01.reject.lc 2:83-2:89
+2:83-2:89
     Float -> Float -> Float -> VecS Float 4
-record01.reject.lc 2:83-2:93
+2:83-2:93
     Float -> Float -> VecS Float 4
-record01.reject.lc 2:83-2:97
+2:83-2:97
     Float -> VecS Float 4
-record01.reject.lc 2:83-2:101
+2:83-2:101
     VecS Float 4
-record01.reject.lc 2:86-2:89
+2:86-2:89
     Float
-record01.reject.lc 2:90-2:93
+2:90-2:93
     Float
-record01.reject.lc 2:94-2:97
+2:94-2:97
     Float
-record01.reject.lc 2:98-2:101
+2:98-2:101
     Float
-record01.reject.lc 3:13-3:21
+3:13-3:21
     (BlendEquation, BlendEquation) -> Blending Float
-record01.reject.lc 3:13-3:39
+3:13-3:39
     Blending Float
-record01.reject.lc 3:22-3:39
+3:22-3:39
     (BlendEquation, BlendEquation)
-record01.reject.lc 3:23-3:30
+3:23-3:30
     BlendEquation
-record01.reject.lc 3:31-3:38
+3:31-3:38
     BlendEquation | ((BlendEquation))
-record01.reject.lc 4:11-4:16
+4:11-4:16
     (BlendEquation, BlendEquation)
       -> ((BlendingFactor, BlendingFactor), (BlendingFactor, BlendingFactor))
         -> Vec 4 Float -> Blending Float
-record01.reject.lc 4:11-4:34
+4:11-4:34
     ((BlendingFactor, BlendingFactor), (BlendingFactor, BlendingFactor))
       -> Vec 4 Float -> Blending Float
-record01.reject.lc 4:11-4:92
+4:11-4:92
     Vec 4 Float -> Blending Float
-record01.reject.lc 4:11-4:113
+4:11-4:113
     Blending Float
-record01.reject.lc 4:17-4:34
+4:17-4:34
     (BlendEquation, BlendEquation)
-record01.reject.lc 4:18-4:25
+4:18-4:25
     BlendEquation
-record01.reject.lc 4:26-4:33
+4:26-4:33
     BlendEquation | ((BlendEquation))
-record01.reject.lc 4:35-4:92
+4:35-4:92
     ((BlendingFactor, BlendingFactor), (BlendingFactor, BlendingFactor))
-record01.reject.lc 4:36-4:63
+4:36-4:63
     (BlendingFactor, BlendingFactor)
-record01.reject.lc 4:37-4:45
+4:37-4:45
     BlendingFactor
-record01.reject.lc 4:46-4:62
+4:46-4:62
     BlendingFactor | ((BlendingFactor))
-record01.reject.lc 4:64-4:91
+4:64-4:91
     (BlendingFactor, BlendingFactor) | (((BlendingFactor, BlendingFactor)))
-record01.reject.lc 4:65-4:73
+4:65-4:73
     BlendingFactor
-record01.reject.lc 4:74-4:90
+4:74-4:90
     BlendingFactor | ((BlendingFactor))
-record01.reject.lc 4:94-4:96
+4:94-4:96
     forall a . a -> a -> a -> a -> VecS a 4
-record01.reject.lc 4:94-4:100
+4:94-4:100
     Float -> Float -> Float -> VecS Float 4
-record01.reject.lc 4:94-4:104
+4:94-4:104
     Float -> Float -> VecS Float 4
-record01.reject.lc 4:94-4:108
+4:94-4:108
     Float -> VecS Float 4
-record01.reject.lc 4:94-4:112
+4:94-4:112
     VecS Float 4
-record01.reject.lc 4:97-4:100
+4:97-4:100
     Float
-record01.reject.lc 4:101-4:104
+4:101-4:104
     Float
-record01.reject.lc 4:105-4:108
+4:105-4:108
     Float
-record01.reject.lc 4:109-4:112
+4:109-4:112
     Float
-record01.reject.lc 5:12-5:22
+5:12-5:22
     forall a . Blending a
-record01.reject.lc 6:13-6:15
+6:13-6:15
     forall a . a -> a -> a -> a -> VecS a 4
-record01.reject.lc 6:13-6:19
+6:13-6:19
     Float -> Float -> Float -> VecS Float 4
-record01.reject.lc 6:13-6:23
+6:13-6:23
     Float -> Float -> VecS Float 4
-record01.reject.lc 6:13-6:27
+6:13-6:27
     Float -> VecS Float 4
-record01.reject.lc 6:13-6:31
+6:13-6:31
     VecS Float 4
-record01.reject.lc 6:16-6:19
+6:16-6:19
     Float
-record01.reject.lc 6:20-6:23
+6:20-6:23
     Float
-record01.reject.lc 6:24-6:27
+6:24-6:27
     Float
-record01.reject.lc 6:28-6:31
+6:28-6:31
     Float
-record01.reject.lc 7:14-7:16
+7:14-7:16
     forall a . a -> a -> a -> a -> VecS a 4
-record01.reject.lc 7:14-7:20
+7:14-7:20
     Float -> Float -> Float -> VecS Float 4
-record01.reject.lc 7:14-7:24
+7:14-7:24
     Float -> Float -> VecS Float 4
-record01.reject.lc 7:14-7:28
+7:14-7:28
     Float -> VecS Float 4
-record01.reject.lc 7:14-7:32
+7:14-7:32
     VecS Float 4
-record01.reject.lc 7:17-7:20
+7:17-7:20
     Float
-record01.reject.lc 7:21-7:24
+7:21-7:24
     Float
-record01.reject.lc 7:25-7:28
+7:25-7:28
     Float
-record01.reject.lc 7:29-7:32
+7:29-7:32
     Float
-record01.reject.lc 8:23-8:34
+8:23-8:34
     forall (a :: [Type])
       . sameLayerCounts a
         => HList a -> FrameBuffer (ImageLC (head a)) (map GetImageKind a)
-record01.reject.lc 8:23-8:75
+8:23-8:75
     FrameBuffer
       1
       (map GetImageKind ' [Image 1 'Depth, Image 1 ('Color (VecScalar 4 Float))])
-record01.reject.lc 8:35-8:75
+8:35-8:75
     (Image 1 'Depth, Image 1 ('Color (VecScalar 4 Float)))
-record01.reject.lc 8:36-8:47
+8:36-8:47
     Float -> Image 1 'Depth
-record01.reject.lc 8:36-8:54
+8:36-8:54
     Image 1 'Depth
-record01.reject.lc 8:48-8:54
+8:48-8:54
     Float
-record01.reject.lc 8:55-8:66
+8:55-8:66
     forall (a :: Nat) b c . (Num b, c ~ VecScalar a b) => c -> Image 1 ('Color c)
-record01.reject.lc 8:55-8:74
+8:55-8:74
     Image 1 ('Color (VecScalar 4 Float)) | ((Image 1 ('Color (VecScalar 4 Float))))
-record01.reject.lc 8:67-8:74
+8:67-8:74
     VecS Float 4
-record01.reject.lc 9:23-9:34
+9:23-9:34
     forall a . Float -> PolygonMode a
-record01.reject.lc 9:23-9:39
+9:23-9:39
     PolygonMode _a
-record01.reject.lc 9:35-9:39
+9:35-9:39
     Float
-record01.reject.lc 10:23-10:34
+10:23-10:34
     forall a . PolygonMode a
-record01.reject.lc 11:23-11:35
+11:23-11:35
     forall a . PointSize a -> PolygonMode a
-record01.reject.lc 11:23-11:52
+11:23-11:52
     PolygonMode _a
-record01.reject.lc 11:37-11:46
+11:37-11:46
     forall a . Float -> PointSize a
-record01.reject.lc 11:37-11:51
+11:37-11:51
     PointSize _a
-record01.reject.lc 11:47-11:51
+11:47-11:51
     Float
-record01.reject.lc 12:10-12:18
+12:10-12:18
     CullMode
-record01.reject.lc 13:11-13:20
+13:11-13:20
     CullMode
-record01.reject.lc 14:23-14:34
+14:23-14:34
     forall a
       . CullMode
         -> PolygonMode a
           -> PolygonOffset -> ProvokingVertex -> RasterContext a 'Triangle
-record01.reject.lc 14:23-14:39
+14:23-14:39
     PolygonMode _a -> PolygonOffset -> ProvokingVertex -> RasterContext _a 'Triangle
-record01.reject.lc 14:23-14:49
+14:23-14:49
     PolygonOffset -> ProvokingVertex -> RasterContext _a 'Triangle
-record01.reject.lc 14:23-14:58
+14:23-14:58
     ProvokingVertex -> RasterContext _a 'Triangle
-record01.reject.lc 14:23-14:70
+14:23-14:70
     RasterContext _a 'Triangle
-record01.reject.lc 14:35-14:39
+14:35-14:39
     CullMode
-record01.reject.lc 14:40-14:49
+14:40-14:49
     forall a . PolygonMode a
-record01.reject.lc 14:50-14:58
+14:50-14:58
     PolygonOffset
-record01.reject.lc 14:59-14:70
+14:59-14:70
     ProvokingVertex
-record01.reject.lc 15:23-15:42
+15:23-15:42
     forall a . a -> a
-record01.reject.lc 15:23-15:102
+15:23-15:102
     (FragmentOperation 'Depth, FragmentOperation ('Color (VecScalar 4 Float)))
-record01.reject.lc 15:43-15:102
+15:43-15:102
     (FragmentOperation 'Depth, FragmentOperation ('Color (VecScalar 4 Float)))
-record01.reject.lc 15:44-15:51
+15:44-15:51
     ComparisonFunction -> Bool -> FragmentOperation 'Depth
-record01.reject.lc 15:44-15:56
+15:44-15:56
     Bool -> FragmentOperation 'Depth
-record01.reject.lc 15:44-15:61
+15:44-15:61
     FragmentOperation 'Depth
-record01.reject.lc 15:52-15:56
+15:52-15:56
     ComparisonFunction
-record01.reject.lc 15:57-15:61
+15:57-15:61
     Bool
-record01.reject.lc 15:63-15:70
+15:63-15:70
     forall a (b :: Nat)
       . Num a
         => Blending a -> VecScalar b Bool -> FragmentOperation ('Color (VecScalar b a))
-record01.reject.lc 15:63-15:76
+15:63-15:76
     VecScalar _b Bool -> FragmentOperation ('Color (VecScalar _b Float))
-record01.reject.lc 15:63-15:101
+15:63-15:101
     FragmentOperation ('Color (VecScalar 4 Float)) | ((FragmentOperation
       ('Color (VecScalar 4 Float))))
-record01.reject.lc 15:71-15:76
+15:71-15:76
     Blending Float
-record01.reject.lc 15:78-15:80
+15:78-15:80
     forall a . a -> a -> a -> a -> VecS a 4
-record01.reject.lc 15:78-15:85
+15:78-15:85
     Bool -> Bool -> Bool -> VecS Bool 4
-record01.reject.lc 15:78-15:90
+15:78-15:90
     Bool -> Bool -> VecS Bool 4
-record01.reject.lc 15:78-15:95
+15:78-15:95
     Bool -> VecS Bool 4
-record01.reject.lc 15:78-15:100
+15:78-15:100
     VecS Bool 4
-record01.reject.lc 15:81-15:85
+15:81-15:85
     Bool
-record01.reject.lc 15:86-15:90
+15:86-15:90
     Bool
-record01.reject.lc 15:91-15:95
+15:91-15:95
     Bool
-record01.reject.lc 15:96-15:100
+15:96-15:100
     Bool
-record01.reject.lc 16:23-16:30
+16:23-16:30
     forall a . String -> a
-record01.reject.lc 16:23-16:36
+16:23-16:36
     _a
-record01.reject.lc 16:31-16:36
+16:31-16:36
     String
-record01.reject.lc 16:40-16:43
+16:40-16:43
     Nat -> Nat -> Type -> Type
-record01.reject.lc 16:40-16:45
+16:40-16:45
     Nat -> Type -> Type
-record01.reject.lc 16:40-16:47
+16:40-16:47
     Type -> Type
-record01.reject.lc 16:40-16:53
+16:40-16:53
     Type
-record01.reject.lc 16:44-16:45
+16:44-16:45
     _b
-record01.reject.lc 16:46-16:47
+16:46-16:47
     _b
-record01.reject.lc 16:48-16:53
+16:48-16:53
     Type
-record01.reject.lc 17:27-17:61
+17:27-17:61
     (VecS Float 4, VecS Float 4) | (VecS Float 4, VecS Float 4)
-record01.reject.lc 17:28-17:41
+17:28-17:41
     forall (a :: Nat) (b :: Nat) c . Mat a b c -> Vec b c -> Vec a c
-record01.reject.lc 17:28-17:55
+17:28-17:55
     Vec 4 Float -> Vec 4 Float
-record01.reject.lc 17:28-17:57
+17:28-17:57
     Vec 4 Float
-record01.reject.lc 17:42-17:55
+17:42-17:55
     Mat 4 4 Float
-record01.reject.lc 17:56-17:57
+17:56-17:57
     _g
-record01.reject.lc 17:59-17:60
+17:59-17:60
     VecS Float 4 | ((VecS Float 4))
-record01.reject.lc 18:23-18:28
+18:23-18:28
     forall (a :: PrimitiveType) (b :: [Type])
       . String -> HList b -> PrimitiveStream a (HList b)
-record01.reject.lc 18:23-18:37
+18:23-18:37
     HList _a -> PrimitiveStream _b (HList _a)
-record01.reject.lc 18:23-18:79
+18:23-18:79
     PrimitiveStream _a ((Vec 4 Float))
-record01.reject.lc 18:29-18:37
+18:29-18:37
     String
-record01.reject.lc 18:39-18:48
+18:39-18:48
     forall a . String -> a
-record01.reject.lc 18:39-18:59
+18:39-18:59
     _a
-record01.reject.lc 18:39-18:78
+18:39-18:78
     ((Vec 4 Float))
-record01.reject.lc 18:49-18:59
+18:49-18:59
     String
-record01.reject.lc 18:63-18:78
+18:63-18:78
     Type
-record01.reject.lc 18:65-18:68
+18:65-18:68
     Nat -> Type -> Type
-record01.reject.lc 18:65-18:70
+18:65-18:70
     Type -> Type
-record01.reject.lc 18:65-18:76
+18:65-18:76
     Type | [Type]
-record01.reject.lc 18:69-18:70
+18:69-18:70
     _b
-record01.reject.lc 18:71-18:76
+18:71-18:76
     Type
-record01.reject.lc 19:23-19:36
+19:23-19:36
     forall a b (c :: PrimitiveType) . (a -> b) -> [Primitive a c] -> [Primitive b c]
-record01.reject.lc 19:23-19:49
+19:23-19:49
     [Primitive ((VecS Float 4)) _a] -> [Primitive (VecS Float 4, VecS Float 4) _a]
-record01.reject.lc 19:23-19:62
+19:23-19:62
     [Primitive (VecS Float 4, VecS Float 4) _a]
-record01.reject.lc 19:37-19:49
+19:37-19:49
     ((VecS Float 4)) -> (VecS Float 4, VecS Float 4)
-record01.reject.lc 19:50-19:62
+19:50-19:62
     forall (a :: PrimitiveType) . PrimitiveStream a ((Vec 4 Float))
-record01.reject.lc 20:23-20:42
+20:23-20:42
     forall (a :: [Type]) (b :: PrimitiveType)
       . RasterContext (HList (Vec 4 Float : a)) b
         -> HList (map Interpolated a)
           -> [Primitive (HList (Vec 4 Float : a)) b]
             -> [Vector 1 (Maybe (SimpleFragment (HList a)))]
-record01.reject.lc 20:23-20:52
+20:23-20:52
     HList (map Interpolated _a)
       -> [Primitive (HList (Vec 4 Float : _a)) 'Triangle]
         -> [Vector 1 (Maybe (SimpleFragment (HList _a)))]
-record01.reject.lc 20:23-20:63
+20:23-20:63
     [Primitive (HList (Vec 4 Float : _d)) 'Triangle]
       -> [Vector 1 (Maybe (SimpleFragment (HList _d)))]
-record01.reject.lc 20:23-20:79
+20:23-20:79
     [Vector 1 (Maybe (SimpleFragment ((VecS Float 4))))]
-record01.reject.lc 20:43-20:52
+20:43-20:52
     forall a . RasterContext a 'Triangle
-record01.reject.lc 20:53-20:63
+20:53-20:63
     ((Interpolated _c))
-record01.reject.lc 20:55-20:61
+20:55-20:61
     forall a . Floating a => Interpolated a
-record01.reject.lc 20:64-20:79
+20:64-20:79
     forall (a :: PrimitiveType) . [Primitive (VecS Float 4, VecS Float 4) a]
-record01.reject.lc 21:33-21:55
+21:33-21:55
     ((VecS Float 4)) | ((VecS Float 4))
-record01.reject.lc 21:35-21:37
+21:35-21:37
     forall a . a -> a -> a -> a -> VecS a 4
-record01.reject.lc 21:35-21:41
+21:35-21:41
     Float -> Float -> Float -> VecS Float 4
-record01.reject.lc 21:35-21:45
+21:35-21:45
     Float -> Float -> VecS Float 4
-record01.reject.lc 21:35-21:49
+21:35-21:49
     Float -> VecS Float 4
-record01.reject.lc 21:35-21:53
+21:35-21:53
     VecS Float 4
-record01.reject.lc 21:38-21:41
+21:38-21:41
     Float
-record01.reject.lc 21:42-21:45
+21:42-21:45
     Float
-record01.reject.lc 21:46-21:49
+21:46-21:49
     Float
-record01.reject.lc 21:50-21:53
+21:50-21:53
     Float
-record01.reject.lc 22:33-22:67
+22:33-22:67
     ((VecS Float 4)) | ((VecS Float 4))
-record01.reject.lc 22:35-22:42
+22:35-22:42
     forall a . Num (MatVecScalarElem a) => a -> a -> a
-record01.reject.lc 22:35-22:44
+22:35-22:44
     _i -> _i
-record01.reject.lc 22:35-22:65
+22:35-22:65
     VecS Float 4
-record01.reject.lc 22:43-22:44
+22:43-22:44
     _j
-record01.reject.lc 22:46-22:48
+22:46-22:48
     forall a . a -> a -> a -> a -> VecS a 4
-record01.reject.lc 22:46-22:52
+22:46-22:52
     Float -> Float -> Float -> VecS Float 4
-record01.reject.lc 22:46-22:56
+22:46-22:56
     Float -> Float -> VecS Float 4
-record01.reject.lc 22:46-22:60
+22:46-22:60
     Float -> VecS Float 4
-record01.reject.lc 22:46-22:64
+22:46-22:64
     VecS Float 4
-record01.reject.lc 22:49-22:52
+22:49-22:52
     Float
-record01.reject.lc 22:53-22:56
+22:53-22:56
     Float
-record01.reject.lc 22:57-22:60
+22:57-22:60
     Float
-record01.reject.lc 22:61-22:64
+22:61-22:64
     Float
-record01.reject.lc 23:23-23:33
+23:23-23:33
     forall (a :: Nat) (b :: [Type]) c
       . HList b
         -> (c -> HList (imageType' (map FragmentOperationKind b)))
           -> [Vector a (Maybe (SimpleFragment c))]
             -> FrameBuffer a (map FragmentOperationKind b)
               -> FrameBuffer a (map FragmentOperationKind b)
-record01.reject.lc 23:23-23:45
+23:23-23:45
     (_a
         -> HList
           (imageType'
@@ -435,7 +435,7 @@ record01.reject.lc 23:23-23:45
             (map
               FragmentOperationKind
               ' [FragmentOperation 'Depth, FragmentOperation ('Color (VecScalar 4 Float))])
-record01.reject.lc 23:23-23:60
+23:23-23:60
     [Vector _a (Maybe (SimpleFragment ((VecS Float 4))))]
       -> FrameBuffer
           _a
@@ -447,7 +447,7 @@ record01.reject.lc 23:23-23:60
           (map
             FragmentOperationKind
             ' [FragmentOperation 'Depth, FragmentOperation ('Color (VecScalar 4 Float))])
-record01.reject.lc 23:23-23:75
+23:23-23:75
     FrameBuffer
         1
         (map
@@ -458,23 +458,23 @@ record01.reject.lc 23:23-23:75
         (map
           FragmentOperationKind
           ' [FragmentOperation 'Depth, FragmentOperation ('Color (VecScalar 4 Float))])
-record01.reject.lc 23:23-23:83
+23:23-23:83
     FrameBuffer
       1
       (map
         FragmentOperationKind
         ' [FragmentOperation 'Depth, FragmentOperation ('Color (VecScalar 4 Float))])
-record01.reject.lc 23:34-23:45
+23:34-23:45
     (FragmentOperation 'Depth, FragmentOperation ('Color (VecScalar 4 Float)))
-record01.reject.lc 23:46-23:60
+23:46-23:60
     ((VecS Float 4)) -> ((VecS Float 4))
-record01.reject.lc 23:61-23:75
+23:61-23:75
     [Vector 1 (Maybe (SimpleFragment ((VecS Float 4))))]
-record01.reject.lc 23:76-23:83
+23:76-23:83
     FrameBuffer
       1
       (map GetImageKind ' [Image 1 'Depth, Image 1 ('Color (VecScalar 4 Float))])
-record01.reject.lc 24:12-24:58
+24:12-24:58
     RecordC
       ' ['RecItem "fieldA" Float
       , 'RecItem
@@ -485,13 +485,13 @@ record01.reject.lc 24:12-24:58
             FragmentOperationKind
             ' [FragmentOperation 'Depth, FragmentOperation ('Color (VecScalar 4 Float))]))
       , 'RecItem "fieldC" ((BlendEquation, BlendEquation) -> Blending Float)]
-record01.reject.lc 24:13-24:19
+24:13-24:19
     String | RecItem
-record01.reject.lc 24:13-24:47
+24:13-24:47
     [RecItem]
-record01.reject.lc 24:21-24:24
+24:21-24:24
     Float
-record01.reject.lc 24:21-24:57
+24:21-24:57
     HList
       (Float
         : recItemType
@@ -505,17 +505,17 @@ record01.reject.lc 24:21-24:57
           : map
             recItemType
             ' ['RecItem "fieldC" ((BlendEquation, BlendEquation) -> Blending Float)])
-record01.reject.lc 24:26-24:32
+24:26-24:32
     String | RecItem
-record01.reject.lc 24:26-24:47
+24:26-24:47
     [RecItem]
-record01.reject.lc 24:34-24:39
+24:34-24:39
     FrameBuffer
       1
       (map
         FragmentOperationKind
         ' [FragmentOperation 'Depth, FragmentOperation ('Color (VecScalar 4 Float))])
-record01.reject.lc 24:34-24:57
+24:34-24:57
     HList
       (FrameBuffer
           1
@@ -525,13 +525,13 @@ record01.reject.lc 24:34-24:57
         : recItemType
             ('RecItem "fieldC" ((BlendEquation, BlendEquation) -> Blending Float))
           : map recItemType ' [])
-record01.reject.lc 24:41-24:47
+24:41-24:47
     String | RecItem | [RecItem]
-record01.reject.lc 24:49-24:57
+24:49-24:57
     (BlendEquation, BlendEquation) -> Blending Float | (((BlendEquation
       , BlendEquation)
       -> Blending Float))
-record01.reject.lc 25:11-25:17
+25:11-25:17
     RecordC
       ' ['RecItem "fieldA" Float
       , 'RecItem
@@ -542,13 +542,13 @@ record01.reject.lc 25:11-25:17
             FragmentOperationKind
             ' [FragmentOperation 'Depth, FragmentOperation ('Color (VecScalar 4 Float))]))
       , 'RecItem "fieldC" ((BlendEquation, BlendEquation) -> Blending Float)]
-record01.reject.lc 25:11-25:24
+25:11-25:24
     _b
-record01.reject.lc 25:18-25:24
+25:18-25:24
     String
-record01.reject.lc 26:5-26:14
+26:5-26:14
     forall (a :: Nat) (b :: [ImageKind]) . FrameBuffer a b -> Output
-record01.reject.lc 26:15-26:21
+26:15-26:21
     RecordC
       ' ['RecItem "fieldA" Float
       , 'RecItem
@@ -559,7 +559,7 @@ record01.reject.lc 26:15-26:21
             FragmentOperationKind
             ' [FragmentOperation 'Depth, FragmentOperation ('Color (VecScalar 4 Float))]))
       , 'RecItem "fieldC" ((BlendEquation, BlendEquation) -> Blending Float)]
-record01.reject.lc 26:15-26:28
+26:15-26:28
     _b
-record01.reject.lc 26:22-26:28
+26:22-26:28
     String
\ No newline at end of file
diff --git a/testdata/record02.out b/testdata/record02.out
index 037921f0..8f79ccde 100644
--- a/testdata/record02.out
+++ b/testdata/record02.out
@@ -116,67 +116,67 @@ z
       c
       (project ('RecordC b) d "c" e (project ('RecordC d) f "x" g (h v3))))
 ------------ tooltips
-record02.lc 1:1-1:3
+1:1-1:3
     RecordC ' ['RecItem "x" Float, 'RecItem "y" Float]
-record02.lc 1:6-1:19
+1:6-1:19
     RecordC ' ['RecItem "x" Float, 'RecItem "y" Float]
-record02.lc 1:7-1:8
+1:7-1:8
     String | RecItem
-record02.lc 1:7-1:14
+1:7-1:14
     [RecItem]
-record02.lc 1:9-1:12
+1:9-1:12
     Float
-record02.lc 1:9-1:18
+1:9-1:18
     HList (Float : recItemType ('RecItem "y" Float) : map recItemType ' [])
-record02.lc 1:13-1:14
+1:13-1:14
     String | RecItem | [RecItem]
-record02.lc 1:15-1:18
+1:15-1:18
     Float | ((Float))
-record02.lc 2:1-2:3
+2:1-2:3
     RecordC ' ['RecItem "x" Float, 'RecItem "y" Float, 'RecItem "z" Float]
-record02.lc 2:6-2:26
+2:6-2:26
     RecordC ' ['RecItem "x" Float, 'RecItem "y" Float, 'RecItem "z" Float]
-record02.lc 2:7-2:8
+2:7-2:8
     String | RecItem
-record02.lc 2:7-2:20
+2:7-2:20
     [RecItem]
-record02.lc 2:9-2:12
+2:9-2:12
     Float
-record02.lc 2:9-2:25
+2:9-2:25
     HList
       (Float
         : recItemType ('RecItem "y" Float) : map recItemType ' ['RecItem "z" Float])
-record02.lc 2:13-2:14
+2:13-2:14
     String | RecItem
-record02.lc 2:13-2:20
+2:13-2:20
     [RecItem]
-record02.lc 2:15-2:18
+2:15-2:18
     Float
-record02.lc 2:15-2:25
+2:15-2:25
     HList (Float : recItemType ('RecItem "z" Float) : map recItemType ' [])
-record02.lc 2:19-2:20
+2:19-2:20
     String | RecItem | [RecItem]
-record02.lc 2:21-2:25
+2:21-2:25
     Float | ((Float))
-record02.lc 3:1-3:3
+3:1-3:3
     RecordC
       ' ['RecItem "v1" (RecordC ' ['RecItem "x" Float, 'RecItem "y" Float])
       , 'RecItem
         "v2"
         (RecordC ' ['RecItem "x" Float, 'RecItem "y" Float, 'RecItem "z" Float])]
-record02.lc 3:6-3:20
+3:6-3:20
     RecordC
       ' ['RecItem "v1" (RecordC ' ['RecItem "x" Float, 'RecItem "y" Float])
       , 'RecItem
         "v2"
         (RecordC ' ['RecItem "x" Float, 'RecItem "y" Float, 'RecItem "z" Float])]
-record02.lc 3:7-3:9
+3:7-3:9
     String | RecItem
-record02.lc 3:7-3:16
+3:7-3:16
     [RecItem]
-record02.lc 3:10-3:12
+3:10-3:12
     RecordC ' ['RecItem "x" Float, 'RecItem "y" Float]
-record02.lc 3:10-3:19
+3:10-3:19
     HList
       (RecordC ' ['RecItem "x" Float, 'RecItem "y" Float]
         : recItemType
@@ -184,36 +184,36 @@ record02.lc 3:10-3:19
               "v2"
               (RecordC ' ['RecItem "x" Float, 'RecItem "y" Float, 'RecItem "z" Float]))
           : map recItemType ' [])
-record02.lc 3:14-3:16
+3:14-3:16
     String | RecItem | [RecItem]
-record02.lc 3:17-3:19
+3:17-3:19
     RecordC
       ' ['RecItem "x" Float, 'RecItem "y" Float, 'RecItem "z" Float] | ((RecordC
       ' ['RecItem "x" Float, 'RecItem "y" Float, 'RecItem "z" Float]))
-record02.lc 4:1-4:2
+4:1-4:2
     forall a
       . Num (MatVecScalarElem a)
         => forall (b :: [RecItem])
           . (isKeyC "x" a b, isKeyC "y" (MatVecScalarElem a) b) => RecordC b -> a
-record02.lc 4:7-4:8
+4:7-4:8
     _g
-record02.lc 4:7-4:10
+4:7-4:10
     _c
-record02.lc 4:7-4:13
+4:7-4:13
     MatVecScalarElem _d -> _d
-record02.lc 4:7-4:17
+4:7-4:17
     _e
-record02.lc 4:9-4:10
+4:9-4:10
     String
-record02.lc 4:11-4:13
+4:11-4:13
     forall a . Num (MatVecScalarElem a) => a -> MatVecScalarElem a -> a
-record02.lc 4:14-4:15
+4:14-4:15
     RecordC _e
-record02.lc 4:14-4:17
+4:14-4:17
     _b
-record02.lc 4:16-4:17
+4:16-4:17
     String
-record02.lc 5:1-5:2
+5:1-5:2
     forall a
       . Num (MatVecScalarElem a)
         => forall (b :: [RecItem])
@@ -223,33 +223,33 @@ record02.lc 5:1-5:2
                 => forall (d :: [RecItem])
                   . (isKeyC "z" (MatVecScalarElem a) d, isKeyC "v2" (RecordC d) c)
                     => RecordC c -> a
-record02.lc 5:7-5:8
+5:7-5:8
     _j
-record02.lc 5:7-5:11
+5:7-5:11
     _c
-record02.lc 5:7-5:13
+5:7-5:13
     _e
-record02.lc 5:7-5:16
+5:7-5:16
     MatVecScalarElem _f -> _f
-record02.lc 5:7-5:23
+5:7-5:23
     _i
-record02.lc 5:9-5:11
+5:9-5:11
     String
-record02.lc 5:12-5:13
+5:12-5:13
     String
-record02.lc 5:14-5:16
+5:14-5:16
     forall a . Num (MatVecScalarElem a) => a -> MatVecScalarElem a -> a
-record02.lc 5:17-5:18
+5:17-5:18
     RecordC _h
-record02.lc 5:17-5:21
+5:17-5:21
     _b
-record02.lc 5:17-5:23
+5:17-5:23
     _d
-record02.lc 5:19-5:21
+5:19-5:21
     String
-record02.lc 5:22-5:23
+5:22-5:23
     String
-record02.lc 7:1-7:2
+7:1-7:2
     forall a (b :: [RecItem])
       . isKeyC "x" a b
         => (RecordC
@@ -259,19 +259,19 @@ record02.lc 7:1-7:2
                 (RecordC ' ['RecItem "x" Float, 'RecItem "y" Float, 'RecItem "z" Float])]
             -> RecordC b)
           -> a
-record02.lc 7:7-7:15
+7:7-7:15
     _c
-record02.lc 7:8-7:9
+7:8-7:9
     _e
-record02.lc 7:10-7:12
+7:10-7:12
     RecordC
       ' ['RecItem "v1" (RecordC ' ['RecItem "x" Float, 'RecItem "y" Float])
       , 'RecItem
         "v2"
         (RecordC ' ['RecItem "x" Float, 'RecItem "y" Float, 'RecItem "z" Float])]
-record02.lc 7:14-7:15
+7:14-7:15
     String
-record02.lc 8:1-8:2
+8:1-8:2
     forall a (b :: [RecItem])
       . isKeyC "v" a b
         => forall (c :: [RecItem])
@@ -285,61 +285,61 @@ record02.lc 8:1-8:2
                         (RecordC ' ['RecItem "x" Float, 'RecItem "y" Float, 'RecItem "z" Float])]
                     -> RecordC d)
                   -> a
-record02.lc 8:7-8:19
+8:7-8:19
     _g
-record02.lc 8:8-8:9
+8:8-8:9
     _k
-record02.lc 8:8-8:15
+8:8-8:15
     _c
-record02.lc 8:8-8:17
+8:8-8:17
     _e
-record02.lc 8:10-8:12
+8:10-8:12
     RecordC
       ' ['RecItem "v1" (RecordC ' ['RecItem "x" Float, 'RecItem "y" Float])
       , 'RecItem
         "v2"
         (RecordC ' ['RecItem "x" Float, 'RecItem "y" Float, 'RecItem "z" Float])]
-record02.lc 8:14-8:15
+8:14-8:15
     String
-record02.lc 8:16-8:17
+8:16-8:17
     String
-record02.lc 8:18-8:19
+8:18-8:19
     String
-record02.lc 10:1-10:5
+10:1-10:5
     Bool
-record02.lc 10:8-12:15
+10:8-12:15
     Bool
-record02.lc 10:13-10:14
+10:13-10:14
     forall a
       . Num (MatVecScalarElem a)
         => forall (b :: [RecItem])
           . (isKeyC "x" a b, isKeyC "y" (MatVecScalarElem a) b) => RecordC b -> a
-record02.lc 10:13-10:17
+10:13-10:17
     _d
-record02.lc 10:13-10:20
+10:13-10:20
     MatVecScalarElem Float -> Float
-record02.lc 10:13-10:25
+10:13-10:25
     Float
-record02.lc 10:13-10:28
+10:13-10:28
     MatVecScalarElem Float -> Float
-record02.lc 10:13-10:33
+10:13-10:33
     Float
-record02.lc 10:15-10:17
+10:15-10:17
     RecordC ' ['RecItem "x" Float, 'RecItem "y" Float]
-record02.lc 10:18-10:20
+10:18-10:20
     forall a . Num (MatVecScalarElem a) => a -> MatVecScalarElem a -> a
-record02.lc 10:21-10:22
+10:21-10:22
     forall a
       . Num (MatVecScalarElem a)
         => forall (b :: [RecItem])
           . (isKeyC "x" a b, isKeyC "y" (MatVecScalarElem a) b) => RecordC b -> a
-record02.lc 10:21-10:25
+10:21-10:25
     _d
-record02.lc 10:23-10:25
+10:23-10:25
     RecordC ' ['RecItem "x" Float, 'RecItem "y" Float, 'RecItem "z" Float]
-record02.lc 10:26-10:28
+10:26-10:28
     forall a . Num (MatVecScalarElem a) => a -> MatVecScalarElem a -> a
-record02.lc 10:29-10:30
+10:29-10:30
     forall a
       . Num (MatVecScalarElem a)
         => forall (b :: [RecItem])
@@ -349,17 +349,17 @@ record02.lc 10:29-10:30
                 => forall (d :: [RecItem])
                   . (isKeyC "z" (MatVecScalarElem a) d, isKeyC "v2" (RecordC d) c)
                     => RecordC c -> a
-record02.lc 10:29-10:33
+10:29-10:33
     _h
-record02.lc 10:31-10:33
+10:31-10:33
     RecordC
       ' ['RecItem "v1" (RecordC ' ['RecItem "x" Float, 'RecItem "y" Float])
       , 'RecItem
         "v2"
         (RecordC ' ['RecItem "x" Float, 'RecItem "y" Float, 'RecItem "z" Float])]
-record02.lc 11:13-11:17
+11:13-11:17
     Bool
-record02.lc 11:13-12:15
+11:13-12:15
     Bool -> Bool
-record02.lc 12:10-12:15
+12:10-12:15
     Bool
\ No newline at end of file
diff --git a/testdata/reduce06.out b/testdata/reduce06.out
index 6bf97cb3..d947d04d 100644
--- a/testdata/reduce06.out
+++ b/testdata/reduce06.out
@@ -11,23 +11,23 @@ constf = \a b -> _rhs \c _ -> c
 main :: Bool
 main = _rhs True
 ------------ tooltips
-reduce06.lc 1:1-1:7
+1:1-1:7
     forall a b . a -> b -> a
-reduce06.lc 1:18-1:19
+1:18-1:19
     _d
-reduce06.lc 3:1-3:5
+3:1-3:5
     Bool
-reduce06.lc 3:8-3:35
+3:8-3:35
     Bool
-reduce06.lc 3:15-3:21
+3:15-3:21
     forall a b . a -> b -> a
-reduce06.lc 3:15-3:23
+3:15-3:23
     _a -> _c
-reduce06.lc 3:15-3:29
+3:15-3:29
     _b
-reduce06.lc 3:22-3:23
+3:22-3:23
     _d
-reduce06.lc 3:24-3:29
+3:24-3:29
     Bool
-reduce06.lc 3:31-3:35
+3:31-3:35
     Bool
\ No newline at end of file
diff --git a/testdata/scope01.reject.out b/testdata/scope01.reject.out
index 072d573b..4003c679 100644
--- a/testdata/scope01.reject.out
+++ b/testdata/scope01.reject.out
@@ -1,10 +1,10 @@
-can't find: frame' in scope01.reject.lc:3:8:
+can't find: frame' in ./testdata/scope01.reject.lc:3:8:
     in frame'
        ^^^^^^
 ------------ trace
-!can't find: frame' in scope01.reject.lc:3:8:
+!can't find: frame' in ./testdata/scope01.reject.lc:3:8:
     in frame'
        ^^^^^^
 ------------ tooltips
-scope01.reject.lc 2:17-2:20
+2:17-2:20
     Float
\ No newline at end of file
diff --git a/testdata/swizzling.out b/testdata/swizzling.out
index d4637c67..efe50bbc 100644
--- a/testdata/swizzling.out
+++ b/testdata/swizzling.out
@@ -39,46 +39,46 @@ v2 = _rhs (V2 (swizzscalar 'Float 3 v Sx) (swizzscalar 'Float 3 v Sx))
 v3 :: Float
 v3 = _rhs 1.0
 ------------ tooltips
-swizzling.lc 3:1-3:2
+3:1-3:2
     VecS Float 3
-swizzling.lc 3:5-3:7
+3:5-3:7
     forall a . a -> a -> a -> VecS a 3
-swizzling.lc 3:5-3:11
+3:5-3:11
     Float -> Float -> VecS Float 3
-swizzling.lc 3:5-3:15
+3:5-3:15
     Float -> VecS Float 3
-swizzling.lc 3:5-3:19
+3:5-3:19
     VecS Float 3
-swizzling.lc 3:8-3:11
+3:8-3:11
     Float
-swizzling.lc 3:12-3:15
+3:12-3:15
     Float
-swizzling.lc 3:16-3:19
+3:16-3:19
     Float
-swizzling.lc 4:1-4:3
+4:1-4:3
     VecS Float 2
-swizzling.lc 4:6-4:7
+4:6-4:7
     VecS Float 3
-swizzling.lc 4:6-4:10
+4:6-4:10
     VecS Float 2
-swizzling.lc 5:1-5:3
+5:1-5:3
     Float
-swizzling.lc 5:6-5:7
+5:6-5:7
     VecS Float 3
-swizzling.lc 5:6-5:9
+5:6-5:9
     Float
-swizzling.lc 7:1-7:5
+7:1-7:5
     Bool
-swizzling.lc 7:8-8:27
+7:8-8:27
     Bool
-swizzling.lc 7:13-7:14
+7:13-7:14
     VecS Float 3
-swizzling.lc 7:13-7:18
+7:13-7:18
     VecS Float 3
-swizzling.lc 8:23-8:27
+8:23-8:27
     Bool | Bool | Bool | Bool
 ------------ warnings
-Uncovered pattern(s) at swizzling.lc:7:13:
+Uncovered pattern(s) at ./testdata/swizzling.lc:7:13:
 main = case v%xxy of
             ^^^^^
 Missing case(s):
diff --git a/testdata/syntax01.reject.out b/testdata/syntax01.reject.out
index f5cdc041..d10effd7 100644
--- a/testdata/syntax01.reject.out
+++ b/testdata/syntax01.reject.out
@@ -1,3 +1,3 @@
-testdata/syntax01.reject.lc:3:1:
+./testdata/syntax01.reject.lc:3:1:
 expecting expression
-wrong indentation
+wrong indentation
\ No newline at end of file
diff --git a/testdata/traceTest.out b/testdata/traceTest.out
index 18c05371..24804801 100644
--- a/testdata/traceTest.out
+++ b/testdata/traceTest.out
@@ -25,29 +25,29 @@ match'X = \a b c d -> <<type case function>>
 x :: X (Type -> Type -> Type) \a b -> (a, b)
 x = _rhs (undefined ('X (Type -> Type -> Type) \a b -> ' (a, b)))
 ------------ tooltips
-traceTest.lc 6:1-6:3
+6:1-6:3
     forall a . a -> a
-traceTest.lc 6:8-6:9
+6:8-6:9
     _b
-traceTest.lc 8:6-8:7
+8:6-8:7
     forall a . a -> Type | forall a . a -> Type | forall a . a -> Type | Type | Type
-traceTest.lc 8:6-8:18
+8:6-8:18
     Type
-traceTest.lc 8:17-8:18
+8:17-8:18
     Type | Type | Type
-traceTest.lc 10:6-10:7
+10:6-10:7
     forall a . a -> Type
-traceTest.lc 10:6-10:25
+10:6-10:25
     Type
-traceTest.lc 10:17-10:24
+10:17-10:24
     Type
-traceTest.lc 10:19-10:20
+10:19-10:20
     _e
-traceTest.lc 10:19-10:23
+10:19-10:23
     [Type]
-traceTest.lc 10:22-10:23
+10:22-10:23
     _c | [Type]
-traceTest.lc 11:1-11:2
+11:1-11:2
     X (Type -> Type -> Type) \a b -> (a, b)
-traceTest.lc 11:5-11:14
+11:5-11:14
     forall a . a
\ No newline at end of file
diff --git a/testdata/typeclass.out b/testdata/typeclass.out
index bd28d0cf..cd6d059d 100644
--- a/testdata/typeclass.out
+++ b/testdata/typeclass.out
@@ -103,85 +103,85 @@ not = \a -> case'Bool (\_ -> 'Bool) (_rhs True) (_rhs False) a
 || :: Bool -> Bool -> Bool
 || = \a b -> case'Bool (\_ -> 'Bool) (_rhs b) (_rhs True) a
 ------------ tooltips
-typeclass.lc 8:1-8:4
+8:1-8:4
     Bool -> Bool
-typeclass.lc 8:12-8:17
+8:12-8:17
     Bool
-typeclass.lc 8:12-9:17
+8:12-9:17
     Bool -> Bool
-typeclass.lc 9:13-9:17
+9:13-9:17
     Bool
-typeclass.lc 11:6-11:8
+11:6-11:8
     Bool -> Bool -> Bool
-typeclass.lc 11:13-11:14
+11:13-11:14
     _b
-typeclass.lc 11:13-12:19
+11:13-12:19
     Bool -> Bool
-typeclass.lc 12:14-12:19
+12:14-12:19
     Bool
-typeclass.lc 14:7-14:9
+14:7-14:9
     Bool -> Bool -> Bool
-typeclass.lc 14:14-14:15
+14:14-14:15
     _c
-typeclass.lc 14:14-15:17
+14:14-15:17
     Bool -> Bool
-typeclass.lc 15:13-15:17
+15:13-15:17
     Bool
-typeclass.lc 17:7-17:9
+17:7-17:9
     Type -> Constraint | Type -> Constraint | Constraint
-typeclass.lc 17:7-18:27
+17:7-18:27
     Type
-typeclass.lc 18:6-18:8
+18:6-18:8
     forall a . Eq a => a -> a -> Bool
-typeclass.lc 18:13-18:14
+18:13-18:14
     Type
-typeclass.lc 18:13-18:27
+18:13-18:27
     Type
-typeclass.lc 18:18-18:19
+18:18-18:19
     Type
-typeclass.lc 18:18-18:27
+18:18-18:27
     Type
-typeclass.lc 18:23-18:27
+18:23-18:27
     Type | Type
-typeclass.lc 20:3-20:5
+20:3-20:5
     forall a . Eq a => a -> a -> Bool
-typeclass.lc 20:10-20:13
+20:10-20:13
     Bool -> Bool
-typeclass.lc 20:10-20:22
+20:10-20:22
     Bool
-typeclass.lc 20:15-20:16
+20:15-20:16
     _f
-typeclass.lc 20:15-20:19
+20:15-20:19
     _e -> Bool
-typeclass.lc 20:15-20:21
+20:15-20:21
     Bool
-typeclass.lc 20:17-20:19
+20:17-20:19
     forall a . Eq a => a -> a -> Bool
-typeclass.lc 20:20-20:21
+20:20-20:21
     _c
-typeclass.lc 23:17-23:18
+23:17-23:18
     Bool
-typeclass.lc 23:17-24:23
+23:17-24:23
     Bool -> Bool
-typeclass.lc 24:18-24:21
+24:18-24:21
     Bool -> Bool
-typeclass.lc 24:18-24:23
+24:18-24:23
     Bool
-typeclass.lc 24:22-24:23
+24:22-24:23
     _b
-typeclass.lc 26:6-26:9
+26:6-26:9
     forall a b . [a] -> [b] -> Bool
-typeclass.lc 26:17-26:21
+26:17-26:21
     Bool
-typeclass.lc 26:17-28:22
+26:17-28:22
     [_a] -> Bool | Bool
-typeclass.lc 27:36-27:38
+27:36-27:38
     [_j]
-typeclass.lc 27:36-28:22
+27:36-28:22
     [_a] -> Bool | Bool
-typeclass.lc 27:39-27:42
+27:39-27:42
     _l
-typeclass.lc 27:43-27:45
+27:43-27:45
     [_g]
-typeclass.lc 28:17-28:22
+28:17-28:22
     Bool | Bool
\ No newline at end of file
diff --git a/testdata/typeclass0.out b/testdata/typeclass0.out
index 9eff3af2..280f851c 100644
--- a/testdata/typeclass0.out
+++ b/testdata/typeclass0.out
@@ -11,16 +11,16 @@ main
 main :: Bool
 main = _rhs True
 ------------ tooltips
-typeclass0.lc 2:1-2:5
+2:1-2:5
     Bool
-typeclass0.lc 2:8-3:16
+2:8-3:16
     Bool
-typeclass0.lc 2:13-2:14
+2:13-2:14
     _b
-typeclass0.lc 3:12-3:16
+3:12-3:16
     Bool
 ------------ warnings
-Uncovered pattern(s) at typeclass0.lc:2:13:
+Uncovered pattern(s) at ./testdata/typeclass0.lc:2:13:
 main = case 1 of
             ^
 Missing case(s):
diff --git a/testdata/typesig.reject.out b/testdata/typesig.reject.out
index 14c6d5eb..4b742a17 100644
--- a/testdata/typesig.reject.out
+++ b/testdata/typesig.reject.out
@@ -1,4 +1,4 @@
-can't find: x in typesig.reject.lc:6:6:
+can't find: x in ./testdata/typesig.reject.lc:6:6:
 x :: x
      ^
 ------------ trace
@@ -6,13 +6,13 @@ x :: x
 X :: X
 case'X :: forall (a :: X -> Type) -> a 'X -> forall (b :: X) -> a b
 match'X :: forall (a :: Type -> Type) -> a X -> forall b -> a b -> a b
-!can't find: x in typesig.reject.lc:6:6:
+!can't find: x in ./testdata/typesig.reject.lc:6:6:
 x :: x
      ^
 ------------ tooltips
-typesig.reject.lc 4:6-4:7
+4:6-4:7
     Type | Type | Type | Type | Type
-typesig.reject.lc 4:6-4:11
+4:6-4:11
     Type
-typesig.reject.lc 4:10-4:11
+4:10-4:11
     X
\ No newline at end of file
diff --git a/testdata/typesigctx.reject.out b/testdata/typesigctx.reject.out
index 9214c7d3..c9179f01 100644
--- a/testdata/typesigctx.reject.out
+++ b/testdata/typesigctx.reject.out
@@ -10,25 +10,25 @@ show' :: forall a . @(Empty "no instance of 'Show' on ???") -> a -> X
 !type error: no instance of 'Show' on ???
 in 'Type Wildcard2
 ------------ tooltips
-typesigctx.reject.lc 1:6-1:7
+1:6-1:7
     Type | Type | Type | Type | Type
-typesigctx.reject.lc 1:6-1:11
+1:6-1:11
     Type
-typesigctx.reject.lc 1:10-1:11
+1:10-1:11
     X
-typesigctx.reject.lc 3:7-3:12
+3:7-3:12
     Type -> Constraint | Type -> Constraint | Constraint
-typesigctx.reject.lc 3:7-3:36
+3:7-3:36
     Type
-typesigctx.reject.lc 3:21-3:26
+3:21-3:26
     forall a . @(Empty "no instance of 'Show' on ???") -> a -> X
-typesigctx.reject.lc 3:30-3:31
+3:30-3:31
     Type
-typesigctx.reject.lc 3:30-3:36
+3:30-3:36
     Type
-typesigctx.reject.lc 3:35-3:36
+3:35-3:36
     Type | Type
-typesigctx.reject.lc 5:11-5:12
+5:11-5:12
     Type
-typesigctx.reject.lc 6:10-6:15
+6:10-6:15
     forall a . @(Empty "no instance of 'Show' on ???") -> a -> X
\ No newline at end of file
diff --git a/testdata/typesyn.out b/testdata/typesyn.out
index 44858110..8462b1c6 100644
--- a/testdata/typesyn.out
+++ b/testdata/typesyn.out
@@ -16,53 +16,53 @@ main = _lhs main (_rhs ((True :: B) && fst ((True, 'c') :: F Bool Char)))
 main :: Bool
 main = _rhs True
 ------------ tooltips
-typesyn.lc 3:6-3:7
+3:6-3:7
     Type
-typesyn.lc 3:10-3:14
+3:10-3:14
     Type
-typesyn.lc 5:6-5:7
+5:6-5:7
     Type -> Type -> Type
-typesyn.lc 5:14-5:20
+5:14-5:20
     Type
-typesyn.lc 5:15-5:16
+5:15-5:16
     _e
-typesyn.lc 5:15-5:19
+5:15-5:19
     [Type]
-typesyn.lc 5:18-5:19
+5:18-5:19
     _c | [Type]
-typesyn.lc 7:1-7:5
+7:1-7:5
     Bool
-typesyn.lc 7:8-7:22
+7:8-7:22
     Bool -> Bool
-typesyn.lc 7:8-7:55
+7:8-7:55
     Bool
-typesyn.lc 7:9-7:13
+7:9-7:13
     Bool
-typesyn.lc 7:9-7:18
+7:9-7:18
     B
-typesyn.lc 7:17-7:18
+7:17-7:18
     Type
-typesyn.lc 7:20-7:22
+7:20-7:22
     Bool -> Bool -> Bool
-typesyn.lc 7:23-7:26
+7:23-7:26
     forall a b . (a, b) -> a
-typesyn.lc 7:23-7:55
+7:23-7:55
     Bool
-typesyn.lc 7:28-7:39
+7:28-7:39
     (Bool, Char)
-typesyn.lc 7:28-7:54
+7:28-7:54
     F Bool Char
-typesyn.lc 7:29-7:33
+7:29-7:33
     Bool
-typesyn.lc 7:35-7:38
+7:35-7:38
     Char | ((Char))
-typesyn.lc 7:43-7:44
+7:43-7:44
     Type -> Type -> Type
-typesyn.lc 7:43-7:49
+7:43-7:49
     Type -> Type
-typesyn.lc 7:43-7:54
+7:43-7:54
     Type
-typesyn.lc 7:45-7:49
+7:45-7:49
     Type
-typesyn.lc 7:50-7:54
+7:50-7:54
     Type
\ No newline at end of file
diff --git a/testdata/where.out b/testdata/where.out
index 4bab119b..c9d648c0 100644
--- a/testdata/where.out
+++ b/testdata/where.out
@@ -5,13 +5,13 @@ f = _lhs f (_rhs let a = let c = 1.0 in c; b = 1.0 in b)
 f :: Float
 f = _rhs 1.0
 ------------ tooltips
-where.lc 3:1-3:2
+3:1-3:2
     Float
-where.lc 3:5-3:6
+3:5-3:6
     Float
-where.lc 5:9-5:10
+5:9-5:10
     Float
-where.lc 7:13-7:16
+7:13-7:16
     Float
-where.lc 8:9-8:12
+8:9-8:12
     Float
\ No newline at end of file
diff --git a/testdata/zip01.out b/testdata/zip01.out
index e30ba869..e916ee41 100644
--- a/testdata/zip01.out
+++ b/testdata/zip01.out
@@ -29,57 +29,57 @@ zip2
         e)
       d
 ------------ tooltips
-zip01.lc 1:9-1:12
+1:9-1:12
     Type
-zip01.lc 1:9-1:30
+1:9-1:30
     Type | Type
-zip01.lc 1:10-1:11
+1:10-1:11
     _d
-zip01.lc 1:16-1:19
+1:16-1:19
     Type
-zip01.lc 1:16-1:30
+1:16-1:30
     Type
-zip01.lc 1:17-1:18
+1:17-1:18
     _c
-zip01.lc 1:23-1:30
+1:23-1:30
     Type | Type
-zip01.lc 1:24-1:29
+1:24-1:29
     Type
-zip01.lc 1:25-1:26
+1:25-1:26
     Type
-zip01.lc 1:25-1:28
+1:25-1:28
     [Type]
-zip01.lc 1:27-1:28
+1:27-1:28
     Type | [Type]
-zip01.lc 2:1-2:5
+2:1-2:5
     forall a b . [a] -> [b] -> [(a, b)]
-zip01.lc 2:22-2:24
+2:22-2:24
     forall a . [a]
-zip01.lc 2:22-4:40
+2:22-4:40
     [_a] -> [(_a, _d)] | [(_d, _c)]
-zip01.lc 3:22-3:24
+3:22-3:24
     forall a . [a]
-zip01.lc 3:22-4:40
+3:22-4:40
     [_a] -> [(_e, _a)] | [(_c, _f)]
-zip01.lc 4:22-4:27
+4:22-4:27
     (_h, _d)
-zip01.lc 4:22-4:29
+4:22-4:29
     [(_h, _d)] -> [(_h, _d)]
-zip01.lc 4:22-4:40
+4:22-4:40
     [(_g, _c)]
-zip01.lc 4:23-4:24
+4:23-4:24
     _k
-zip01.lc 4:25-4:26
+4:25-4:26
     _g | ((_d))
-zip01.lc 4:28-4:29
+4:28-4:29
     forall a . a -> [a] -> [a]
-zip01.lc 4:30-4:34
+4:30-4:34
     forall a b . [a] -> [b] -> [(a, b)]
-zip01.lc 4:30-4:37
+4:30-4:37
     [_a] -> [(_h, _a)]
-zip01.lc 4:30-4:40
+4:30-4:40
     [(_g, _c)]
-zip01.lc 4:35-4:37
+4:35-4:37
     [_i]
-zip01.lc 4:38-4:40
+4:38-4:40
     [_c]
\ No newline at end of file