Förberedande kurs i matematik 1

Versionen från 23 mars 2008 kl. 09.25 (redigera) Tek (Diskussion | bidrag) (Ny sida: <noinclude>Detta är en figur som används i teoriavsnitt 4.4 och är ritad i språket [http://en.wikipedia.org/wiki/Metapost Metapost]. Du kan redigera b...) ← Gå till föregående ändring		Nuvarande version (23 mars 2008 kl. 10.02) (redigera) (ogör) Tek (Diskussion | bidrag)
Rad 61:		Rad 61:
	dy := dx; % vertical distance between grid lines		dy := dx; % vertical distance between grid lines
-	Lx_lft := 4*dx+2pt; % Length of the left-hand part of the x-axis	+	Lx_lft := 5*dx+2pt; % Length of the left-hand part of the x-axis
-	Lx_rt := 4*dx+2pt; % Length of the right-hand part of the x-axis	+	Lx_rt := 5*dx+2pt; % Length of the right-hand part of the x-axis
-	Ly_lwr := 4*dy+4pt; % Length of the lower part of the y-axis	+	Ly_lwr := 5*dy+4pt; % Length of the lower part of the y-axis
-	Ly_upr := 4*dy+4pt; % Length of the upper part of the y-axis	+	Ly_upr := 5*dy+4pt; % Length of the upper part of the y-axis
	ahangle := 30; % Angle of the arrow tip		ahangle := 30; % Angle of the arrow tip
Rad 108:		Rad 108:
	% The circle		% The circle
	path p_circle;		path p_circle;
-	R := 3;	+	R := 4;
	p_circle := (0,-R*dy){right}		p_circle := (0,-R*dy){right}
	for theta=-70 step 20 until 250:		for theta=-70 step 20 until 250:
Rad 120:		Rad 120:
	pickup pencircle scaled 0.4pt;		pickup pencircle scaled 0.4pt;
	draw (0.5*R*dx,(-R-1)*dx)--(0.5*R*dx,0.3*dy) dashed evenly scaled 0.5;		draw (0.5*R*dx,(-R-1)*dx)--(0.5*R*dx,0.3*dy) dashed evenly scaled 0.5;
-	draw (0.5*R*dx,0.3*dy)--(0.5*R*dx,1.4*dy)	+	draw (0.5*R*dx,0.3*dy)--(0.5*R*dx,1.7*dy)
	dashed evenly scaled 0.5 withcolor 0.7[lightgrey,white];		dashed evenly scaled 0.5 withcolor 0.7[lightgrey,white];
-	draw (0.5*R*dx,1.4*dy)--(0.5*R*dx,(R+1)*dx) dashed evenly scaled 0.5;	+	draw (0.5*R*dx,1.7*dy)--(0.5*R*dx,(R+1)*dx) dashed evenly scaled 0.5;
	picture p_lab;		picture p_lab;
	p_lab := thelabel.urt(btex $x=\tfrac{1}{2}$ etex, origin);		p_lab := thelabel.urt(btex $x=\tfrac{1}{2}$ etex, origin);
-	draw p_lab scaled 0.7 shifted (0.5*R*dx-3.5pt,(R+1)*dy-1pt);	+	draw p_lab scaled 1.0 shifted (0.5*R*dx-4.5pt,(R+1)*dy-1pt);
	% The radius		% The radius
Rad 137:		Rad 137:
	% The pi/3 angle		% The pi/3 angle
	path p_angle;		path p_angle;
-	r := 0.9;	+	r := 1.2;
	p_angle := (r*dx,0){up}		p_angle := (r*dx,0){up}
	for theta=5 step 5 until 60:		for theta=5 step 5 until 60:
Rad 148:		Rad 148:
	picture p_lab;		picture p_lab;
	p_lab := thelabel.urt(btex $\pi/3$ etex, origin);		p_lab := thelabel.urt(btex $\pi/3$ etex, origin);
-	draw p_lab scaled 0.7 shifted (r*dx,1.5pt);	+	draw p_lab scaled 1.0 shifted (r*dx,1.5pt);
	% Save the image		% Save the image
Rad 156:		Rad 156:
	% The circle		% The circle
	path p_circle;		path p_circle;
-	R := 3;	+	R := 4;
	p_circle := (0,-R*dy){right}		p_circle := (0,-R*dy){right}
	for theta=-70 step 20 until 250:		for theta=-70 step 20 until 250:
Rad 162:		Rad 162:
	endfor		endfor
	..cycle;		..cycle;
-	s := xpart (p_circle intersectiontimes ((0,-1.2dy)--(Lx_rt,-1.2dy)));	+	s := xpart (p_circle intersectiontimes ((0,-1.7dy)--(Lx_rt,-1.7dy)));
	t := xpart (p_circle intersectiontimes ((0,-0.1dy)--(Lx_rt,-0.1dy)));		t := xpart (p_circle intersectiontimes ((0,-0.1dy)--(Lx_rt,-0.1dy)));
	pickup pencircle scaled 0.6pt;		pickup pencircle scaled 0.6pt;
Rad 171:		Rad 171:
	% The line x = 1/2		% The line x = 1/2
	pickup pencircle scaled 0.4pt;		pickup pencircle scaled 0.4pt;
-	draw (0.5*R*dx,(-R-1)*dy)--(0.5*R*dx,-1.2*dy) dashed evenly scaled 0.5;	+	draw (0.5*R*dx,(-R-1)*dy)--(0.5*R*dx,-1.7*dy) dashed evenly scaled 0.5;
-	draw (0.5*R*dx,-1.2*dy)--(0.5*R*dx,-0.3*dy)	+	draw (0.5*R*dx,-1.7*dy)--(0.5*R*dx,-0.3*dy)
	dashed evenly scaled 0.5 withcolor 0.7[lightgrey,white];		dashed evenly scaled 0.5 withcolor 0.7[lightgrey,white];
	draw (0.5*R*dx,-0.3*dy)--(0.5*R*dx,(R+1)*dy)		draw (0.5*R*dx,-0.3*dy)--(0.5*R*dx,(R+1)*dy)
Rad 178:		Rad 178:
	picture p_lab;		picture p_lab;
	p_lab := thelabel.urt(btex $x=\tfrac{1}{2}$ etex, origin);		p_lab := thelabel.urt(btex $x=\tfrac{1}{2}$ etex, origin);
-	draw p_lab scaled 0.7 shifted (0.5*R*dx-3.5pt,(R+1)*dy-1pt);	+	draw p_lab scaled 1.0 shifted (0.5*R*dx-4.5pt,(R+1)*dy-1pt);
	% The radius		% The radius
Rad 190:		Rad 190:
	% The -pi/3 angle		% The -pi/3 angle
	path p_angle;		path p_angle;
-	r := 0.9;	+	r := 1.2;
	p_angle := (r*dx,0){down}		p_angle := (r*dx,0){down}
	for theta=-5 step -5 until -60:		for theta=-5 step -5 until -60:
Rad 201:		Rad 201:
	picture p_lab;		picture p_lab;
	p_lab := thelabel.lrt(btex $-\pi/3$ etex, origin);		p_lab := thelabel.lrt(btex $-\pi/3$ etex, origin);
-	draw p_lab scaled 0.7 shifted (r*dx-1pt,-1pt);	+	draw p_lab scaled 1.0 shifted (r*dx-1pt,-1pt);
	% Save the image		% Save the image

---

Nuvarande version

Detta är en figur som används i teoriavsnitt 4.4 och är ritad i språket Metapost. Du kan redigera bilden genom att klicka på redigera-fliken.