homogenize names with lpy instead of pylsystems (2)

git-svn-id: svn+ssh://scm.gforge.inria.fr/svnroot/vplants/vplants/trunk/lpy@5325 ab253cce-29fb-0310-bb2f-979600cdbdeb

Author: fredboudon

AUTHORS.txt

@@ -0,0 +1,2 @@
+Authors:
+Fr�d�ric Boudon

ChangeLog.txt

@@ -0,0 +1,2 @@
+29 05 2007: 
+  * First version using sconsX and new version of plantgl

LICENSE.txt

@@ -0,0 +1,12 @@
+Metadata-Version: 1.0
+Name: pylsystems
+Version: 1.0.0
+Summary: Python L-systems Package.
+Home-page: http://openalea.gforge.inria.fr/dokuwiki/doku.php?id=packages:visualization:plantgl:plantgl
+Author: Frederic Boudon
+Author-email: [email protected]
+License: GPL
+Description: 
+Lindenmayer systems are a powerfull formalism to describe generation of fractal objects and plants.
+        
+Platform: UNKNOWN

PKG-INFO

@@ -0,0 +1,8 @@
+Please, read the up to date web page at:
+http://openalea.gforge.inria.fr/
+
+	
+
+
+
+

README.txt

@@ -0,0 +1,43 @@
+# -*-python-*-
+
+from openalea.sconsx import config, environ
+import os, fnmatch
+
+Config= config.Config
+ALEAConfig= config.ALEAConfig
+ALEAEnvironment= config.ALEAEnvironment
+
+pj= os.path.join
+
+name='pylsystems'
+
+SConsignFile()
+
+options = Options(['../options.py', 'options.py'], ARGUMENTS )
+prj_conf= ALEAConfig(name,['boost_python', 'plantgl','qt4'])
+
+# Set all the common options for the package
+prj_conf.UpdateOptions( options )
+
+prj_env= Environment( options= options )
+prj_conf.Update( prj_env )
+
+# Generate Help available with the cmd scons -h
+Help(options.GenerateHelpText(prj_env))
+
+# Set build directory
+prefix= prj_env['build_prefix']
+BuildDir( prefix, '.' )
+
+prj_env.Prepend(LIBPATH='$build_libdir')
+prj_env.Append( CPPPATH = pj( '$build_includedir','pylsystems' ) )
+
+# Build stage
+SConscript( pj(prefix,"src/cpp/SConscript"),
+            exports={"env":prj_env} )
+
+SConscript( pj(prefix,"src/wrapper/SConscript"),
+            exports={"env":prj_env} )
+
+
+Default("build")

SConstruct

@@ -0,0 +1,6 @@
+import os
+compiler='gcc'
+plantgl_dir = os.path.abspath('../PlantGL')
+plantgl_lib=plantgl_dir+'/build-scons/lib'
+plantgl_include=plantgl_dir+'/src/cpp'
+QTDIR='/usr'

options_linux.py

@@ -0,0 +1,35 @@
+# Distutils parameters file
+# Use this file to specify custom parameters to pass to setup.py script
+# Uncomment necessary options
+
+[global]
+# verbose=0
+
+[egg_info]
+tag_build = .dev
+tag_svn_revision = 1
+
+[build]
+##### scons parameters (use options.py instead)
+#scons-ext-param=
+
+#####scons exe path
+#scons-path=C:\Python24
+
+#####distutils build directory
+#build-lib=
+
+[install]
+
+#####openalea data directory
+#external-prefix=
+
+[bdist_rpm]
+requires= python>=2.4, boost, qhull, qt < 4, readline
+
+build_requires= python>=2.4, python-devel
+build_requires= boost>= 1.33.1, boost-devel
+build_requires= scons >= 0.96.91
+build_requires= distx, sconsx
+build_requires= qt-devel < 4, qhull-devel, flex, bison
+build_requires= readline-devel

setup.cfg

@@ -0,0 +1,93 @@
+# -*- coding: iso-8859-15 -*-
+
+# Header
+
+import os, sys
+pj = os.path.join
+
+sys.path.insert(0,pj(os.path.dirname(__file__),'src', 'openalea', 'pylsystems'))
+import __version__
+
+##############
+# Setup script
+
+# Package name
+name = 'pylsystems'
+namespace = 'openalea'
+pkg_name= namespace + '.' + name
+
+version= __version__.LPY_VERSION_STR
+print pkg_name,': version =',version
+
+description= 'PyLsystems package for OpenAlea.' 
+long_description= '''
+A Python version of Lindenmayer Systems.
+Based on Dr. Prusinkiewicz et al. cpfg-lpfg specifications.
+Implemented by the Virtual Plants team.'''
+
+# Author
+author= 'Frederic Boudon'
+author_email= '[email protected]'
+
+url= 'http://openalea.gforge.inria.fr/dokuwiki/doku.php?id=packages:vplants:lpy:main'
+
+# LGPL compatible INRIA license
+license= 'Cecill V2' 
+
+# Scons build directory
+build_prefix= "build-scons"
+
+from setuptools import setup
+
+
+setup(
+    name="VPlants.PyLsystems",
+    version=version,
+    description=description,
+    long_description=long_description,
+    author=author,
+    author_email=author_email,
+    url=url,
+    license=license,
+    
+    scons_scripts = ['SConstruct'],
+    scons_parameters = ["build_prefix="+build_prefix],
+    
+    namespace_packages = [namespace],
+    create_namespaces = True,
+    
+    # pure python  packages
+    packages = [ pkg_name, pkg_name+'.gui', pkg_name+'.wralea' ],
+    py_modules = ['pylsysgui_postinstall'],
+
+    # python packages directory
+    package_dir = { '' : 'src',},
+                   
+    # Add package platform libraries if any
+    include_package_data = True,
+    package_data = {'' : ['*.pyd', '*.so', '*.lpy'],},
+    zip_safe = False,
+
+    # Specific options of openalea.deploy
+    lib_dirs = {'lib' : pj(build_prefix, 'lib'),},
+    bin_dirs = {'bin':  pj(build_prefix, 'bin'),},
+    inc_dirs = {'include' : pj(build_prefix, 'include') },
+    share_dirs = {'share' : 'share', },
+
+    # Dependencies
+    # entry_points
+    entry_points = {
+        "wralea": ["pylsystem = openalea.pylsystems.wralea",],
+        'gui_scripts': ['lpy = openalea.pylsystems.gui.lsyswindow:main',]
+        },
+    
+    postinstall_scripts = ['pylsysgui_postinstall'],
+    
+    # Dependencies
+    setup_requires = ['openalea.deploy'],
+    dependency_links = ['http://openalea.gforge.inria.fr/pi'],
+    install_requires = ['PyOpenGL', 'plantgl'],
+
+    )
+
+

