r spiral added

tikz/topology-r-spiral-covering-s/Makefile

@@ -0,0 +1,31 @@
+SOURCE = topology-r-spiral-covering-s
+DELAY = 80
+DENSITY = 300
+WIDTH = 512
+
+make:
+	pdflatex $(SOURCE).tex -output-format=pdf
+	make clean
+
+clean:
+	rm -rf  $(TARGET) *.class *.html *.log *.aux *.data *.gnuplot
+
+gif:
+	pdfcrop $(SOURCE).pdf
+	convert -verbose -delay $(DELAY) -loop 0 -density $(DENSITY) $(SOURCE)-crop.pdf $(SOURCE).gif
+	make clean
+
+png:
+	make
+	make svg
+	inkscape $(SOURCE).svg -w $(WIDTH) --export-png=$(SOURCE).png
+
+transparentGif:
+	convert $(SOURCE).pdf -transparent white result.gif
+	make clean
+
+svg:
+	#inkscape $(SOURCE).pdf --export-plain-svg=$(SOURCE).svg
+	pdf2svg $(SOURCE).pdf $(SOURCE).svg
+	# Necessary, as pdf2svg does not always create valid svgs:
+	inkscape $(SOURCE).svg --export-plain-svg=$(SOURCE).svg

tikz/topology-r-spiral-covering-s/Readme.md

@@ -0,0 +1,3 @@
+Compiled example
+----------------
+![Example](topology-r-spiral-covering-s.png)

tikz/topology-r-spiral-covering-s/topology-r-spiral-covering-s.tex

@@ -0,0 +1,67 @@
+\documentclass[varwidth=true, border=2pt]{standalone}
+\usepackage{amsmath,amssymb}% math symbols / fonts
+\usepackage{pgfplots}
+\usetikzlibrary{decorations.markings}
+\pgfplotsset{compat=newest}
+
+\def\Point{36.9}
+
+\begin{document}
+\begin{tikzpicture}
+\draw[->, thick] (7,5) -- (7, 2) node [midway, right] {$p$};
+\node at (1,5.5) {$\mathbb{R}$} ;
+\node at (6.4,0.7) {$\color{blue} S^1$};
+\node at (4.9,1.1){$x$};
+\begin{axis}[
+ view={-30}{-45},
+ axis lines=middle,
+ zmax=60,
+ height=8cm,
+ xtick=\empty,
+ ytick=\empty,
+ ztick=\empty,
+ enlarge y limits=true,
+ enlarge x limits=true,
+]
+
+\addplot3+[->,ytick=\empty,yticklabel=\empty,
+  mark=none,
+  thick,
+  black,
+  domain=0:14.8*pi,
+  samples=400,
+  samples y=0,
+]
+({sin(deg(x))},{cos(deg(x)},{x+15});
+\addplot3+[ytick=\empty,yticklabel=\empty,
+  mark=none,
+  thick,
+  dotted,
+  black,
+  domain=-1:0,
+  samples=100,
+  samples y=0,
+]
+({sin(deg(x))},{cos(deg(x)},{x+15});
+
+\addplot3+[,ytick=\empty,yticklabel=\empty,
+  mark=none,
+  thick,
+  blue,
+  domain=0:14.7*pi,
+  samples=400,
+  samples y=0,
+]
+({sin(deg(x))},{cos(deg(x)},{0});
+
+%%%%%%%%%%%%% Point
+\addplot3+[
+  mark options={color=black},
+  mark=*
+] 
+coordinates {({sin(deg(45)},{cos(deg(45))},0)};
+%%%%%%%%%%%%%
+
+\end{axis}
+\end{tikzpicture}
+\end{document}