% Lezione 8 % 
DEF manici = <<0,0>,<1,0>,<1,1>,<-1,1>>;

DEF dominio = intervals:1:30;
DEF out=STRUCT:<@0:dominio,dominio>;

DEF curva = Hermite:manici;

DEF out = MAP: curva: dominio;

SVG:out:10:'/Users/portuesi/Desktop/out.svg';
VRML:out:'/Users/portuesi/Desktop/out.wrl';

DEF manici = <<0,0>,<10,0>,<10,10>,<0,10>,<10,10>>;

DEF dominio = intervals:1:30;
DEF curva = Bezier:s1:manici;

DEF out = MAP: curva: dominio;

DEF pol1 = <<0,0>,<10,10>>;
DEF pol2 = <<0,0>,<10,0>,<10,10>>;
DEF pol3 = <<0,0>,<10,0>,<0,10>,<10,10>>;
DEF pol4 = <<0,0>,<10,0>,<10,10>,<0,10>,<0,0>>;

DEF domain = intervals:1:30;

DEF out = STRUCT:<
    MAP:(Bezier:s1:pol1):domain, polyline:pol1, T:1:15,
    MAP:(Bezier:s1:pol2):domain, polyline:pol2, T:1:15,
    MAP:(Bezier:s1:pol3):domain, polyline:pol3, T:1:15,
    MAP:(Bezier:s1:pol4):domain, polyline:pol4
    >;

SVG:out:10:'/Users/Portuesi/Desktop/out.svg'