.PS
cct_init

# Usual defs...
qrt=dimen_/4;
hlf=dimen_/2;
dim=dimen_;

Org:Here
line right_ 6*dim
Source:dot(at Org+(0,2*dim))
"Tx " rjust_
Dest:dot(at Org+(4.5*dim, dim))
" Rx" ljust_
line -> from Source to Dest
" Direct" at last line.center above_ ljust_
line from Source to Org+(3*dim,0)
line -> to Dest
" Reflected" at last line.center below_ ljust_

"\tiny Fading" at (4.5*dim,-0.5*dim)
.PE