Mercurial > octave
view test/nest/recursive_nest.m @ 31597:65157e496f5d
maint: Merge stable to default.
author | Arun Giridhar <arungiridhar@gmail.com> |
---|---|
date | Wed, 30 Nov 2022 08:03:06 -0500 |
parents | fc4bb4bd1d5e |
children |
line wrap: on
line source
## recursive_nest.m function x = recursive_nest () global recursive_nest_inc = 1 x = 5; f (20); function f (n) if (n > 0) x = x + recursive_nest_inc; f (n - 1); end endfunction endfunction