그림:Moment of inertia disc.png
위키백과 ― 우리 모두의 백과사전.

No higher resolution available.
Moment_of_inertia_disc.png (164 × 84 pixel, file size: 948 B, MIME type: image/png)
이 자료는 위키미디어 공용에 있습니다. 이 자료에 대한 설명이 아래에 있습니다.
[edit] Summary
[edit] Summary
| Description |
MetaPost image of a disc, with dimensions and axes specified. Embedded in a TeX document, viewed with gv, rasterized via screenshot, saved as PNG with The Gimp, and compressed with optipng. |
|---|---|
| Source |
en.wikipedia.org |
| Date |
unknown |
| Author | |
| Permission |
MetaPost source of the image follows.
u=18mm;
textscale=u/12mm;
% this MetaPost script generates a PostScript file, which is then included in a
% TeX document. if you want to generate EPS from this, you'll have to uncomment
% the following line. (and probably do a couple more things, to boot.)
%prologues := 1;
def disc =
begingroup;
save pmax,persp,persp_nt,tens,arr;
save rarrlft,rarrrt;
save p;
save axisprotrusion;
save xax,yax,zax;
pmax = 0;
persp_nt = 0.3;
tens = 2-persp_nt;
persp = persp_nt*u;
arr = 0.3u; % how far to offset the arrows from the diagram
axisprotrusion = 1u; % how far do the axes protrude?
pair rarrlft,rarrrt; % endpoints for arrows
path p[]; % just plain paths for now
pair xax[],yax[],zax[]; % x,y,z are taken; these are for the axes
% solid paths
p0 = fullcircle scaled u xscaled 2 yscaled 2persp_nt;
% endpoints of dimension arrows
rarrlft = (0,0);
rarrrt = (1u,0);
% actually draw
pickup pencircle scaled 1pt;
for i=0 upto pmax:
draw p[i];
endfor;
drawdblarrow (rarrlft..rarrrt);
label.top(btex $r$ etex scaled textscale,.5[rarrlft,rarrrt]);
% x axis
xax1 = (1u,0);
xax2 = (1u+axisprotrusion*0.5,0);
drawarrow (xax1..xax2);
label.rt(btex $x$ etex scaled textscale,xax2);
% y axis
yax0 = (0,0);
yax1 = point 5 of p0;
yax2 = (.6+axisprotrusion/u)[yax0,yax1];
drawarrow (yax1..yax2);
draw yax0..yax1 dashed evenly;
label.ulft(btex $y$ etex scaled textscale,yax2);
% z axis
zax0 = (0,0);
zax1 = (0,axisprotrusion);
drawarrow (zax0..zax1);
label.top(btex $z$ etex scaled textscale,zax1);
endgroup;
enddef;
beginfig(1) disc; endfig;
[edit] Licensing
| Permission is granted to copy, distribute and/or modify this document under the terms of the GNU Free Documentation License, Version 1.2 or any later version published by the Free Software Foundation; with no Invariant Sections, no Front-Cover Texts, and no Back-Cover Texts. Subject to disclaimers. |
그림 링크
다음 문서들이 이 그림을 사용하고 있습니다:

