]> git.llucax.com Git - z.facultad/75.31/ejercicios.git/blob - 2.4.oz
Ejercicios del capítulo 2.
[z.facultad/75.31/ejercicios.git] / 2.4.oz
1 /****************************************************************************
2 Ejercicio: 2.4
3 Alumno: Leandro Lucarella
4 Fecha: mié jul 27 15:08:32 ART 2005
5 ****************************************************************************/
6
7 functor
8 import
9     Application
10     System
11 define
12     proc {If X}
13         case X
14             of true then {System.show true}
15             else {System.show false}
16         end
17     end
18     {If true}
19     {If false}
20     {Application.exit 0}
21 end
22
23 % vim: set et sw=4 sts=4 filetype=oz :