Εικόνα σε υψηλότερη ανάλυση(Αρχείο SVG, ονομαστικό μέγεθος 200 × 223 εικονοστοιχεία, μέγεθος αρχείου: 16 KB)

Σύνοψη

Περιγραφή
English: Illustration of the moment of inertia of a solid cylinder.
Ημερομηνία
Πηγή SVG rendering of the program used to generate the bitmap image Image:Moment_of_inertia_solid_cylinder.png
Δημιουργός
  • Original MetaPost program by en:User:Grendelkhan
  • Program tweaked to avoid negative coordinates in PostScript output and rendered as SVG by Qef
  • Swap x and y axis to give right handed coordinate system by billingd on 2017-05-20
άλλες εκδόσεις Bitmap rendering of almost identical program: Image:Moment_of_inertia_solid_cylinder.png
SVG ανάπτυξη
InfoField
 
Ο πηγαίος κώδικας αυτού του SVG είναι έγκυρος.
 
Αυτή η διανυσματική εικόνα δημιουργήθηκε με MetaPost
Πηγαίος κώδικας
InfoField

PostScript code

metapost-source
prologues := 3;

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

def cylinder =
  begingroup;
  save pmax,dmax,persp,persp_nt,arr;
  save harrtop,harrbot,rarrlft,rarrrt;
  save p,d;
  save axisprotrusion;
  save xax,yax,zax;
  pmax = 3; dmax = 0;
  persp_nt = 0.3;
  persp = persp_nt*u;
  arr = 0.2u; % how far to offset the arrows from the diagram
  axisprotrusion = 1u;  % how far do the axes protrude?
  pair harrtop,harrbot,rarrlft,rarrrt; % endpoints for arrows
  path p[],d[]; % original, dotted
  pair xax[],yax[],zax[]; % x,y,z are taken; these are for the axes
  % solid paths
  p0 = (-1u,-1u)--(-1u,1u);
  p1 = (1u,-1u)--(1u,1u);
  p2 = fullcircle scaled u xscaled 2 yscaled (2*persp_nt) shifted (0,1u);
  p3 = halfcircle scaled u xscaled 2 yscaled (2*persp_nt) rotated 180 shifted (0,-1u);
  % dashed paths
  d0 = halfcircle scaled u xscaled 2 yscaled (2*persp_nt) shifted (0,-1u);
  % endpoints of dimension arrows
  harrtop = (-1u-arr,1u);
  harrbot = (-1u-arr,-1u);
  rarrlft = (0,1u);
  rarrrt = (1u,1u);

  % 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 (harrtop..harrbot);
  drawdblarrow (rarrlft..rarrrt);
  label.lft(btex $h$ etex scaled textscale,.5[harrtop,harrbot]);
  label.top(btex $r$ etex scaled textscale,.5[rarrlft,rarrrt]);
  % x axis
  xax0 = (0,0);
  xax1 = point 1.5 of p3 shifted (0,1u);
  xax2 = (1.+axisprotrusion/u)[xax0,xax1];
  drawarrow (xax1..xax2);
  draw xax0..xax1 dashed evenly;
  label.rt(btex $y$ etex scaled textscale,xax2);
  % y axis
  yax0 = (0,0);
  yax1 = (1u,0);
  yax2 = (1u+axisprotrusion*0.5,0);
  drawarrow (yax1..yax2);
  draw yax0..yax1 dashed evenly;
  label.top(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)
  cylinder;
  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
pdf2svg fig.pdf fig.svg

Αδειοδότηση

Grendelkhan at the English Wikipedia, ο κάτοχος των πνευματικών δικαιωμάτων αυτού του έργου, το δημοσιεύει δια του παρόντος υπό την εξής άδεια χρήσης:
GNU head Παραχωρείται η άδεια προς αντιγραφή, διανομή και/ή τροποποίηση αυτού του εγγράφου υπό τους όρους της Άδειας Ελεύθερης Τεκμηρίωσης GNU, Έκδοση 1.2 ή οποιασδήποτε νεότερης έκδοσης δημοσιευμένης από το Ίδρυμα Ελεύθερου Λογισμικού· χωρίς Απαράλαχτους Τομείς, χωρίς Κείμενα Εξωφύλλου, και χωρίς Κείμενα Οπισθοφύλλου. Αντίγραφο της άδειας περιλαμβάνεται στην σελίδα με τίτλο GNU Free Documentation License.
w:el:Creative Commons
αναφορά προέλευσης παρόμοια διανομή
Το αρχείο διανέμεται υπό την άδεια Creative Commons Αναφορά προέλευσης-Παρόμοια διανομή 3.0 Μη εισαγόμενη
Απόδοση: Grendelkhan at the English Wikipedia
Είστε ελεύθερος:
  • να μοιραστείτε – να αντιγράψετε, διανέμετε και να μεταδώσετε το έργο
  • να διασκευάσετε – να τροποποιήσετε το έργο
Υπό τις ακόλουθες προϋποθέσεις:
  • αναφορά προέλευσης – Θα πρέπει να κάνετε κατάλληλη αναφορά, να παρέχετε σύνδεσμο για την άδεια και να επισημάνετε εάν έγιναν αλλαγές. Μπορείτε να το κάνετε με οποιοδήποτε αιτιολογήσιμο λόγο, χωρίς όμως να εννοείται με οποιονδήποτε τρόπο ότι εγκρίνουν εσάς ή τη χρήση του έργου από εσάς.
  • παρόμοια διανομή – Εάν αλλάξετε, τροποποιήσετε ή δημιουργήσετε πάνω στο έργο αυτό, μπορείτε να διανείμετε αυτό που θα προκύψει μόνο υπό τους όρους της ίδιας ή συμβατής άδειας με το πρωτότυπο.
Αυτή η ετικέτα άδειας χρήσης προστέθηκε στο αρχείο ως μέρους της αναθεώρησης της άδειας GFDL .

Λεζάντες

Δεν ορίστηκε λεζάντα

Items portrayed in this file

απεικονίζει

Ιστορικό αρχείου

Κλικάρετε σε μια ημερομηνία/ώρα για να δείτε το αρχείο όπως εμφανιζόταν εκείνη τη στιγμή.

Ώρα/Ημερομ.ΜικρογραφίαΔιαστάσειςΧρήστηςΣχόλια
τελευταία14:45, 19 Μαΐου 2017Μικρογραφία για την έκδοση της 14:45, 19 Μαΐου 2017200 × 223 (16 KB)BillingdUpdate metapost code to swap x and y axes to give a right handed coordinate system. Regenerate svg.
22:36, 9 Ιουλίου 2008Μικρογραφία για την έκδοση της 22:36, 9 Ιουλίου 2008320 × 357 (13 KB)Qef{{Information |Description={{en|1=Illustration of the moment of inertia of a solid cynlinder.}} |Source=SVG rendering of the program used to generate the bitmap image Image:Moment_of_inertia_solid_cylinder.png |Author=* Original MetaPost program by [

Τα παρακάτω λήμματα συνδέουν σε αυτό το αρχείο:

Καθολική χρήση αρχείου

Τα ακόλουθα άλλα wiki χρησιμοποιούν αυτό το αρχείο:

Μεταδεδομένα