/[marvin]/marvin/src/libnn/nn.ml
ViewVC logotype

Diff of /marvin/src/libnn/nn.ml

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

revision 1.10 by matthieu, Wed Jul 16 14:42:18 2003 UTC revision 1.11 by matthieu, Wed Jul 16 21:45:15 2003 UTC
# Line 50  open Pattern Line 50  open Pattern
50  class virtual ['a] nn =  class virtual ['a] nn =
51  object  object
52    val mutable _step = 0    val mutable _step = 0
53    val mutable _corpus = new corpus [|[|0.0|]|]    val mutable _corpus = new corpus
54    method virtual accept : 'a -> unit    method virtual accept : 'a -> unit
55    method virtual print : unit    method virtual print : unit
56    method addPattern pattern = _corpus#addPattern pattern    method addPattern pattern = _corpus#addPattern pattern

Legend:
Removed from v.1.10  
changed lines
  Added in v.1.11

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