25 lines
813 B
Text
25 lines
813 B
Text
/-
|
|
Copyright (c) 2016 Microsoft Corporation. All rights reserved.
|
|
Released under Apache 2.0 license as described in the file LICENSE.
|
|
Authors: Luke Nelson, Jared Roesch and Leonardo de Moura
|
|
-/
|
|
constant IO.{l} : Type.{l} → Type.{l}
|
|
constant functorIO : functor IO
|
|
constant monadIO : monad IO
|
|
|
|
attribute [instance] functorIO monadIO
|
|
|
|
constant put_str : string → IO unit
|
|
constant put_nat : nat → IO unit
|
|
constant get_line : IO string
|
|
|
|
meta_constant format.print_using : format → options → IO unit
|
|
|
|
meta_definition format.print (fmt : format) : IO unit :=
|
|
format.print_using fmt options.mk
|
|
|
|
meta_definition pp_using {A : Type} [has_to_format A] (a : A) (o : options) : IO unit :=
|
|
format.print_using (to_fmt a) o
|
|
|
|
meta_definition pp {A : Type} [has_to_format A] (a : A) : IO unit :=
|
|
format.print (to_fmt a)
|