14812e69-05c8-43b4-b4d3-ddba55064f3d 4 6 5 auto

&[DATE] &[TIME] - &[FILENAME]

n 1000 :

In this module, 'spec' is pased as algo name, wild in 'p' => spec(a,b,c) to be specified in-situ. Thus, 'p' is nested on the collected spec(a,b,c) and "Unested" after in the module.

Unform ...  -1 < rnd < 1 n rnd μ n 11 line : 2 μ Random * 1 - 21 line :

data spec pts i 1 data rows range p i el a b c spec : for v p 1 el : Unest 'p' j 2 p rows range v v p j el stack : for data v augment 51 line :

XY n rnd n rnd augment :

X XY 1 col :

Y XY 2 col :

Random fill the circle UV k 1 : i k XY rows range X i el (2^Y i el (2^+ sqrt 1 ≤ u i el X i el : v i el Y i el : 21 line u i el 0 : v i el 0 : 21 line if for k k 1 + : 31 line u v augment 21 line :

"plotG" module is slow: too many calls from greedy
sub-functions col(,,)...stack(,,)...augment(,,)
Its equivalent below is ~ 12 times faster [1000 pts]   
and much more élégant  for publishing. Pts UV 1 col UV 2 col . 5 blue plotG ≡

a b c spec . 8 red 13 mat :

t0 1 time :

pts UV a b c spec pts :

frame 1 - 111 - 1 - 111 - 1 - 125 mat transpose :

frame pts 2 1 sys

-------- compute time below the plot -----------------

1 time t0 - 38 sec *

X i el (2^2 Y i el * (2^+ sqrt

Prolate/Oblate Ellipse, not UnitCircle as well.

2 X i el * (2^Y i el (2^+ sqrt

X i el (2^Y i el (2^+ sqrt 1 ≠

r 1 ≠ NOT unit circle ≡