Mercurial > hg > jslab
annotate src/scheme/ica/train.scm @ 0:bf79fb79ee13
Initial Mercurial check in.
| author | samer |
|---|---|
| date | Tue, 17 Jan 2012 17:50:20 +0000 |
| parents | |
| children |
| rev | line source |
|---|---|
| samer@0 | 1 (import "samer.models.*") |
| samer@0 | 2 |
| samer@0 | 3 |
| samer@0 | 4 (define (preflush) null) |
| samer@0 | 5 (define (alt-train-ica ica) |
| samer@0 | 6 (define ica-train |
| samer@0 | 7 (node (Node. "learn" (.getNode ica)) |
| samer@0 | 8 (.getDiffTrainer ica))) |
| samer@0 | 9 |
| samer@0 | 10 (addtasks |
| samer@0 | 11 ica-train |
| samer@0 | 12 (sub 6 (task (.diffFlush ica-train))) |
| samer@0 | 13 (sub (* 6 256) |
| samer@0 | 14 (seq |
| samer@0 | 15 (task (preflush) (.flush ica-train)) |
| samer@0 | 16 (sub 16 (task (exec ica "basis"))) |
| samer@0 | 17 ) |
| samer@0 | 18 ) |
| samer@0 | 19 ) |
| samer@0 | 20 ica-train |
| samer@0 | 21 ) |