.PS
cct_init

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

Orig:Here
{line -> up_ dim ; right_ ; "A" above_}
{line -> right_ 3* dim ; " $f$" ljust_}
move right_ dim 
{box ht dim wid qrt with .s at Here; }
"$f_1 $" below_
move right_ dim/3
{box ht dim wid qrt with .s at Here; }
"$f_2 $" below_
move right_ dim/3
{box ht dim wid qrt with .s at Here; }
"$f_3 $" below_

"\tiny FDMA" at (2.5*dim,-hlf)
.PE