Seite:Principien1872-040.png

	Isaac Newton: Mathematische Principien der Naturlehre

LaTeX Source Code

% complile with »pdflatex -shell-escape«
\documentclass[tikz,convert=pdf2svg]{standalone}
\usepackage{tkz-euclide}
\usetkzobj{all}
\usetikzlibrary{calc,intersections}
\begin{document}
 \begin{tikzpicture}
  \tkzSetUpLine[line width=0.4pt]
  \pgfmathsetmacro{\CA}{2.6};
  \pgfmathsetmacro{\CD}{1.1};
  \pgfmathsetmacro{\dot}{0.05};
  \coordinate (C) at (0,0);
  \coordinate (D) at (0:\CD);
  \coordinate (A) at (-90:\CA);
  \coordinate (F) at (0:\CA);
  \coordinate (E) at (180:\CA);
  \coordinate (E') at ($(E)+(180:0.95*\CD)$);
  \coordinate (B) at ($(D)+(-90:\CA)$);
  \coordinate (B') at ($(B)+(90:0.5*\CD)$);
  \coordinate (H) at ($(D)+(0:\CA)$);
  \coordinate (H') at ($(H)+(0:0.8*\CD)$);
  \coordinate (G) at ($(D)+(180:\CA)$);
  \tkzDrawArc[color=black](D,G)(H)
  \tkzDrawArc[color=black](C,E)(F)
  \tkzDefPointBy[rotation= center C angle -69](A) \tkzGetPoint{R}
  \tkzDefPointBy[rotation= center C angle -62](A) \tkzGetPoint{S}
  \tkzDefPointBy[rotation= center C angle -55](A) \tkzGetPoint{T}
  \tkzDefPointBy[rotation= center C angle -45](A) \tkzGetPoint{V}
  \tkzDefPointBy[rotation= center C angle -12](A) \tkzGetPoint{A'}
  \tkzDefPointBy[rotation= center C angle 75](A) \tkzGetPoint{y}
  \tkzDefPointBy[rotation= center C angle 65](A) \tkzGetPoint{v}
  \tkzDefPointBy[rotation= center C angle 59](A) \tkzGetPoint{t}
  \tkzDefPointBy[rotation= center C angle 54](A) \tkzGetPoint{s}
  \tkzDefPointBy[rotation= center C angle 49](A) \tkzGetPoint{r}
  \begin{pgfinterruptboundingbox}
   \tkzInterLC(B',t)(D,H) \tkzGetPoints{l}{l2}
  \end{pgfinterruptboundingbox}
  \tkzDefPointBy[rotation= center D angle -8](l) \tkzGetPoint{k}
  \draw (C) -- (A);
  \draw (D) -- (B);
  \draw (E') -- (H');
  \draw[dashed] (T) -- (A');
  \draw[dashed] (B') -- (l);
  \shade[ball color = black] (A) circle (0.5*\CD cm);
  \shade[ball color = black] (B) circle (0.5*\CD cm);
  \draw[fill] (R) circle[radius=\dot];
  \draw[fill] (S) circle[radius=\dot];
  \draw[fill] (T) circle[radius=\dot];
  \draw[fill] (V) circle[radius=\dot];
  \draw[fill] (k) circle[radius=\dot];
  \draw[fill] (l) circle[radius=\dot];
  \draw[fill] (r) circle[radius=\dot];
  \draw[fill] (t) circle[radius=\dot];
  \draw[fill] (s) circle[radius=\dot];
  \draw[fill] (v) circle[radius=\dot];
  \draw[fill] (y) circle[radius=\dot];
  \draw[color=white] (A) +(-45:0.25) node{$A$};
  \draw[color=white] (B) +(-45:0.25) node{$B$};
  \draw (C) +(90:0.25) node{$C$};
  \draw (D) +(90:0.25) node{$D$};
  \draw (E) +(90:0.25) node{$E$};
  \draw (F) +(90:0.25) node{$F$};
  \draw (G) +(90:0.25) node{$G$};
  \draw (H) +(90:0.25) node{$H$};
  \draw (R) +(180:0.25) node{$R$};
  \draw (S) +(180:0.25) node{$S$};
  \draw (T) +(180:0.25) node{$T$};
  \draw (V) +(180:0.25) node{$V$};
  \draw (k) +(0:0.25) node{$k$};
  \draw (l) +(0:0.25) node{$l$};
  \draw (r) +(-30:0.25) node{$r$};
  \draw (t) +(-25:0.25) node{$t$};
  \draw (s) +(-30:0.25) node{$s$};
  \draw (v) +(20:0.25) node{$v$};
  \draw (y) +(180:0.25) node{$y$};
 \end{tikzpicture}
\end{document}

Empfohlene Zitierweise:
Isaac Newton: Mathematische Principien der Naturlehre. Robert Oppenheim, Berlin 1872, Seite 40. Digitale Volltext-Ausgabe bei Wikisource, URL: https://de.wikisource.org/w/index.php?title=Seite:Principien1872-040.png&oldid=- (Version vom 26.11.2022)