32 |
|
|
33 |
@author Matthieu Lagacherie |
@author Matthieu Lagacherie |
34 |
@author Olivier Ricordeau |
@author Olivier Ricordeau |
35 |
@since 07/28/2003 |
@since 28/07/2003 |
36 |
*) |
*) |
37 |
|
|
38 |
open Nn |
open Nn |
39 |
open DefaultVisitor |
open DefaultVisitor |
40 |
|
|
41 |
class tdNN = |
class tdNN = |
42 |
object (self : 'a) |
object (self) |
43 |
inherit [('a) defaultVisitor] nn |
inherit nn |
44 |
|
|
45 |
val _networkType = "TDNN" |
(** |
46 |
|
The Ctor. |
47 |
|
*) |
48 |
|
initializer |
49 |
|
_networkType <- "TDNN" |
50 |
|
|
51 |
val mutable _outputActivation = [|[|[|0.0|]|]|] |
val mutable _outputActivation = [|[|[|0.0|]|]|] |
52 |
|
|
69 |
val mutable _fieldSize = [|0|] |
val mutable _fieldSize = [|0|] |
70 |
|
|
71 |
(** |
(** |
|
The generic accept method. |
|
|
*) |
|
|
method accept (visitor : ('a) defaultVisitor) = |
|
|
visitor#visit self |
|
|
|
|
|
(** |
|
72 |
|
|
73 |
*) |
*) |
74 |
method getOutputActivation = |
method getOutputActivation = |
92 |
method getDelay = |
method getDelay = |
93 |
ref _delay |
ref _delay |
94 |
|
|
95 |
method getFeaturesNb layer = |
method getFeaturesNb = |
96 |
_featuresNb.(layer) |
_featuresNb |
|
|
|
|
method getTimeNb layer = |
|
|
_timeNb.(layer) |
|
97 |
|
|
98 |
method getFieldSize layer = |
method getTimeNb = |
99 |
_fieldSize.(layer) |
_timeNb |
100 |
|
|
101 |
method getNetworkType = |
method getFieldSize = |
102 |
_networkType |
_fieldSize |
103 |
|
|
104 |
(** |
(** |
105 |
Accessors set |
Accessors set |