šola/ana2/fja.scad


1
2
3
4
5
6
7
8
9
10
11
12
13

echo(version=version());
function sinh(x) = (exp(1)-exp(-x))/2;
function f(x, y, z) = sinh(z)*sinh(y)-sin(x);
epsilon = 0.01;
rob = 1;
korak = 0.1;
particle = 0.1;
for (x = [-rob : korak : rob])
    for (y = [-rob : korak : rob])
        for (z = [-rob : korak : rob])
            if (f(x, y, z) < epsilon)
                translate([x, y, z])
                    cube(particle);