RosettaCodeData/Task/Jacobsthal-numbers/J/jacobsthal-numbers-1.j
2023-07-01 13:44:08 -04:00

2 lines
81 B
Text

ja=: 3 %~ 2x&^ - _1x&^ NB. Jacobsthal
jl=: 2x&^ + _1x&^ NB.Jacobsthal-Lucas