File:Julia-Teppich.png

From Wikimedia Commons, the free media repository
Jump to navigation Jump to search

Original file (1,760 × 960 pixels, file size: 90 KB, MIME type: image/png)

Captions

Captions

Add a one-line explanation of what this file represents
  • Beschreibung: Teppich von Julia-Mengen
  • Quelle: Postscript-Programm
  • Autor: Lutz Lehmann, (LutzL)


GNU head Permission is granted to copy, distribute and/or modify this document under the terms of the GNU Free Documentation License, Version 1.2 or any later version published by the Free Software Foundation; with no Invariant Sections, no Front-Cover Texts, and no Back-Cover Texts. A copy of the license is included in the section entitled GNU Free Documentation License.
w:en:Creative Commons
attribution share alike 		This file is licensed under the Creative Commons Attribution-Share Alike 3.0 Unported license.
You are free:
  • to share – to copy, distribute and transmit the work
  • to remix – to adapt the work
Under the following conditions:
  • attribution – You must give appropriate credit, provide a link to the license, and indicate if changes were made. You may do so in any reasonable manner, but not in any way that suggests the licensor endorses you or your use.
  • share alike – If you remix, transform, or build upon the material, you must distribute your contributions under the same or compatible license as the original.
This licensing tag was added to this file as part of the GFDL licensing update.

PostScript Source code

[edit]
%!PS-Adobe-2.0 EPSF-2.0
%%Title: Julia-Teppich
%%BoundingBox: 0 0 440 240

/sqr{ dup mul} bind def

/wurzel{
	/m x a sub def
	/n y b sub def
	/r m sqr n sqr add sqrt def
	/x r m add 2 div sqrt def
	/y r m sub 2 div sqrt n 0 lt {neg}if def
	
	x 0.5 sub sqr y sqr add sqrt dup
	x 0.5 add sqr y sqr add sqrt add div
	90 mul 5 add
	
	rand 100 mod lt { /x x neg def /y y neg def}if
} def

/point{ 
	x y 0.002 0 360 arc fill stroke
	x neg y neg 0.002 0 360 arc fill stroke
} def

/julia{
	-1 -1.5 moveto
	a 100 mul cvi 100 div 8 string cvs show
	(+i*) show
	b 100 mul cvi 100 div 8 string cvs show
	stroke

	50 { wurzel} repeat
	20000 {wurzel point } repeat
} def

/Helvetica 0.4 selectfont

20 dup translate

0.005 setlinewidth

200 dup scale

1 0 translate

-1 0.2 1{
	/a exch def
	0 0.2 1{
		/b exch def
		gsave
			a b translate
			0.06 dup scale
			/x 0 def /y 0 def
			julia
		grestore
		} for
}for


This math image could be re-created using vector graphics as an SVG file. This has several advantages; see Commons:Media for cleanup for more information. If an SVG form of this image is available, please upload it and afterwards replace this template with {{vector version available|new image name}}.


It is recommended to name the SVG file “Julia-Teppich.svg”—then the template Vector version available (or Vva) does not need the new image name parameter.

File history

Click on a date/time to view the file as it appeared at that time.

Date/TimeThumbnailDimensionsUserComment
current13:46, 20 November 2004Thumbnail for version as of 13:46, 20 November 20041,760 × 960 (90 KB)Fedi (talk | contribs)Teppich von Julia-Mengen{{GFDL}}

You cannot overwrite this file.

The following page uses this file:

File usage on other wikis

The following other wikis use this file:

Retrieved from "https://commons.wikimedia.org/w/index.php?title=File:Julia-Teppich.png&oldid=455542677"