Mercurial > cortex
comparison org/cortex.org @ 4:50c92af2018e
fixed headers, make compat symlink
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Thu, 20 Oct 2011 15:10:38 -0700 |
parents | 92f8d83b5d0b |
children | e3c6d1c1cb00 |
comparison
equal
deleted
inserted
replaced
3:6c93f2018655 | 4:50c92af2018e |
---|---|
1 #+title: Simulated Senses | 1 #+title: Simulated Senses |
2 #+author: Robert McIntyre | 2 #+author: Robert McIntyre |
3 #+email: rlm@mit.edu | 3 #+email: rlm@mit.edu |
4 #+MATHJAX: align:"left" mathml:t path:"../aurellem/src/MathJax/MathJax.js" | |
5 #+STYLE: <link rel="stylesheet" type="text/css" href="../aurellem/src/css/aurellem.css"/> | |
6 #+BABEL: :exports both :noweb yes :cache no :mkdirp yes | |
7 #+INCLUDE: ../aurellem/src/templates/level-0.org | |
8 #+description: Simulating senses for AI research using JMonkeyEngine3 | 4 #+description: Simulating senses for AI research using JMonkeyEngine3 |
5 #+SETUPFILE: ../../aurellem/org/setup.org | |
6 #+INCLUDE: ../../aurellem/org/level-0.org | |
7 | |
9 | 8 |
10 * Background | 9 * Background |
11 Artificial Intelligence has tried and failed for more than half a | 10 Artificial Intelligence has tried and failed for more than half a |
12 century to produce programs as flexible, creative, and “intelligent” | 11 century to produce programs as flexible, creative, and “intelligent” |
13 as the human mind itself. Clearly, we are still missing some important | 12 as the human mind itself. Clearly, we are still missing some important |
387 (defvar *app-settings* | 386 (defvar *app-settings* |
388 (doto (AppSettings. true) | 387 (doto (AppSettings. true) |
389 (.setFullscreen false) | 388 (.setFullscreen false) |
390 (.setTitle "Aurellem.") | 389 (.setTitle "Aurellem.") |
391 ;; disable 32 bit stuff for now | 390 ;; disable 32 bit stuff for now |
392 ;;(.setAudioRenderer "Send") | 391 (.setAudioRenderer "Send") |
393 ) | 392 ) |
394 "These settings control how the game is displayed on the screen for | 393 "These settings control how the game is displayed on the screen for |
395 debugging purposes. Use binding forms to change this if desired. | 394 debugging purposes. Use binding forms to change this if desired. |
396 Full-screen mode does not work on some computers.") | 395 Full-screen mode does not work on some computers.") |
397 | 396 |
551 | 550 |
552 (defn apply-map | 551 (defn apply-map |
553 "Like apply, but works for maps and functions that expect an implicit map | 552 "Like apply, but works for maps and functions that expect an implicit map |
554 and nothing else as in (fn [& {}]). | 553 and nothing else as in (fn [& {}]). |
555 ------- Example ------- | 554 ------- Example ------- |
556 (defn jjj [& {:keys [www] :or {www \"oph yeah\"} :as env}] (println www)) | 555 (defn jjj [& {:keys [www] :or {www \"oh yeah\"} :as env}] (println www)) |
557 (apply-map jjj {:www \"whatever\"}) | 556 (apply-map jjj {:www \"whatever\"}) |
558 -->\"whatever\"" | 557 -->\"whatever\"" |
559 [fn m] | 558 [fn m] |
560 (apply fn (reduce #(into %1 %2) [] m))) | 559 (apply fn (reduce #(into %1 %2) [] m))) |
561 | 560 |