36 |
*) |
*) |
37 |
|
|
38 |
open Nn |
open Nn |
39 |
|
open DefaultVisitor |
40 |
|
|
41 |
class virtual ['a] mlpNN = |
class mlpNN = |
42 |
object |
object (self : 'a) |
43 |
inherit ['a] nn |
inherit [('a) defaultVisitor] nn |
44 |
val mutable _outputActivation = [|[|0.0|]|] |
val mutable _outputActivation = [|[|0.0|]|] |
45 |
val mutable _inputSum = [|[|0.0|]|] |
val mutable _inputSum = [|[|0.0|]|] |
46 |
val mutable _error = [|[|0.0|]|] |
val mutable _error = [|[|0.0|]|] |
50 |
val mutable _neuronsPerLayers = [|0|] |
val mutable _neuronsPerLayers = [|0|] |
51 |
|
|
52 |
(** |
(** |
53 |
|
The generic method accept |
54 |
|
*) |
55 |
|
method accept (visitor : ('a) defaultVisitor) = visitor#visitMlpnn self |
56 |
|
|
57 |
|
(** |
58 |
Accessors get |
Accessors get |
59 |
*) |
*) |
60 |
method getOutputActivation = ref _outputActivation |
method getOutputActivation = ref _outputActivation |