hatch()

5a1f082b-6481-4f70-82c7-5e2c06062a4b 11 4 5 decimal

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

x g 5 x 3^* - 2 x * + 0.4 - :

x f 0.35 15 x * sin * 0.1 - :

hatch()

1 f 1 g x.1 x.2 n hatch dx x.2 x.1 - n / (: h x.1 x.1 f x.1 x.1 g 22 mat : x x.1 x.2 dx - x.1 dx + range h h x dx 2 / + x dx 2 / + g x dx 2 / + x dx 2 / + f x dx + x dx + f x dx + x dx + g 42 mat stack : for h 41 line :

x f x g x f x g 0.1 0.5 50 hatch 3 1 sys fill()

1 f 1 g x.1 x.2 dx dy d fill h 05 matrix : x x.1 x.2 x.1 dx + range x g x f - 0 > (y x f x g x f dy + range h h x y . d red 15 mat stack : for y x g x f x g dy + range h h x y . d blue 15 mat stack : for if for h 31 line :

x f x g x f x g 0.1 0.5 0.01 0.05 10 fill 3 1 sys