Grande! Questo pacchetto non lo conscevo e mi sembra che tu sappia usarlo benissimo!
La soluzione interna mi piace di più in quanto sto cercando di disegnare tutte le immagini in tikz! Studierò bene il tuo codice, grazie
Ciao
Fra
P.S. Hai colto in pieno il problema! 😀 Sto scrivendo una pseudo dispensa (in pratica trascrivo i miei appunti) per il corso di meccanica dei solidi che sto seguendo. Ho visto che hai chiesto poco tempo fa quale fosse il font dell’università di Pisa. Sei uno studente? Io studio li! 😉
EDIT: il disegno dovrebbe essere completato! Ho creato un esempio compilabile per chi volesse vedere il risultato:
`\documentclass{article}
\usepackage{tikz,tikz-3dplot}
\usepackage{amsmath}
\usetikzlibrary{calc,intersections}
\newcommand{\pdev}[2]{\dfrac{\partial #1}{\partial #2}}
\begin{document}
\tdplotsetmaincoords{70}{30}
\begin{tikzpicture}[tdplot_main_coords]
\def\radius{3}
\def\h{2}
\pgfmathsetmacro{\AC}{sqrt(\radius^2-\h^2)}
\pgfmathsetmacro{\angleChord}{acos(\h/\radius)}
\def\MetaLunghezza{2}
\pgfmathsetmacro{\interv}{(2*\AC)/9}
\pgfmathsetmacro{\secondo}{\AC-\interv}
\pgfmathsetmacro{\hsigma}{(\radius+\h)/2}
% ARCS
%->1
\tdplotsetrotatedcoords{0}{90}{-90}
\coordinate (Shift) at (\MetaLunghezza,0,0);
\tdplotsetrotatedcoordsorigin{(Shift)}
\tdplotdrawarc[tdplot_rotated_coords,]{(0,0,0)}{\radius}{90-\angleChord}{90+\angleChord}{}{}
%->2
\def\ang{65}
\coordinate (Shift) at (-\MetaLunghezza,0,0);
\tdplotsetrotatedcoordsorigin{(Shift)}
\tdplotdrawarc[tdplot_rotated_coords]{(0,0,0)}{\radius}{90-\angleChord}{\ang}{}{}
% connecting line
\pgfmathsetmacro{\pointX}{-\MetaLunghezza}
\pgfmathsetmacro{\pointY}{-\radius*cos(\ang)}
\pgfmathsetmacro{\pointZ}{-\radius*sin(\ang)}
\coordinate (point) at (\pointX,\pointY,\pointZ);
\draw(point)–++(2*\MetaLunghezza,0,0);
%sigma
\draw[-latex] (\MetaLunghezza,0,-\hsigma) —
($(\MetaLunghezza,0,-\hsigma) + (1,0,0)$)
node
{$\sigma_z + \pdev{\sigma_z}{z}dz$};
\draw[-latex] ($(-\MetaLunghezza,0,-\hsigma) + (0,0,0)$) —
($(-\MetaLunghezza,0,-\hsigma)+(-1,0,0)$) node
{$\sigma_z$};
% plane cut
%\draw[dashed] (-\MetaLunghezza,0,0)–(\MetaLunghezza,0,0);
\draw[fill=white](-\MetaLunghezza,-\AC,-\h)–
(-\MetaLunghezza,\AC,-\h)–
(\MetaLunghezza,\AC,-\h)–
(\MetaLunghezza,-\AC,-\h)–
cycle;
%tau
\draw ($(\MetaLunghezza,-\AC,-\h) + (-1,0,0)$) —
($(\MetaLunghezza,\AC,-\h) + (-1,0,0)$);
\foreach \y in {-\AC,-\secondo,…,\AC}
\draw[-latex] ($(\MetaLunghezza,\y,-\h) + (-1,0,0)$) —
($(\MetaLunghezza,\y,-\h) + (-2,0,0)$);
\node at ($(\MetaLunghezza,0.5,-\h) + (-2.5,0,0)$) {$\tau_{zy}$};
%dz
\draw[help lines] (-\MetaLunghezza,\AC,-\h) —
($(-\MetaLunghezza,\AC,-\h) + (0,1,0)$);
\draw[help lines] (\MetaLunghezza,\AC,-\h) —
($(\MetaLunghezza,\AC,-\h) + (0,1,0)$);
\draw[help lines,<->] ($(-\MetaLunghezza,\AC,-\h) + (0,0.9,0)$)
— ($(\MetaLunghezza,\AC,-\h) + (0,0.9,0)$)
node[fill=white,midway,sloped]{$dz$};
\end{tikzpicture}
\end{document}`
Grazie ancora ad azoun! Leggendo la documentazione di tikz-3dplot sono riuscito ad interpretare tutto il codice che mi hai fornito! Il pacchetto è molto interessante!
Ciao
Fra