1cb5291d-5f5e-441b-a1b7-70275bee9c83 24 4 5 decimal

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

1 f 1 g a b N hatch Δx b a - N 1 - / : x a : ξ a Δx 2 / + : R 0 : 14 mat k 1 N range R 4 k * 3 - 1 el x : R 4 k * 3 - 2 el x f : R 4 k * 2 - 1 el x : R 4 k * 2 - 2 el x g : R 4 k * 1 - 1 el ξ : R 4 k * 1 - 2 el ξ g : R 4 k * 1 el ξ : R 4 k * 2 el ξ f : x x Δx + : ξ ξ Δx + : 52 mat for R b b f b b g 22 mat stack 31 line :

k 2 M rows range X M k el 1 col : x x 1 el X Min x 2 el X Max stack : Y M k el 2 col : y y 1 el Y Min y 2 el Y Max stack : 22 mat for

x f 0.35 15 x * sin * 0.1 - : x g 5 x 3^* - 2 x * + 0.4 - : 21 sys

G x f x g 0.1 0.5 30 hatch :

x f x g G 3 1 sys x f x g G 3 1 sys

1 f 1 g a b Nx Ny d o fill Δx b a - Nx 1 - / : x a : X 0 : F 0 : G 0 : ΔY 0 : R 0 : N 0 : 18 mat k 1 Nx range X k el x : F k el x f : G k el x g : ΔY G k el F k el - abs : x x Δx + : 51 line for Δy ΔY max abs Ny 1 - / : k 1 Nx range F k el G k el < s 1 : c red : 12 mat s 1 - : c blue : 12 mat if Y F k el G k el F k el s Δy * + range N N 1 + : R N 1 el X k el : R N 2 el Y : R N 3 el o : R N 4 el d : R N 5 el c : 61 line for 21 line for R 51 line :

G x f x g 0.1 0.5 100106 . fill :

●

☺

■

█

░

o

x

x f x g G 3 1 sys

2 φ a b c d Nx Ny δ o fill Δx b a - Nx 1 - / : Δy d c - Ny 1 - / : x 0 : y 0 : R 0 : N 0 : 16 mat m 1 Nx range x m el a m Δx * + : for n 1 Ny range y n el c n Δy * + : for m 1 Nx range n 1 Ny range x m el y n el φ N N 1 + : R N 1 el x m el : R N 2 el y n el : R N 3 el o : R N 4 el δ : R N 5 el lightgreen : 61 line 0 if for 11 line for R 51 line :

x y φ y x f x g lele (y x g x f lele (| (:

G x y φ 0.1 0.5 0.5 - 0.25 100506 . fill :

●

☺

■

█

░

o

x

G rows 1886

x f x g G 3 1 sys

Random Fill with N trys the area in the box (a,b)x(c,d) for condition φ(x,y) 2 φ a b c d N rfill n 0 : R 0 : X 0 : Y 0 : 14 mat k 1 N range x a N random eval N / b a - (* + : y c N random eval N / d c - (* + : 12 mat x y φ n n 1 + : R n 1 el x : R n 2 el y : 31 line 0 if 21 line for R2 R 1 csort : 31 line :

x f x 2^1 - : x g x x cos - : 21 sys

x y h y x f x g lele (y x g x f lele (| (:

N 1000 :

G x y h 1 - 11 - 1 N rfill :

x f x g G 3 1 sys

a c b d 22 mat 1 - 1 - 2122 mat :

G rows 157

x y h y c d int x a b int #