File:Dual Engineering Thermodynamics.png

dual 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)); pair p, q, r, s, t; p := (4u, 8u); q := (9u, 3u); s := p shifted -(2u, 0); r := q shifted -(0, 1.5u); t := s shifted -(0, 2u); dotlabel.lft("1", t); draw t .. s; dotlabel.lft("2", s); draw s .. p; dotlabel.rt("3", p); draw p .. controls (((p + q)/2) shifted -(.5u, .5u)) .. q; dotlabel.rt("4", q); draw r .. controls (((t + r)/2) shifted -(.5u, .5u)) .. t; dotlabel.bot("5", r); draw q .. r; currentpicture := currentpicture shifted -llcorner currentpicture; endfig; end;