Prisme elliptique

Auteur ou autrice : Luís Nobre Gonçalves.

Mise en ligne le 1 février 2025

Image du résultat de l’exemple

Cet exemple illustre l’utilisation du package featpost présent sur le CTAN. Ce package permet de réaliser des dessins en trois dimensions (et en deux dimensions). Il est très pratique pour illustrer de la géométrie basique dans l’espace.

Code


% ellipticprism.mp
% L. Nobre G.
% 2004

input featpost3Dplus2D;

verbatimtex \documentclass{article}\begin{document}{\sffamily etex

beginfig(1);
  f := (5,3,4);
  numeric labscal;
  picture labsa, labba, labsb, labd, labc;
  labscal = 2;
  ahlength := 8pt;
  ahangle := 30;
  labc = btex $\vec{c}$ etex scaled labscal;
  labsa = btex $\vec{S}_1$ etex scaled labscal;
  labsb = btex $\vec{S}_2$ etex scaled labscal;
  labba = btex $\vec{B}_1$ etex scaled labscal;
  labd= btex $D$ etex scaled labscal;
  drawoptions( withpen pencircle scaled 1.7pt withcolor 0.65blue );
  whatisthis( black, 0.5red, green, 0.85, 0.8 );
  drawoptions( withpen pencircle scaled 1.3pt );
  drawdblarrow rp(black)--rp(0.85blue);
  label.rt( labd, rp(0.4blue) );
  drawarrow rp(black)--rp(0.5red);
  label.ulft( labsa, rp(0.25red) );
  drawarrow rp(black)--rp(green);
  label.top( labba, rp((0,0.5,0)) );
  drawarrow rp(0.85blue)--rp(0.8*0.5*red+0.85blue);
  label.ulft( labsb, rp(0.2red+0.85blue) );
  dotlabel.bot( labc, rp(black) );
endfig;
  
verbatimtex 
\end{document} 
etex

end.

Mots clés : 3Dfeatpostprismeellipse

Cet exemple fait partie de la collection d’exemples Documentation de featpost.

Fichiers

Télécharger l’archive complète