meillo@228: .PS
meillo@228: # in and out channels of an mta
meillo@228: 
meillo@228: linewid = 1.5
meillo@228: 
meillo@228: 
meillo@228: A: box "MTA" wid 1.5*boxwid ht 1.5*boxht
meillo@228: 
meillo@228: line <- left from 0.3<A.w,A.nw> "remote (SMTP)" above
meillo@228: line <- left from 0.3<A.w,A.sw> "local (stdin)" below
meillo@228: 
meillo@228: line -> right from 0.3<A.e,A.ne> "remote (SMTP)" above
meillo@228: line  right linewid*2/3 from 0.3<A.e,A.se> "local (pipe)" below
meillo@228: line -> down 1/6*linewid
meillo@228: B: box "MDA" wid 0.75*boxwid ht 0.75*boxht
meillo@228: 
meillo@228: move 0.5*moveht
meillo@228: 
meillo@228: C: box invis "mailboxes" ht 0.3
meillo@228: 
meillo@228: arrow from 0.35<B.sw,B.se> to 0.2<C.nw,C.ne>
meillo@228: arrow from 0.45<B.sw,B.se> to 0.4<C.nw,C.ne>
meillo@228: arrow from 0.55<B.sw,B.se> to 0.6<C.nw,C.ne>
meillo@228: arrow from 0.65<B.sw,B.se> to 0.8<C.nw,C.ne>