qfwfq/qfwfq.scm

76 lines
2.2 KiB
Scheme
Raw Permalink Normal View History

2006-09-11 17:00:50 +00:00
;; -*- mode: scheme -*-
;;
;; a simple setup for testing ideas about visual programming
;;
;; copyright (C) 2004 FoAM vzw
;; You are granted the rights to distribute and use this software
;; under the terms of the GNU Lesser General Public License as
;; published by the Free Software Foundation; either version 2.1 of
;; the License, or (at your option) any later version. The LGPL is
;; distributed with this code (see: LICENCE) and available online
;; at http://www.gnu.org/copyleft/lesser.html
2006-09-11 17:00:50 +00:00
;; authors
;; - nik gaffney <nik@fo.am>
;; requirements
;; - based on the MrEd environment for PLT scheme
;; - uses MrLib for graph display and editing
;; commentary
;; aims to provide a simple framework for testing VPL models, ideas
;; or techniques. this code is based around the implicit assumption
;; that a VPL will be a graph based representation which is mapable
2006-10-30 09:11:19 +00:00
;; to a sexp (or collection of sexps), so some things should be
2006-09-11 17:00:50 +00:00
;; reasonably common between different (although admittedly graph
2006-10-30 09:11:19 +00:00
;; based) VPLs, for example graph traversal, node placement and layout.
2006-09-11 17:00:50 +00:00
;; it is not intended to be complete, exhaustive, or stable.
;; changes
;; 2006-09-11
;; - scraped into coherence from various sources
;; 2006-11-10
;; - scattered energy stabilisation attempts
;; - scattered modules and files
2006-09-11 17:00:50 +00:00
(module qfwfq mzscheme
(require "punctiform-convergence/graph.scm"
"punctiform-convergence/eddies.scm"
"punctiform-convergence/snipets.scm"
"punctiform-convergence/layout.scm"
"punctiform-convergence/scritch.scm")
2006-09-11 17:00:50 +00:00
(provide graph-pasteboard%
node-snip%
2006-10-30 09:11:19 +00:00
output-snip%
recursive-snip%
2006-12-18 17:20:15 +00:00
make-node-snip
2006-09-11 17:00:50 +00:00
insert-nodes
add-links
selected-snips
find-inputs
find-outputs
2006-09-11 17:00:50 +00:00
set-node-text
get-node-text
set-node-value
get-node-value
draw-parse-tree
colour-tree
2006-09-11 17:00:50 +00:00
wobble-tree
relax-tree
2006-09-11 17:00:50 +00:00
eval-tree
shadowpi-tree
circles-tree
encapsulate
2006-09-11 17:00:50 +00:00
tree->sexp
to-string
debug)
2006-09-11 17:00:50 +00:00
) ;; end of module