Loading module Cryptol
Loading module Cryptol
Loading module test04
module test04
import Cryptol
/* Not recursive */
test04::test : {a, b} (Literal 10 b) => a -> ((a, ()), (a, b))
test04::test = \{a, b} (Literal 10 b) (a : a) ->
               (test04::f () (), test04::f b (Cryptol::number 10 b <>))
               where
                 /* Not recursive */
                 test04::f : {c} c -> (a, c)
                 test04::f = \{c} (x : c) -> (a, x)
                 
               

Loading module Cryptol
Loading module test04

[error] at ./test04.cry:1:1--5:14:
  Type '()' does not support literals.