51 |
*) |
*) |
52 |
class xmlMlpnnVisitor = |
class xmlMlpnnVisitor = |
53 |
object |
object |
54 |
inherit ['a] xmlVisitor as super |
inherit [mlpNN] xmlVisitor as super |
55 |
|
|
56 |
(** |
(** |
57 |
The method which dumps Multi Layer Perceptron specific stuffs. |
The method which dumps Multi Layer Perceptron specific stuffs. |
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; |
65 |
|
|
66 |
(** |
(** |
67 |
Dump Multi-Layer Perceptron specific stuffs. |
Dump Multi-Layer Perceptron specific stuffs. |
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 |
96 |
|
|
97 |
end |
end |