MODULE simple_type EXPORTS Main;
IMPORT IO, Fmt;


TYPE
(* die folgenden typen sind im prinzip nur aliase *)
    int = INTEGER;
    flt = REAL;

(*
    zu vermeiden sind trotz der zeitersparnis zu kurze typennamen,
    da die aussagekraft verloren geht und damit die lesbarkeit des
    codes leidet - a,b, ... ac, ck usw.
*)


VAR
(* die folgenden variablen sind vom gleichen typ *)
    variable1   : int;	
    variable2	: INTEGER;


BEGIN
    variable1 := 10;
    variable2 :=  5;
    IO.Put(Fmt.Int(variable1) & " + " & Fmt.Int(variable2) & " = " & Fmt.Int(variable1 + variable2) & "");    
END simple_type.