Une galerie d’intervalles

]a~;~+\infty[

interval1.jpg

Voici son code:

u:=1cm;
figure (-8u,-8u,10u,8u);

numeric mi,pi,a;
mi:=-8;
pi:=8;
a:=0;

pair A;
A=(a*u,0);

path tt;
for i:=mi upto (a-1):
  for j:=0 upto 4:
    tt := ((j*0.2*u)-2,-4)--((j*0.2*u)+2,4);
    draw tt shifted (i*u,0);
    endfor;
endfor;

label.bot(btex $a$ etex,A shifted(0,-10));

draw (mi*u,0)--A;
draw A--(pi*u,0) withcolor red withpen pencircle scaled 2pt;

pair B,C,D,E;
B=A shifted(0,10);
C=A shifted(-4,10);
D=A shifted(0,-10);
E=A shifted(-4,-10);

draw C--B--D--E withcolor red withpen pencircle scaled 2pt;

fin;

[a~;~+\infty[

interval2.jpg

Voici son code:

u:=1cm;
figure (-8u,-8u,10u,8u);

numeric mi,pi,a;
mi:=-8;
pi:=8;
a:=0;

pair A;
A=(a*u,0);

path tt;
for i:=mi upto (a-1):
  for j:=0 upto 4:
    tt := ((j*0.2*u)-2,-4)--((j*0.2*u)+2,4);
    draw tt shifted (i*u,0);
    endfor;
endfor;

label.bot(btex $a$ etex,A shifted(0,-10));

draw (mi*u,0)--A;
draw A--(pi*u,0) withcolor red withpen pencircle scaled 2pt;

pair B,C,D,E;
B=A shifted(0,10);
C=A shifted(4,10);
D=A shifted(0,-10);
E=A shifted(4,-10);

draw C--B--D--E withcolor red withpen pencircle scaled 2pt;

fin;

]-\infty~;~a[

interval3.jpg

Voici son code:

u:=1cm;
figure (-8u,-8u,10u,8u);

numeric mi,pi,a;
mi:=-8;
pi:=8;
a:=0;

pair A;
A=(a*u,0);

path tt;
for i:=a upto (pi-1):
  for j:=1 upto 5:
    tt := ((j*0.2*u)-2,-4)--((j*0.2*u)+2,4);
    draw tt shifted (i*u,0);
    endfor;
endfor;

label.bot(btex $a$ etex,A shifted(0,-10));

draw (mi*u,0)--A withcolor red withpen pencircle scaled 2pt;
draw A--(pi*u,0);

pair B,C,D,E;
B=A shifted(0,10);
C=A shifted(4,10);
D=A shifted(0,-10);
E=A shifted(4,-10);

draw C--B--D--E withcolor red withpen pencircle scaled 2pt;

fin;

]-\infty~;~a]

interval4.jpg

Voici son code:

u:=1cm;
figure (-8u,-8u,10u,8u);

numeric mi,pi,a;
mi:=-8;
pi:=8;
a:=0;

pair A;
A=(a*u,0);

path tt;
for i:=a upto (pi-1):
  for j:=1 upto 5:
    tt := ((j*0.2*u)-2,-4)--((j*0.2*u)+2,4);
    draw tt shifted (i*u,0);
    endfor;
endfor;

label.bot(btex $a$ etex,A shifted(0,-10));

draw (mi*u,0)--A withcolor red withpen pencircle scaled 2pt;
draw A--(pi*u,0);

pair B,C,D,E;
B=A shifted(0,10);
C=A shifted(-4,10);
D=A shifted(0,-10);
E=A shifted(-4,-10);

draw C--B--D--E withcolor red withpen pencircle scaled 2pt;

fin;

]a~;~b[

interval5.jpg

Voici son code:

u:=1cm;
figure (-8u,-8u,10u,8u);

numeric mi,pi,a;
mi:=-8;
pi:=8;
a:=-3;
b:=3;

pair A,BB;
A=(a*u,0);
BB=(b*u,0);

path tt;
for i:=mi upto (a-1):
  for j:=0 upto 4:
    tt := ((j*0.2*u)-2,-4)--((j*0.2*u)+2,4);
    draw tt shifted (i*u,0);
    endfor;
endfor;


path tt;
for i:=b upto (pi-1):
  for j:=1 upto 5:
    tt := ((j*0.2*u)-2,-4)--((j*0.2*u)+2,4);
    draw tt shifted (i*u,0);
    endfor;
endfor;

label.bot(btex $a$ etex,A shifted(0,-10));
label.bot(btex $b$ etex,BB shifted(0,-10));

draw(mi*u,0)--A;
draw A--BB withcolor red withpen pencircle scaled 2pt;
draw BB--(pi*u,0);

pair B,C,D,E;
B:=A shifted(0,10);
C:=A shifted(-4,10);
D:=A shifted(0,-10);
E:=A shifted(-4,-10);

draw C--B--D--E withcolor red withpen pencircle scaled 2pt;

B:=BB shifted(0,10);
C:=BB shifted(-4,10);
D:=BB shifted(0,-10);
E:=BB shifted(-4,-10);

draw C--B--D--E withcolor red withpen pencircle scaled 2pt;

fin;

[a~;~b[

interval6.jpg

Voici son code:

u:=1cm;
figure (-8u,-8u,10u,8u);

numeric mi,pi,a;
mi:=-8;
pi:=8;
a:=-3;
b:=3;

pair A,BB;
A=(a*u,0);
BB=(b*u,0);

path tt;
for i:=mi upto (a-1):
  for j:=0 upto 4:
    tt := ((j*0.2*u)-2,-4)--((j*0.2*u)+2,4);
    draw tt shifted (i*u,0);
    endfor;
endfor;


path tt;
for i:=b upto (pi-1):
  for j:=1 upto 5:
    tt := ((j*0.2*u)-2,-4)--((j*0.2*u)+2,4);
    draw tt shifted (i*u,0);
    endfor;
endfor;

label.bot(btex $a$ etex,A shifted(0,-10));
label.bot(btex $b$ etex,BB shifted(0,-10));

draw(mi*u,0)--A;
draw A--BB withcolor red withpen pencircle scaled 2pt;
draw BB--(pi*u,0);

pair B,C,D,E;
B:=A shifted(0,10);
C:=A shifted(4,10);
D:=A shifted(0,-10);
E:=A shifted(4,-10);

draw C--B--D--E withcolor red withpen pencircle scaled 2pt;

B:=BB shifted(0,10);
C:=BB shifted(-4,10);
D:=BB shifted(0,-10);
E:=BB shifted(-4,-10);

draw C--B--D--E withcolor red withpen pencircle scaled 2pt;

fin;

[a~;~b]

interval7.jpg

Voici son code:

u:=1cm;
figure (-8u,-8u,10u,8u);

numeric mi,pi,a;
mi:=-8;
pi:=8;
a:=-3;
b:=3;

pair A,BB;
A=(a*u,0);
BB=(b*u,0);

path tt;
for i:=mi upto (a-1):
  for j:=0 upto 4:
    tt := ((j*0.2*u)-2,-4)--((j*0.2*u)+2,4);
    draw tt shifted (i*u,0);
    endfor;
endfor;


path tt;
for i:=b upto (pi-1):
  for j:=1 upto 5:
    tt := ((j*0.2*u)-2,-4)--((j*0.2*u)+2,4);
    draw tt shifted (i*u,0);
    endfor;
endfor;

label.bot(btex $a$ etex,A shifted(0,-10));
label.bot(btex $b$ etex,BB shifted(0,-10));

draw(mi*u,0)--A;
draw A--BB withcolor red withpen pencircle scaled 2pt;
draw BB--(pi*u,0);

pair B,C,D,E;
B:=A shifted(0,10);
C:=A shifted(4,10);
D:=A shifted(0,-10);
E:=A shifted(4,-10);

draw C--B--D--E withcolor red withpen pencircle scaled 2pt;

B:=BB shifted(0,10);
C:=BB shifted(4,10);
D:=BB shifted(0,-10);
E:=BB shifted(4,-10);

draw C--B--D--E withcolor red withpen pencircle scaled 2pt;

fin;

]a~;~b]

interval8.jpg

Voici son code:

u:=1cm;
figure (-8u,-8u,10u,8u);

numeric mi,pi,a;
mi:=-8;
pi:=8;
a:=-3;
b:=3;

pair A,BB;
A=(a*u,0);
BB=(b*u,0);

path tt;
for i:=mi upto (a-1):
  for j:=0 upto 4:
    tt := ((j*0.2*u)-2,-4)--((j*0.2*u)+2,4);
    draw tt shifted (i*u,0);
    endfor;
endfor;


path tt;
for i:=b upto (pi-1):
  for j:=1 upto 5:
    tt := ((j*0.2*u)-2,-4)--((j*0.2*u)+2,4);
    draw tt shifted (i*u,0);
    endfor;
endfor;

label.bot(btex $a$ etex,A shifted(0,-10));
label.bot(btex $b$ etex,BB shifted(0,-10));

draw(mi*u,0)--A;
draw A--BB withcolor red withpen pencircle scaled 2pt;
draw BB--(pi*u,0);

pair B,C,D,E;
B:=A shifted(0,10);
C:=A shifted(-4,10);
D:=A shifted(0,-10);
E:=A shifted(-4,-10);

draw C--B--D--E withcolor red withpen pencircle scaled 2pt;

B:=BB shifted(0,10);
C:=BB shifted(4,10);
D:=BB shifted(0,-10);
E:=BB shifted(4,-10);

draw C--B--D--E withcolor red withpen pencircle scaled 2pt;

fin;