view test/fcn-handle/shared-ctx.tst @ 31248:8b75954a4670

delaunayn: adjust node ordering for positive outward normal vectors (bug #53397) * delaunayn.m: Check sign of simplex volume, flip node order for negative volumes to ensure positive (outward-pointing) normal vectors. Add BISTs to check for positive volumes. * etc/News.8.md: Append function improvement note to delaunayn change paragraph under General Improvements.
author Nicholas R. Jankowski <jankowski.nicholas@gmail.com>
date Thu, 29 Sep 2022 23:09:05 -0400
parents 8dd50efa3c47
children
line wrap: on
line source

## Test that multiple handles to nested functions created in the same
## context share that call stack context, but that separately created
## handles have a separate (shared) context.

%!test
%! [add10, sub10, mul10, div10] = shared_ctx (10);
%! [add100, sub100, mul100, div100] = shared_ctx (100);
%! assert (add10 (2), 12);
%! assert (add100 (20), 120);
%! assert (sub10 (4), 8);
%! assert (sub100 (40), 80);
%! assert (mul10 (5), 40);
%! assert (mul100 (50), 4000);
%! assert (div10 (4), 10);
%! assert (div100 (40), 100);