main is not found ------------ desugared source code value = _lhs value (_rhs (concatMap (\(_ :: _) -> primIfThenElse False [()] []) [(), (), (), ()])) ------------ core code value :: [()] value = _rhs [] ------------ tooltips 1:1-1:6 [()] 1:9-1:41 [()] 1:10-1:12 () | [()] 1:10-1:40 [()] -> [()] | [()] 1:20-1:33 [()] 1:21-1:23 () 1:24-1:26 () 1:24-1:32 [()] 1:27-1:29 () 1:27-1:32 [()] 1:30-1:32 () | [()] 1:35-1:40 Bool