summaryrefslogtreecommitdiff
path: root/test-suite/failure/Case13.v
blob: 8a4d75b61cbc3613db30b55b40f3b194f8b693ac (plain)
1
2
3
4
5
Type [x:nat]<nat> Cases x  of 
                  ((S x) as b) => <nat>Cases x  of
                                        x => (S b x)
                                   end
                          end.