' Positions of 1st 10 zeros in bj1(x)data3.83170597data7.01558668data10.17346814data13.32369194data16.47063005data19.61585851data22.76008438data25.90367209data29.04682854data32.18967991'dimzero(5)forj=1to5readzero(j)nextj'open"radial_grad.txt"foroutputas#1max_x=zero(5)np=10forj=0to4forp=0tonp-1x=zero(j)*(1-p/np)+zero(j+1)*p/npif(x=0)thenairy=1:elseairy=(2*bj1(x)/x)^2airy=airy^0.4:' Gamma function (increases brightness of low values)x0=x/max_x?#1,"<stop offset=";chr$(34);str$(x0);chr$(34);?#1," style=";chr$(34);"stop-color:#";h$=hex$(floor(255*abs(airy)+0.5),2)?#1,h$;h$;h$;chr$(34);"/>"nextpnextj?#1,"<stop offset=";chr$(34);"1";chr$(34);" style=";?#1,chr$(34);"stop-color:#000000";chr$(34);"/>"close#1end'' BesselJ1 function based on Javascript source code at' http://www.mhtl.uwaterloo.ca/old/courses/me3532/js/bessel.htmlsubbj1(x)ax=abs(x)if(ax<8.0)theny=x*xtmp=(-2972611.439+y*(15704.48260+y*(-30.16036606)))ans1=x*(72362614232.0+y*(-7895059235.0+y*(242396853.1+y*tmp)))ans2=144725228442.0+y*(2300535178.0+y*(18583304.74+y*(99447.43394+y*(376.9991397+y*1.0))))ans=ans1/ans2elsez=8.0/axy=z*zxx=ax-2.356194491ans1=1.0+y*(0.183105e-2+y*(-0.3516396496e-4+y*(0.2457520174e-5+y*(-0.240337019e-6))))ans2=0.04687499995+y*(-0.2002690873e-3+y*(0.8449199096e-5+y*(-0.88228987e-6+y*0.105787412e-6)))ans=sqrt(0.636619772/ax)*(cos(xx)*ans1-z*sin(xx)*ans2)if(x<0.0)thenans=-ansendifbj1=ansendsub
Linear gradient stops were generated with this program
open"linear_grad.txt"foroutputas#1forx=0to20xx=((20-x)/20)^2:' Create more stop colors in low intensity regiony=(xx)^0.4:' Gamma functionc$=hex$(floor(255*y+0.5),2)c$=c$+c$+c$print#1,"<stop offset=";chr$(34);str$(1-xx);chr$(34);print#1," style=";chr$(34);" stop-color:#";c$;chr$(34);"/>"nextxclose#1end
Licensing
Public domainPublic domainfalsefalse
This work has been released into the public domain by its author, Sakurambo at English Wikipedia. This applies worldwide. In some countries this may not be legally possible; if so: Sakurambo grants anyone the right to use this work for any purpose, without any conditions, unless such conditions are required by law.Public domainPublic domainfalsefalse
Original upload log
The original description page was here. All following user names refer to en.wikipedia.
2008-07-09 14:17 Sakurambo 283×210× (5677 bytes) xml errors fixed
2008-07-09 14:15 Sakurambo 283×210× (5698 bytes) better version (gradients calculated in software)
2008-07-08 10:42 Sakurambo 283×210× (3756 bytes) {{Information |Description=vectorized version of [[:Image:Airy-pattern.png]] |Source=I created this work entirely by myself. |Date=2007-07-08 |Author=~~~ |other_versions=[[Image:Airy-pattern.png|100px]] }}
Captions
Add a one-line explanation of what this file represents
Items portrayed in this file
depicts
copyright status
copyrighted, dedicated to the public domain by copyright holder
copyright license
released into the public domain by the copyright holder
inception
8 July 2007
media type
image/svg+xml
checksum
0ed88b347c687b3bd59b1cadbe52e3ba683541aa
determination method or standard: SHA-1
data size
5,677 byte
height
210 pixel
width
283 pixel
File history
Click on a date/time to view the file as it appeared at that time.
{{Information |Description={{en|vectorized version of [[:en::Image:Airy-pattern.png|]]}} |Source=Transferred from [http://en.wikipedia.org en.wikipedia]<br/> (Original text : ''Created in en:Adobe Illustrator and then edited to incorporate gradie...