input fks
verbatimtex
%&latex
\documentclass[9pt]{extarticle}
\usepackage[utf8]{inputenc}
\usepackage{fkssugar}
\begin{document}
etex
 
prologues:=3;
 
beginfig(1);
u:=1cm;

drawarrow origin--(0,4u);
drawarrow origin--(4u,0);
drawarrow (3u,u)--(u,u);
drawarrow (3u,3u)--(3u,u);
drawarrow (u,u)--(3u,3u);
draw (0,u)--(u,u)--(u,0) dashed dashpattern (on .08u off .1u);
draw (0,0)--(u,u) dashed dashpattern (on .08u off .1u);
draw (0,3u)--(3u,3u) dashed dashpattern (on .08u off .1u);
draw (3u,0)--(3u,u) dashed dashpattern (on .08u off .1u);

label.rt(btex $2$ etex,(3u,3u));
label.rt(btex $3$ etex,(3u,u));
label.ulft(btex $1$ etex,(u,u));
label.lft(btex $p$ etex,(0,4u));
label.lft(btex $p_3$ etex,(0,3u));
label.lft(btex $p_1$ etex,(0,u));
label.bot(btex $T$ etex, (4u,0));
label.bot(btex $T_3$ etex, (3u,0));
label.bot(btex $T_1$ etex, (u,0));
label.llft(btex $0$ etex, origin);
endfig;
verbatimtex
\end{document}
etex
 
end;