setup.py

@@ -0,0 +1,99 @@
+initial_auxin_level = 10.
+min_auxin_level = 5.
+medium_auxin_level = (initial_auxin_level+min_auxin_level)/2.
+
+mstate = 8
+internal_degradation_rate = 0.0
+flower_degradation_rate = 0.0
+root_auxin_level = 0.0
+transport_speed = 1/3. # should be < 1/3. for numerical constraints
+maxorder = 4
+
+import time as t
+
+timing = 0
+def Start():
+	global timing	
+	timing = t.time()
+
+def End():
+	print 'Execution time :',t.time()-timing
+
+def txt(val):
+	return str(round(val,2))[:5]
+
+Axiom: #(0.5)R(0)M(mstate,0)
+
+derivation length: 500
+ignore: +-
+production:
+
+
+M(state,order) :
+	if state > 0:
+		angle = 20+70*state/(mstate*(order+1))
+		if state % 2:
+		 	produce I(initial_auxin_level) [+(angle)m(order+1)]M(state-1,order)
+		else:
+			produce I(initial_auxin_level) [-(angle)m(order+1)]M(state-1,order)
+	else:
+		produce I(initial_auxin_level)L
+
+
+I(a) < m(order) :
+	if order >= maxorder:
+		produce *
+	if a <= min_auxin_level:
+		produce M(mstate/(2**order),order)
+
+
+
+I(a) > M(state,i) :
+	produce  I(initial_auxin_level)
+
+I(n) < I(a) > L :
+	produce  I((a+(n-a)*transport_speed)*(1-internal_degradation_rate - flower_degradation_rate))
+
+I(n) < I(p) > [I(k)]I(q) :
+	plevel = p + ((n+q+k)-3*p)*transport_speed  - p * internal_degradation_rate
+	produce I(plevel)
+
+I(n) < I(p) > I(q) :
+	produce I(p + (n+q-2*p)*transport_speed - p * internal_degradation_rate)
+
+
+R(r) < I(n) > I(p):
+	nn = (root_auxin_level+p-2*n)*transport_speed
+	produce I(n+nn)
+
+R(r) < I(n) > [I(k)]I(p):
+	nn = (root_auxin_level+p+k-3*n)*transport_speed
+	produce  I(n+nn)
+
+R(r) > I(n) --> R(r+(n-root_auxin_level)*transport_speed)
+
+homomorphism:
+
+I(a) :
+	col = 1
+	if min_auxin_level <= a  < medium_auxin_level:
+		col = 4
+	elif a < min_auxin_level:
+		col = 3
+	produce ;(col)F(10)[+(90)f(2);(3)@L(txt(a))]
+
+M(state,i) --> F(2);(2)@O(1)
+
+
+m(order) --> ;(2)F(1)@O(0.5)
+
+L --> ;(3)@O(1)
+
+R(r) :
+	produce[+(180)F(max(2*r,1)/10.)@O(max(r,1)/10.)-(90)f(2*max(r,1)/10.);(3)@L(txt(r))]
+
+endlsystem
+###### INITIALISATION ######
+
+def __initialiseContext__(context):
+	context.turtle.setMaterial(1,Material('Brown',Color3(33,22,6),2.72727,Color3(40,40,40),Color3(0,0,0),1,0))

share/apicaldominancy.lpy

@@ -0,0 +1,53 @@
+from random import *
+p1 = 0.750000
+p2 = 0.250000
+m = 0
+
+
+Axiom: #(1)[f(50)+90f(10)]-(90)P(1,0)
+derivation length: 100
+
+# A = branching state
+# B = non-branching state 
+
+def Start():
+	global m
+	m = 0
+
+production:
+
+P(x,t) :
+	if t <= 10 : produce T[G(x)]P(x,t+1)
+	else  :
+		global m
+		m = 1
+		produce *
+
+G(x) : 
+	if m==1 :
+		produce +(90)S(x)
+
+S(x) :
+	if random() <= 0.5: produce A(x)
+	else: produce B(x)
+
+A(x) : 
+	if random() <= p1: produce I[M(x)]A(1-x)
+	else: produce IB(1-x)
+
+B(x) :
+	if random() <= p2: produce IB(1-x)
+	else: produce I[M(x)]A(1-x)
+
+homomorphism:
+
+T :    produce ;(1)f(40);(1)@c(1)
+M(x) : 
+	if x==0 :   produce ;(2)+F(20)
+	elif x==1 : produce ;(2)-F(20)
+
+I    : produce ;(1)F(2)
+A(x) : produce ;(1)@O(3)
+B(x) : produce ;(2)@O(3)
+
+endlsystem