Jump to content

File:Moment of inertia solid sphere.png

Page contents not supported in other languages.
This is a file from the Wikimedia Commons
From Wikipedia, the free encyclopedia

Moment_of_inertia_solid_sphere.png (147 × 135 pixels, file size: 4 KB, MIME type: image/png)

Summary

Description MetaPost image of a sphere, 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.
Date Unknown date
Source en.wikipedia.org
Author Grendelkhan
PNG development
InfoField
 
This PNG graphic was created with MetaPost.
(Note that this source code doesn't fill the circle, and draws the x and y axes the wrong way round. The code provided with the SVG version of this image corrects these problems.)
Source code
InfoField

PostScript code

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 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 $x$ 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 $y$ 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;
 endfig;

Licensing

w:en:Creative Commons
attribution share alike
This file is licensed under the Creative Commons Attribution-Share Alike 3.0 Unported license. Subject to disclaimers.
You are free:
  • to share – to copy, distribute and transmit the work
  • to remix – to adapt the work
Under the following conditions:
  • attribution – You must give appropriate credit, provide a link to the license, and indicate if changes were made. You may do so in any reasonable manner, but not in any way that suggests the licensor endorses you or your use.
  • share alike – If you remix, transform, or build upon the material, you must distribute your contributions under the same or compatible license as the original.
This licensing tag was added to this file as part of the GFDL licensing update.
GNU head 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. A copy of the license is included in the section entitled GNU Free Documentation License. Subject to disclaimers.

Captions

Add a one-line explanation of what this file represents

Items portrayed in this file

depicts

File history

Click on a date/time to view the file as it appeared at that time.

Date/TimeThumbnailDimensionsUserComment
current08:18, 28 October 2007Thumbnail for version as of 08:18, 28 October 2007147 × 135 (4 KB)Prince Max
16:11, 3 June 2006Thumbnail for version as of 16:11, 3 June 2006147 × 135 (2 KB)Szwedzki== Summary == {{Information |Description=MetaPost image of a sphere, 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.o

The following page uses this file:

Global file usage

The following other wikis use this file: