Add implicit foralls for bidir, update and unify pipeline

sample-programs/basic-9.crf

@@ -1,13 +1,9 @@
-data List (a) where {
+data List (a) where
   Nil  : List (a)
   Cons : a -> List (a) -> List (a)
-};
-
-test xs = case xs of {
-    Cons Nil _ => 0 ;
-};
-
 
+test xs = case xs of
+    Cons Nil _ => 0
 
 List a /= List (List a)