Feufochmar
/
gener-communes
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Move the json representation in the web folder

This commit is contained in:
Feufochmar 2019-11-05 17:39:29 +01:00
parent 912b51abe4
commit a57c915f94
2 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
extractor.rkt
View File

@ -15,9 +15,9 @@
; "person-name-masculine": [{"value": "...", "count": X}, ...],
; "person-name-feminine": [{"value": "...", "count": X}, ...],
; "patterns": [{"value": [...], "count": X}, ...],
; "locality-markov": {"order": X, "next": [{ "sequence": [...], "distribution": [{"value": "...", "count": X}, ...] }, ...]},
; "area-markov": {"order": X, "next": [{"sequence": [...], "distribution": [{"value": "...", "count": X}, ...] }, ...]},
; "river-markov": {"order": X, "next": [{"sequence": [...], "distribution": [{"value": "...", "count": X}, ...] }, ...]},
; "locality-name": {"order": X, "next": [{ "sequence": [...], "distribution": [{"value": "...", "count": X}, ...] }, ...]},
; "area-name": {"order": X, "next": [{"sequence": [...], "distribution": [{"value": "...", "count": X}, ...] }, ...]},
; "river-name": {"order": X, "next": [{"sequence": [...], "distribution": [{"value": "...", "count": X}, ...] }, ...]},
; },
; ...
; ],
@ -416,6 +416,6 @@
(define (extractor->jsexpr extractor)
(map region->jsexpr (hash-values extractor)))
(define *output* (open-output-file "./gener-communes.json" #:exists 'truncate/replace))
(define *output* (open-output-file "./web/gener-communes.json" #:exists 'truncate/replace))
; output lisp structure
(write-json (extractor->jsexpr *extractor*) *output*)

2
name-generator.rkt
View File

@ -218,7 +218,7 @@
gen)
; Read the file containing all the data
(define *input* (open-input-file "./gener-communes.json"))
(define *input* (open-input-file "./web/gener-communes.json"))
; Process the input and train
(define *generator* (jsexpr->generator (read-json *input*)))