// Java Sample Implementation of Levy C Curveimportjava.awt.Color;importjava.awt.Graphics;importjava.awt.Graphics2D;importjavax.swing.JFrame;importjavax.swing.JPanel;importjava.util.concurrent.ThreadLocalRandom;publicclassC_curveextendsJPanel{publicfloatx,y,len,alpha_angle;publicintiteration_n;publicvoidpaint(Graphicsg){Graphics2Dg2d=(Graphics2D)g;c_curve(x,y,len,alpha_angle,iteration_n,g2d);}publicvoidc_curve(doublex,doubley,doublelen,doublealpha_angle,intiteration_n,Graphics2Dg){doublefx=x;doublefy=y;doublelength=len;doublealpha=alpha_angle;intit_n=iteration_n;if(it_n>0){length=(length/Math.sqrt(2));c_curve(fx,fy,length,(alpha+45),(it_n-1),g);// Recursive Callfx=(fx+(length*Math.cos(Math.toRadians(alpha+45))));fy=(fy+(length*Math.sin(Math.toRadians(alpha+45))));c_curve(fx,fy,length,(alpha-45),(it_n-1),g);// Recursive Call}else{Color[]A={Color.RED,Color.ORANGE,Color.BLUE,Color.DARK_GRAY};g.setColor(A[ThreadLocalRandom.current().nextInt(0,A.length)]);//For Choosing Different Color Valuesg.drawLine((int)fx,(int)fy,(int)(fx+(length*Math.cos(Math.toRadians(alpha)))),(int)(fy+(length*Math.sin(Math.toRadians(alpha)))));}}publicstaticvoidmain(String[]args){C_curvepoints=newC_curve();points.x=200;// Stating x valuepoints.y=100;// Stating y valuepoints.len=150;// Stating length valuepoints.alpha_angle=90;// Stating angle valuepoints.iteration_n=15;// Stating iteration valueJFrameframe=newJFrame("Points");frame.setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);frame.add(points);frame.setSize(500,500);frame.setLocationRelativeTo(null);frame.setVisible(true);}}
Paul Lévy, Plane or Space Curves and Surfaces Consisting of Parts Similar to the Whole (1938), reprinted in Classics on Fractals Gerald A. Edgar ed. (1993) Addison-Wesley Publishing ISBN0-201-58701-7.
E. Cesaro, Fonctions continues sans dérivée, Archiv der Math. und Phys. 10 (1906) pp 57–63.
G. Faber, Über stetige Funktionen II, Math Annalen, 69 (1910) pp 372–443.
S. Bailey, T. Kim, R. S. Strichartz, Inside the Lévy dragon, American Mathematical Monthly109(8) (2002) pp 689–703