/[marvin]/marvin/src/libnn/xml/xmlMlpnnVisitor.ml
ViewVC logotype

Diff of /marvin/src/libnn/xml/xmlMlpnnVisitor.ml

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

revision 1.4 by srv89, Mon Sep 1 13:08:35 2003 UTC revision 1.5 by srv89, Sun Sep 7 19:13:12 2003 UTC
# Line 43  Line 43 
43    @since 08/26/2003    @since 08/26/2003
44  *)  *)
45    
 open Obj  
   
 open Nn  
46  open MlpNN  open MlpNN
47  open XmlVisitor  open XmlVisitor
48    
# Line 63  object Line 60  object
60    method visit (network : mlpNN) =    method visit (network : mlpNN) =
61      (**      (**
62        Call the method from xmlVisitor which begins the dump.        Call the method from xmlVisitor which begins the dump.
63      *)        *)
64      super#beginDump (network :> nn);      super#beginDump (network :> nn);
65        
66      (**      (**
67        Dump Multi-Layer Perceptron specific stuffs.        Dump Multi-Layer Perceptron specific stuffs.
68      *)      *)
# Line 89  object Line 86  object
86      super#openTag "mlpnn_neurons_per_layer";      super#openTag "mlpnn_neurons_per_layer";
87      super#dump2dArray network#getNeuronsPerLayer string_of_int;      super#dump2dArray network#getNeuronsPerLayer string_of_int;
88      super#closeTag "mlpnn_neurons_per_layer";      super#closeTag "mlpnn_neurons_per_layer";
89        
90      super#closeTag "mlpnn";      super#closeTag "mlpnn";
91        
92      (**      (**
93        Call the method from xmlVisitor which finishes the dump.        Call the method from xmlVisitor which finishes the dump.
94      *)      *)
95      super#endDump (network :> nn)      super#endDump (network :> nn)
96          
97  end  end

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

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