/[marvin]/marvin/src/libnn/commonNN.ml
ViewVC logotype

Diff of /marvin/src/libnn/commonNN.ml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1 by matthieu, Thu Jul 10 21:22:29 2003 UTC revision 1.2 by srv89, Thu Jul 10 21:36:21 2003 UTC
# Line 2  Line 2 
2    [LibNN - Neural Networks Library]    [LibNN - Neural Networks Library]
3    http://libnn.org    http://libnn.org
4    Copyright (C) 2002 - 2003  LAGACHERIE Matthieu RICORDEAU Olivier    Copyright (C) 2002 - 2003  LAGACHERIE Matthieu RICORDEAU Olivier
5      
6    This program is free software; you can redistribute it and/or    This program is free software; you can redistribute it and/or
7    modify it under the terms of the GNU General Public License    modify it under the terms of the GNU General Public License
8    as published by the Free Software Foundation; either version 2    as published by the Free Software Foundation; either version 2
9    of the License, or (at your option) any later version. This    of the License, or (at your option) any later version. This
10    program is distributed in the hope that it will be useful,    program is distributed in the hope that it will be useful,
11    but WITHOUT ANY WARRANTY; without even the implied warranty of    but WITHOUT ANY WARRANTY; without even the implied warranty of
12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13    GNU General Public License for more details. You should have    GNU General Public License for more details. You should have
14    received a copy of the GNU General Public License    received a copy of the GNU General Public License
15    along with this program; if not, write to the Free Software    along with this program; if not, write to the Free Software
16    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307,    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307,
17    USA.    USA.
18      
19    Authors:    SPECIAL NOTE (the beerware clause):
20      This software is free software. However, it also falls under the beerware
21      special category. That is, if you find this software useful, or use it
22      every day, or want to grant us for our modest contribution to the
23      free software community, feel free to send us a beer from one of
24      your local brewery. Our preference goes to Belgium abbey beers and
25      irish stout (Guiness for strength!), but we like to try new stuffs.
26    
27      Authors:
28    LAGACHERIE Matthieu    LAGACHERIE Matthieu
29    Paper mail : 7 rue Delescluzes 94280 LE KREMLIN BICETRE, FRANCE    Paper mail : 7 rue Delescluzes 94280 LE KREMLIN BICETRE, FRANCE
30    E-mail : matthieu@libnn.org    E-mail : matthieu@libnn.org
31      
32    RICORDEAU Olivier    RICORDEAU Olivier
33    Paper mail : 69 avenue d'Italie 75013 PARIS, FRANCE    Paper mail : 69 avenue d'Italie 75013 PARIS, FRANCE
34    E-mail : olivier@libnn.org    E-mail : olivier@libnn.org
35      
36  *****************************************************************)  *****************************************************************)
37    
38  (**  (**
39    The CommonNN virtual class    The CommonNN virtual class
40      
41    @author Matthieu Lagacherie    @author Matthieu Lagacherie
42    @author Olivier Ricordeau    @author Olivier Ricordeau
43    @since 10/08/2003    @since 10/08/2003
44  *)  *)
45    
46  open MlpNN  open MlpNN
47  open ComputeVisitor  open DefaultVisitor
48    
49  class commonNN =  class commonNN =
50  object (self : 'a)  object (self : 'a)
51    inherit [('a) computeVisitor] mlpNN    inherit [('a) defaultVisitor] mlpNN
52    method accept (visitor : ('a) computeVisitor) = visitor#visitCommon self    method accept (visitor : ('a) defaultVisitor) = visitor#visitCommon self
53    method print = Printf.printf "ca marche...\n"; flush stdout    method print = Printf.printf "ca marche...\n"; flush stdout
54  end  end

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26