45 |
val mutable _error = [|[|0.0|]|] |
val mutable _error = [|[|0.0|]|] |
46 |
val mutable _weights = [|[|[|0.0|]|]|] |
val mutable _weights = [|[|[|0.0|]|]|] |
47 |
val mutable _gradients = [|[|[|0.0|]|]|] |
val mutable _gradients = [|[|[|0.0|]|]|] |
48 |
val mutable _layer_nb = 0 |
val mutable _layerNb = 0 |
49 |
val mutable _neurons_per_layers = [|0|] |
val mutable _neuronsPerLayers = [|0|] |
50 |
|
|
51 |
(** |
(** |
52 |
Accessors get |
Accessors get |
53 |
*) |
*) |
54 |
method get_outputActivation = _outputActivation |
method getOutputActivation = _outputActivation |
55 |
method get_intputSum = _inputSum |
method getIntputSum = _inputSum |
56 |
method get_error = _error |
method getError = _error |
57 |
method get_weights = _weights |
method getWeights = _weights |
58 |
method get_gradients = _gradients |
method getGradients = _gradients |
59 |
method get_layer_nb = _layer_nb |
method getLayerNb = _layerNb |
60 |
method get_neurons_per_layer layer = _neurons_per_layers.(layer) |
method getNeuronsPerLayer layer = _neuronsPerLayers.(layer) |
61 |
|
|
62 |
(** |
(** |
63 |
Accessors set |
Accessors set |
64 |
*) |
*) |
65 |
method set_outputActivation outputActivation = _outputActivation <- outputActivation |
method setOutputActivation outputActivation = _outputActivation <- outputActivation |
66 |
method set_intputSum inputSum = _inputSum <- inputSum |
method setInputSum inputSum = _inputSum <- inputSum |
67 |
method set_error error = _error <- error |
method setError error = _error <- error |
68 |
method set_weights weights = _weights <- weights |
method setWeights weights = _weights <- weights |
69 |
method set_gradients gradients = _gradients <- gradients |
method setGradients gradients = _gradients <- gradients |
70 |
method set_layer_nb layer_nb = _layer_nb <- layer_nb |
method setLayerNb layerNb = _layerNb <- layerNb |
71 |
method set_neurons_per_layer neurons_per_layers = _neurons_per_layers <- neurons_per_layers |
method setNeuronsPerLayer neuronsPerLayers = _neuronsPerLayers <- neuronsPerLayers |
72 |
method set_layer_nb layer_nb = _layer_nb <- layer_nb |
method setLayerNb layerNb = _layerNb <- layerNb |
73 |
|
method setInputActivation inputSumActivation = _inputSum.(0) <- inputSumActivation |
74 |
end |
end |