Adding support for a genesis DB.

This commit is contained in:
James Wells 2023-03-22 19:20:16 -07:00
parent d5fcd11592
commit 7a9225ce86
Signed by: jwells
GPG key ID: 73196D10B8E65666
7 changed files with 35 additions and 4 deletions

View file

@ -0,0 +1,13 @@
##########################################
### Perform Fibanaci sequence up to 10 ###
##########################################
set GHINT [split "math, fib" ,]
proc fib {x} {
if {<= $x 1} {
return 1
} else {
+ [fib [- $x 1]] [fib [- $x 2]]
}
}
puts [fib 20]