DarkBeam
Global Moderator
Fractal Senior
Posts: 2512
Fragments of the fractal -like the tip of it
|
|
« on: November 16, 2011, 10:10:00 AM » |
|
http://klein.math.okstate.edu/kleinian/src/In this site you find a Fortran program with zillions of Kleinian fractals. Somebody is able to compile/understand that stuff? It must be plenty of incredible things Luca
|
|
|
Logged
|
No sweat, guardian of wisdom!
|
|
|
ker2x
Fractal Molossus
Posts: 795
|
|
« Reply #1 on: November 16, 2011, 11:23:49 AM » |
|
i tried to compile it but it's complaining about some errors in the source code, i don't have enough time right now to understand what's happening. I'll try again later
|
|
|
Logged
|
|
|
|
ker2x
Fractal Molossus
Posts: 795
|
|
« Reply #2 on: November 16, 2011, 12:01:53 PM » |
|
i tried again but with ifort (Intel fortran compiler) instead of f77 (GNU Fortran compiler). Much better but i still have a few errors : ifort -c -O -Wimplicit -DBINDIR=/home/ker2x/kleinian/src/../bin -DHEADER="'/home/ker2x/kleinian/src/psgraph.pro'" -DFSADIR="'/home/ker2x/kleinian/src/FSA/'" -DMAXBNDY=10000 -DMAXCUSP=1000 -DMAXSIDE=10 -DMAXLEV=100000 -DMAXSTATE=200 -DMAXARC=200 -DMAXLEN=500 -DMAXFP=1000 -DMAXCHAIN=100000 -DISIZE=3072 -DJSIZE=1024 psgraph.F -o psgraph.o ifort: command line warning #10157: ignoring option '-W'; argument is of wrong type psgraph.F(53): warning #7532: The number of arguments is incompatible with intrinsic procedure, assume 'external'. [IDATE] call idate(iarray) -------------^ psgraph.F(53): warning #7148: Arguments incompatible with intrinsic procedure, assume EXTERNAL. [IDATE] call idate(iarray) -------------^ psgraph.F(342): error #6363: The intrinsic data types of the arguments must be the same. [MAX] ir=max(ir,0.5d0*unitpx) -----------------------^ psgraph.F(574): error #6363: The intrinsic data types of the arguments must be the same. [MAX] ir=max(ir,0.5d0*unitpx) -----------------------^ psgraph.F(649): error #6363: The intrinsic data types of the arguments must be the same. [MAX] ir=max(ir,0.5d0*unitpx) -----------------------^ compilation aborted for psgraph.F (code 1) make: *** [psgraph.o] Error 1
edit : btw, this program is not Y2K compliant ))
|
|
« Last Edit: November 16, 2011, 12:04:37 PM by ker2x »
|
Logged
|
|
|
|
ker2x
Fractal Molossus
Posts: 795
|
|
« Reply #3 on: November 16, 2011, 12:11:40 PM » |
|
One problem patched : changed psgraph.F(53) to : call idate(iarray(1),iarray(2),iarray(3))
more problem patched : changer all ir=max(ir,0.5d0*unitpx)
to ir=max(ir,INT(0.5d0*unitpx))
|
|
« Last Edit: November 16, 2011, 12:19:28 PM by ker2x »
|
Logged
|
|
|
|
ker2x
Fractal Molossus
Posts: 795
|
|
« Reply #4 on: November 16, 2011, 12:41:17 PM » |
|
olé !
|
|
|
Logged
|
|
|
|
ker2x
Fractal Molossus
Posts: 795
|
|
« Reply #5 on: November 16, 2011, 12:49:18 PM » |
|
some of them are crashing, some other works correctly.
|
|
|
Logged
|
|
|
|
ker2x
Fractal Molossus
Posts: 795
|
|
« Reply #6 on: November 16, 2011, 01:29:56 PM » |
|
nice one !
|
|
|
Logged
|
|
|
|
ker2x
Fractal Molossus
Posts: 795
|
|
« Reply #7 on: November 16, 2011, 03:18:28 PM » |
|
LLLLR.dat
|
|
|
Logged
|
|
|
|
DarkBeam
Global Moderator
Fractal Senior
Posts: 2512
Fragments of the fractal -like the tip of it
|
|
« Reply #8 on: November 16, 2011, 04:47:26 PM » |
|
Cool! What about Scottky, Grandma, Jorgensen... (impatient )
|
|
|
Logged
|
No sweat, guardian of wisdom!
|
|
|
ker2x
Fractal Molossus
Posts: 795
|
|
« Reply #9 on: November 18, 2011, 01:35:55 PM » |
|
poincare-axe.dat
|
|
|
Logged
|
|
|
|
ker2x
Fractal Molossus
Posts: 795
|
|
« Reply #10 on: November 18, 2011, 03:39:00 PM » |
|
poincare-twist.data
|
|
|
Logged
|
|
|
|
DarkBeam
Global Moderator
Fractal Senior
Posts: 2512
Fragments of the fractal -like the tip of it
|
|
« Reply #11 on: November 18, 2011, 08:36:09 PM » |
|
Cool images
|
|
|
Logged
|
No sweat, guardian of wisdom!
|
|
|
Adam Majewski
|
|
« Reply #12 on: February 13, 2015, 04:06:20 PM » |
|
|
|
|
Logged
|
|
|
|
|