module A

public export
-- interface AInt x where
interface BFromInteger x where
  foo : Integer -> x