File:Otto Engineering Thermodynamics.png

From Wikibooks, open books for an open world
Jump to navigation Jump to search

Otto_Engineering_Thermodynamics.png(252 × 253 pixels, file size: 2 KB, MIME type: image/png)

Otto cycle

prologues := 2;
beginfig(1);
  numeric u;
  u := .4cm;
  drawarrow (0, 0) -- (10u, 0);
  label.bot("V", (10u, 0));
  drawarrow (0, 0) -- (0, 10u);
  label.lft("p", (0, 10u));
  vardef arrowhead expr p =
    save A,u,a,b; pair A,u; path a,b;
    A := point length(p)/2 of p;
    u := unitvector(direction length(p)/2 of p);
    a := A{-u}..(A - ahlength*u rotated 30);
    b := A{-u}..(A - ahlength*u rotated -30);
    (a & reverse(a) & b & reverse(b))--cycle
  enddef;
  pair p, q, r, s;
  p := (2u, 8u);
  q := (7u, 3u);
  s := p shifted -(0, 3u);
  r := q shifted -(0, u);
  dotlabel.lft("1", s);
  drawarrow s .. p;
  dotlabel.lft("2", p);
  drawarrow p .. controls (((p + q)/2) shifted -(.7u, .7u)) ..  q;
  dotlabel.rt("3", q);
  drawarrow r .. controls (((s + r)/2) shifted -(.5u, .5u)) ..  s;
  dotlabel.bot("4", r);
  drawarrow q .. r;
  currentpicture := currentpicture scaled 2;
  currentpicture := currentpicture shifted -llcorner currentpicture;
endfig;
end;

Licensing[edit | edit source]

File history

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

Date/TimeThumbnailDimensionsUserComment
current11:20, 23 April 2004Thumbnail for version as of 11:20, 23 April 2004252 × 253 (2 KB)Norman Weiner (discuss | contribs)
05:32, 20 March 2004Thumbnail for version as of 05:32, 20 March 2004126 × 127 (882 bytes)Norman Weiner (discuss | contribs)Otto cycle