(* $Id: nta_types_output.sig 62 2008-08-20 11:20:33Z tbourke $
 *
 * Copyright (c) 2008 Timothy Bourke (University of NSW and NICTA)
 * All rights reserved.
 *
 * This program is free software; you can redistribute it and/or modify it
 * under the terms of the "BSD License" which is distributed with the
 * software in the file LICENSE.
 *
 * This program is distributed in the hope that it will be useful, but
 * WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the BSD
 * License for more details.
 *)

signature NTA_TYPES_OUTPUT =
sig
  include NTA_TYPES
  type outstream

  val hasInvariant              : invariant -> bool
  val hasSelect                 : select -> bool
  val hasGuard                  : guard -> bool
  val hasSync                   : sync -> bool
  val hasUpdate                 : update -> bool
  val hasParameter              : parameter -> bool
  val hasDeclaration            : declaration -> bool
  val hasImports                : imports -> bool
  val hasInstantiation          : instantiation -> bool

  val outputInvariant           : (outstream * invariant) -> unit
  val outputSelect              : (outstream * select) -> unit
  val outputGuard               : (outstream * guard) -> unit
  val outputSync                : (outstream * sync) -> unit
  val outputUpdate              : (outstream * update) -> unit
  val outputParameter           : (outstream * parameter) -> unit
  val outputDeclaration         : (outstream * declaration) -> unit
  val outputTemplateDeclaration : (outstream * declaration) -> unit
  val outputImports             : (outstream * imports) -> unit
  val outputInstantiation       : (outstream * instantiation) -> unit
  val outputSystem              : (outstream * system) -> unit
end