src/ZF/Coind/Language.thy
changeset 1478 2b8c2a7547ab
parent 1401 0c439768f45c
child 2874 b1e7e2179597
     1.1 --- a/src/ZF/Coind/Language.thy	Mon Feb 05 21:33:14 1996 +0100
     1.2 +++ b/src/ZF/Coind/Language.thy	Tue Feb 06 12:27:17 1996 +0100
     1.3 @@ -1,14 +1,14 @@
     1.4 -(*  Title: 	ZF/Coind/Language.thy
     1.5 +(*  Title:      ZF/Coind/Language.thy
     1.6      ID:         $Id$
     1.7 -    Author: 	Jacob Frost, Cambridge University Computer Laboratory
     1.8 +    Author:     Jacob Frost, Cambridge University Computer Laboratory
     1.9      Copyright   1995  University of Cambridge
    1.10  *)
    1.11  
    1.12  Language ="Datatype" + QUniv +
    1.13  
    1.14  consts
    1.15 -  Const :: i			(* Abstract type of constants *)
    1.16 -  c_app :: [i,i] => i		(*Abstract constructor for fun application*)
    1.17 +  Const :: i                    (* Abstract type of constants *)
    1.18 +  c_app :: [i,i] => i           (*Abstract constructor for fun application*)
    1.19  
    1.20  rules
    1.21    constNEE  "c:Const ==> c ~= 0"
    1.22 @@ -16,8 +16,8 @@
    1.23  
    1.24  
    1.25  consts
    1.26 -  Exp   :: i			(* Datatype of expressions *)
    1.27 -  ExVar :: i			(* Abstract type of variables *)
    1.28 +  Exp   :: i                    (* Datatype of expressions *)
    1.29 +  ExVar :: i                    (* Abstract type of variables *)
    1.30  datatype <= "univ(Const Un ExVar)"
    1.31    "Exp" = e_const("c:Const")
    1.32          | e_var("x:ExVar")