File:Moment of inertia hollow sphere.svg

出自Wikimedia Commons
跳至導覽 跳至搜尋

原始檔案 （SVG 檔案，表面大小：277 × 255 像素，檔案大小：10 KB）

說明

說明

添加單行說明來描述出檔案所代表的內容

摘要

[編輯]
描述
English: Illustration of the moment of inertia of a hollow sphere.
日期
來源 SVG rendering of the program used to generate the bitmap image Image:Moment_of_inertia_hollow_sphere.png
作者
  • Original MetaPost program by en:User:Grendelkhan
  • Program tweaked adjust axes labels to match bitmap version and to avoid negative coordinates in PostScript output and rendered as SVG by Qef
其他版本 Bitmap rendering of almost identical program: Image:Moment_of_inertia_hollow_sphere.png
SVG開發
InfoField
 
本SVG檔案的原始碼通過W3C驗證。
 
本向量圖形使用MetaPost創作。
原始碼
InfoField

PostScript code

metapost-source 
prologues := 3;

u=18mm;
textscale=u/12mm;

def sphere =
  begingroup;
  save pmax,dmax,persp,persp_nt,tens,arr;
  save rarrlft,rarrrt;
  save p,d;
  save axisprotrusion;
  save xax,yax,zax;
  pmax = 0; dmax = 1;
  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 = 0.3u;  % how far do the axes protrude?
  pair rarrlft,rarrrt; % endpoints for arrows
  path p[],d[]; % just plain paths for now
  pair xax[],yax[],zax[]; % x,y,z are taken; these are for the axes
  % solid paths
  p0 = fullcircle scaled 2u;
  % dotted paths
  d0 = halfcircle scaled u xscaled 2 yscaled (2*persp_nt);
  d1 = halfcircle scaled u xscaled 2 yscaled (2*persp_nt) rotated 180;
  % endpoints of dimension arrows
  rarrlft = (0,0);
  rarrrt = (sqrt(0.5)*u,sqrt(0.5)*u);

  % actually draw
  pickup pencircle scaled 1pt;
  for i=0 upto pmax:
    draw p[i];
  endfor;
  for i=0 upto dmax:
    draw d[i] dashed evenly;
  endfor;
  drawdblarrow (rarrlft..rarrrt);
  label.top(btex $r$ etex scaled textscale,.5[rarrlft,rarrrt]);
  % x axis
  xax0 = (0,0);
  xax1 = (1u,0);
  xax2 = (1u+axisprotrusion,0);
  drawarrow (xax1..xax2);
  draw xax0..xax1 dashed evenly;
  label.rt(btex $y$ etex scaled textscale,xax2);
  % y axis
  yax0 = (0,0);
  yax1 = point 1 of d1;
  yax2 = (1.3+axisprotrusion/u)[yax0,yax1];
  drawarrow (yax1..yax2);
  draw yax0..yax1 dashed evenly;
  label.bot(btex $x$ etex scaled textscale,yax2);
  % z axis
  zax0 = (0,0);
  zax1 = (0,1u);
  zax2 = (0,1u+axisprotrusion);
  drawarrow (zax1..zax2);
  draw zax0..zax1 dashed evenly;
  label.top(btex $z$ etex scaled textscale,zax2);
  endgroup;
enddef;

beginfig(1)
  sphere;
  currentpicture := currentpicture shifted (100,100); % avoid unwanted clipping
endfig;
end

Data

mpost fig.mp
ps2pdf -dEPSCrop fig.1 fig.pdf
pstoedit -page 1 -dt -xscale 2 -yscale 2 -f sk fig.pdf fig.sk
inkscape -z --vacuum-defs -f fig.sk -l fig.svg

授權條款

[編輯]
Grendelkhan at the English Wikipedia，此作品的版權所有人，決定用以下授權條款發佈本作品：
GNU head 已授權您依據自由軟體基金會發行的無固定段落、封面文字和封底文字GNU自由文件授權條款1.2版或任意後續版本，對本檔進行複製、傳播和／或修改。該協議的副本列在GNU自由文件授權條款中。
w:zh:共享創意
姓名標示 相同方式分享 		此檔案採用共享創意 姓名標示-相同方式分享 3.0 未在地化版本授權條款。
姓名標示: Grendelkhan at the English Wikipedia
您可以自由：
  • 分享 – 複製、發佈和傳播本作品
  • 重新修改 – 創作演繹作品
惟需遵照下列條件：
  • 姓名標示 – 您必須指名出正確的製作者，和提供授權條款的連結，以及表示是否有對內容上做出變更。您可以用任何合理的方式來行動，但不得以任何方式表明授權條款是對您許可或是由您所使用。
  • 相同方式分享 – 如果您利用本素材進行再混合、轉換或創作，您必須基於如同原先的相同或兼容的條款，來分布您的貢獻成品。
已新增授權條款標題至此檔案，作為GFDL授權更新的一部份。

檔案歷史

點選日期/時間以檢視該時間的檔案版本。

日期/時間縮⁠圖尺寸用戶備⁠註
目前2008年7月9日 (三) 22:36於 2008年7月9日 (三) 22:36 版本的縮圖277 × 255（10 KB）Qef（對話 | 貢獻）{{Information |Description={{en|1=Illustration of the moment of inertia of a hollow sphere.}} |Source=SVG rendering of the program used to generate the bitmap image Image:Moment_of_inertia_hollow_sphere.png |Author=* Original MetaPost program by [[en

無法覆蓋此檔案。

下列頁面有用到此檔案：

全域檔案使用狀況

以下其他 wiki 使用了這個檔案：

取自 "https://commons.wikimedia.org/w/index.php?title=File:Moment_of_inertia_hollow_sphere.svg&oldid=472983089"