OverviewFilesCommitsIssuesDocsReleasesPeers

opencog-generate commits / 91314e0

Spell-check
91314e04401382cfbbeab1c5b46ee0ad077f1e66
by Linas Vepstas <linasvepstas@gmail.com> · 2020-04-21T18:40:10.000Z

Changed files (1) +7 -7

demo/seir.scm +7 -7
……@@ -41,7 +41,7 @@
4141;
4242; Consider, for example, a graphical editor - something where you can
4343; drag-n-drop, hand-draw interacting bubble diagrams. Something easy
44; to use - something a medical proffesional could get the hang of in
44; to use - something a medical professional could get the hang of in
4545; half an hour - something where a disease model could be sketched out
4646; with bubbles and lines and flow-charts. The goal of Atomese is that
4747; it becomes easy -- really easy -- to convert such diagrams into
……@@ -240,7 +240,7 @@
240240; network has been generated.
241241;
242242; ----
243; Network Gneration parameters.
243; Network Generation parameters.
244244
245245; The key identifying the likelihood of creating a particular kind of
246246; network node. This weighting controls the selection of the particular
……@@ -386,7 +386,7 @@
386386(format #t "Found a network of size ~D\n" (cog-arity (gar just-one)))
387387
388388; ---------------------------------------------------------------------
389; Assign initial suceptibility and infirmity values to individuals
389; Assign initial susceptibility and infirmity values to individuals
390390; in the network. These will be randomly generated numbers.
391391
392392; Each individual is linked back to the anchor node. Each individual
……@@ -448,14 +448,14 @@
448448; Start applying state transition rules to the network.
449449;
450450; This will be done "by hand" for the first few rounds, just to show how
451; it works. Several differnt styles will be shown. One is by directly
451; it works. Several different styles will be shown. One is by directly
452452; running scheme code. A second, better way is by applying Atomese
453; search-and-update rules directly to the atomspace contents. The
453; search-and-update rules directly to the AtomSpace contents. The
454454; second way is ultimately simpler, and provides better automation,
455455; but both ways are illustrated, for comparison.
456456
457457; ------ But first, a handy utility:
458; Execute some atomese. Assume that it returns a Setlink.
458; Execute some Atomese. Assume that it returns a SetLink.
459459; Unwrap the SetLink, discard it, return the contents.
460460(define (exec-unwrap ATOMESE)
461461 (define set-link (cog-execute! ATOMESE))
……@@ -469,7 +469,7 @@
469469; It requires, as input, the list of all relations created above.
470470; As such, it is "static", depending on a static relationship list.
471471; Later in the demo, we'll replace this loop by a search over the
472; Atomspace.
472; AtomSpace.
473473(define (run-one-transmission-step)
474474
475475 ; The transmission rule is directed, from second to first individual.