1/1: Building casetot (casetot.idr) casetot.idr:12:1--13:1:main is not covering: Calls non covering function Main.case block in 2087(287)