This commit is contained in:
Przemysław Owczarczyk 2019-05-15 11:24:52 +00:00
parent ccd9672796
commit f190c28cd2

View File

@ -9,22 +9,22 @@ derivation length: 50
production: production:
A(x,k) : A(x,k) :
if x >= a-20: if x >= a-20:
produce [-(a-x)F(1,0.05+0.25/k)C(1,k)]/(75)F(0.7,0.05+0.25/k)A(x+1,k+0.1) produce [-(a-x)SetGuide(path,50)F(1,0.05+0.25/k)C(1,k)]/(75)SetGuide(path,50)F(0.7,0.05+0.25/k)A(x+1,k+0.1)
elif x <= 5: elif x <= 5:
produce F(0.7,0.05+0.25/k)A(x+1,k+0.1) produce F(0.7,0.05+0.25/k)A(x+1,k+0.1)
else: else:
produce[-(30)F(1,0.05+0.25/k)B(1,k)]/(75)F(0.5,0.05+0.25/k)A(x+1,k+0.1) produce[-(30)SetGuide(path,50)F(1,0.05+0.25/k)B(1,k)]/(75)SetGuide(path,50)F(0.5,0.05+0.25/k)A(x+1,k+0.1)
B(x,k): B(x,k):
if x <= 5: if x <= 5:
r1 = random.random() r1 = random.random()
r2 = random.random() r2 = random.random()
produce [^(r1*50)F(1,0.05+0.25/k)-(20);Leaf(1)][&(r2*50)F(1,0.05+0.25/k)-(20);Leaf(1)]F(1,0.05+0.25/k)[-(20);Leaf(1)]B(x+1,k+1) produce [^(r1*50)SetGuide(path,10)F(1,0.05+0.25/k)-(20);Leaf(1)][&(r2*50)F(1,0.05+0.25/k)-(20);Leaf(1)]SetGuide(path,10)F(1,0.05+0.25/k)[-(20);Leaf(1)]B(x+1,k+1)
C(x,k): C(x,k):
if x <= 5: if x <= 5:
r1 = random.random() r1 = random.random()
r2 = random.random() r2 = random.random()
produce [^(r1*50)F(1,0.05+0.25/k)-(20);Leaf(1)]F(1,0.05+0.25/k)[-(20);Leaf(1)]C(x+1,k+1) produce [^(r1*50)SetGuide(path,50)F(1,0.05+0.25/k)-(20);Leaf(1)]SetGuide(path,50)SetGuide(path,0)F(1,0.05+0.25/k)[-(20);Leaf(1)]C(x+1,k+1)
Leaf(x): Leaf(x):
produce ~l(1) produce ,(2) ~l(1)
interpretation: interpretation:
endlsystem endlsystem