お世話になります。
毎度同じようなことを聞いていますが，
ご助言を御願いします。

関数$z=x^2+y^2$のグラフを領域$x\geqq 0,y\geqq 0, x+y\leqq 1$
で描けないかと思ってやってみたのですが，
以下の様なものしか思いつきませんでした。
なにかいい方法はあるでしょうか？

宜しく御願いします。

\documentclass[a4j,fleqn]{jarticle}%
\usepackage[papersize]{emathP}%
\usepackage{emathPp}%
\checkPerl
\begin{document}
%%%%%%%%%%%%%%%%%%%
\unitlength=20mm
\rtenretu*{Ex(1,330);Ey(1,15);Ez(1,90)}%
%%%%%%%%%%%%%%%%%%%
\begin{Zahyou*}[\Ex][\Ey][\Ez](0,2)(0,2)(0,2){}%
\For\z{0}{1}{0.01}\Do{%
\calcval{sqrt(\z)}\sz%
\def\Fx{\sz*cos(T)}%
\def\Fy{\sz*sin(T)}%
\iiiBGurafu\Fx\Fy\z{0}{$pi/2}
}%
\For\xy{1}{1.5}{0.01}\Do{%
\iiiNuritubusi[0]{(\xy,0,0)(\xy,0,1)(0,\xy,1)(0,\xy,0)}%
}%
\iiiDrawline{(0,1,1)(0,1,0)(1,0,0)(1,0,1)}%
\def\Xx{(\Xmax,0,0)}
\def\Yy{(0,\Ymax,0)}
\def\Zz{(0,0,\Zmax)}
\iiiArrowLine\O\Xx%
\iiiArrowLine\O\Yy%
\iiiArrowLine\O\Zz%
\iiiPut{(\Xmax,0,0)}[se]{$\bm{x}$}%
\iiiPut{(0,\Ymax,0)}[e]{$\bm{y}$}%
\iiiPut{(0,0,\Zmax)}[n]{$\bm{z}$}%
\end{Zahyou*}%

▼関連発言
│
└◆4946:空間図形 [genio] 07/18 15:14
　└◆4948:Re:空間図形 [田中徹] 07/18 20:55
　　└◆4952:Re[2]:空間図形 [genio] 07/19 08:19
　　　└◆4963:Re[3]:空間図形 [田中徹] 07/21 17:29<-last