/[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.14 by matthieu, Wed Jul 23 15:47:37 2003 UTC revision 1.15 by matthieu, Mon Jul 28 21:32:13 2003 UTC
# Line 49  open Pattern Line 49  open Pattern
49    
50  class virtual ['a] nn =  class virtual ['a] nn =
51  object  object
52    
53    val mutable _step = 0.1    val mutable _step = 0.1
54    val mutable _corpus = new corpus    val mutable _corpus = new corpus
55    
56    method virtual accept : 'a -> unit    method virtual accept : 'a -> unit
57      method virtual getNetworkType : string
58    
59    method addPattern pattern = _corpus#addPattern pattern    method addPattern pattern = _corpus#addPattern pattern
60    method getCorpus = _corpus    method getCorpus = _corpus
61    method getLearnPos = _corpus#getLearnPos    method getLearnPos = _corpus#getLearnPos

Legend:
Removed from v.1.14  
changed lines
  Added in v.1.15

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