File:Abshum Engineering Thermodynamics.png

absolute humidity

prologues := 2; % input metaobj.mp; beginfig(1); numeric u; u := .4cm; drawarrow origin .. 10u * dir(90); drawarrow origin .. 10u * dir(0); label.lft(btex $\omega$ etex, (0, 10u)); label.bot("t", (10u, 0)); path pp; pp := (0, 2u) {dir (5)} .. (2.5u, 2u) .. (8u, 6u) .. (9u, 8u); draw pp; label.lft(btex $\omega_a$ etex, (0, 4u)); path qq; qq := (0, 4u) .. (8u, 4u); draw qq dashed evenly; pair a; a := qq intersectionpoint pp; dotlabel.top("2", a); draw a .. ( a + 4u * dir(-90)) dashed evenly; label.bot(btex $t_{dp}$ etex, a + 4u * dir(-90)); dotlabel.rt("1", point 2 of qq); path ss; ss := qq shifted (0, -1.5u); label.lft(btex $\omega_b$ etex, (0, 2.5u)); pair b; b := ss intersectionpoint pp; dotlabel.top("3", b); draw (point 0 of ss) .. b dashed evenly; currentpicture := currentpicture scaled 2; currentpicture := currentpicture shifted -llcorner currentpicture; endfig; end;