;; This file:
;;   http://angg.twu.net/FENNEL/test0.fnl.html
;;   http://angg.twu.net/FENNEL/test0.fnl
;;           (find-angg "FENNEL/test0.fnl")
;; Author: Eduardo Ochs <eduardoochs@gmail.com>
;;
;; See: (find-es "fennel" "test-blocks")


(fn _G.square [a] (* a a))
(fn _G.cube   [a] (* a (_G.square a)))

;; (find-efunctiondescr 'fennel-mode)
;; (find-fennelmodegrep "grep --color=auto -nH --null -e mode-map fennel-mode.el")
;; (eek "M-h M-k  C-x C-e  ;; lisp-eval-last-sexp")
;; (eek "M-h M-k  C-c C-c  ;; lisp-compile-defun")
;; (eek "M-h M-k  C-c C-n  ;; lisp-eval-form-and-next")
;; (eek "M-h M-k  C-c C-p  ;; lisp-eval-paragraph")
;; (eek "M-h M-k  C-c C-r  ;; lisp-eval-region")
;; (eek "M-h M-k  C-c C-v  ;; fennel-show-variable-documentation")
;; (eek "M-h M-k  C-c C-k  ;; fennel-reload")

(comment "Test block:
• (eepitch-fennel)
• (eepitch-kill)
• (eepitch-fennel)
,reload test0
;; (find-fenneldoc "index")

(_G.square 5)
(_G.cube 5)

")

;; Local Variables:
;; coding:  utf-8-unix
;; End: