> 参考に色々とやってみます。
> 
> では。
決着のついたと思われるスレッドに粘着質な発言ご容赦を...

1例目は genio さんの方法 z=z_{0} での断面を工夫して描いてみました。
2例目は 平面 y=mx での断面を描いてみました。(対称性を用いて誤魔化しています)

1例目で Zahyou 環境の中で CandL でなく CandL* だと! Extra \else. で拒否されます。
空間環境の中で平面計算をさせた大馬鹿野郎でした。

分割数が多いと止まったように見えますが皆様はいかがでしょう。
# 当時 Pen4 3.06GHz はかなり速いと思っていたのですが今となっては...

# >#4962 今日から夏期休業で授業なしです >うらやましいことです
# 明日は中学校向けオープンスクールです。
# 終業式は 31日 それまで午前 50分×4時間、午後自主学習 60分監督
# 平均 3コマ入っています。...(泣)
# 「自宅研修」が懐かしい

\documentclass[b4j]{jarticle}%
\usepackage[papersize]{emathP}%
\usepackage{emathPp}%
\usepackage{color}%
\checkPerl
\begin{document}
%%%%%%%%%%%%%%%%%%%%%%%%%
\def\分割数{150}%
\def\HalfCol{black}%
\def\HalfCol{cyan}%
\rtenretu*{Ex(1,335);Ey(0.6,10);Ez(1,90)}%
%%%%%%%%%%%%%%%%%%%%%%%%%
\calcval{sqrt(2)}\SQRTii%
\Div{1.2}\分割数\StepR%
\unitlength=40mm
\begin{Zahyou*}[\Ex][\Ey][\Ez](0,2)(0,2)(0,2){}%
\def\Oii{(0,0)}%
\def\Xii{(1,0)}%
\def\Yii{(0,1)}%
\def\O{(0,0,0)}%
\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}$}%
\iiiDrawline{(1,0,0)(0,1,0)}%
\iiiTakakkei{(1.3,-0.3,-0.2)(1.3,-0.3,\Zmax)(-0.3,1.3,\Zmax)(-0.3,1.3,-0.2)}%
\For\Cnt{0}{\分割数}{1}\Do{%
\calcval{\StepR*(\Cnt+1)}\R%
\def\Fx{\R*cos(T)}%
\def\Fy{\R*sin(T)}%
\def\Fz{(\Fx)**2+(\Fy)**2}%
\CandL\Oii\R\Xii\Yii\Q\P%
\ifx\P\Q
\iiiBGurafu\Fx\Fy\Fz{0}{$pi/2}%
\else
\Argvec\P\DegP%
\Argvec\Q\DegQ%
\calcval{\DegP*$pi/180}\RadP%
\calcval{\DegQ*$pi/180}\RadQ%
\iiiBGurafu\Fx\Fy\Fz{0}{\RadP}%
\begin{color}{\HalfCol}%
\iiiBGurafu(0.04)(0.01)\Fx\Fy\Fz{\RadP}{\RadQ}%
\end{color}%
\iiiBGurafu\Fx\Fy\Fz{\RadQ}{$pi/2}%
\fi
}%
\end{Zahyou*}%
\begin{Zahyou*}[\Ex][\Ey][\Ez](0,2)(0,2)(0,2)%
\def\O{(0,0,0)}%
\Div{1}\分割数\Step%
\For\K{0}{1}{\Step}\Do{%
\Div\K{2}\M%
%\begin{color}{\HalfCol}%
\iiiBGurafu(0.02)(0.01){T}{\K-T}{(T)**2+(\K-T)**2}{0}{\M}%
%\end{color}%
\iiiBGurafu{T}{\K-T}{(T)**2+(\K-T)**2}{\M}{\K}%
}%
\iiiArrowLine\O{(\Xmax,0,0)}%
\iiiArrowLine\O{(0,\Ymax,0)}%
\iiiArrowLine\O{(0,0,\Zmax)}%
\iiiPut{(\Xmax,0,0)}[se]{$\bm{x}$}%
\iiiPut{(0,\Ymax,0)}[e]{$\bm{y}$}%
\iiiPut{(0,0,\Zmax)}[n]{$\bm{z}$}%
\iiiPut\O[w]{$\bm{O}$}%
\iiiTakakkei{(1.1,-0.1,-0.2)(1.1,-0.1,\Zmax)(-0.1,1.1,\Zmax)(-0.1,1.1,-0.2)}%
\iiiDrawline{(1,0,0)(0,1,0)}%
\end{Zahyou*}%
\end{document}

▼関連発言
│
└◆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