06 October 2025 6:33:40.640 PM ranmap(): Fortran90 version Demonstrate the use of weighted affine mappings to draw fractals. Choose the number of points to plot The number of points to plot is 2000 Choose a map: 1 = the cross 2 = the dragon 3 = the fern 4 = the leaf 5 = the Levy dragon 6 = the tree 7 = the triangle 8 = a random map (not debugged) 9 = specify your own. The map choice is 1 The number of maps to use is 5 The map bin values: Left Right Length 0.0000 0.2000 0.2000 0.2000 0.4000 0.2000 0.4000 0.6000 0.2000 0.6000 0.8000 0.2000 0.8000 1.0000 0.2000 Setting the map coefficients. Map # 1 0.3330 0.0000 0.3330 0.0000 0.3330 0.0000 Map # 2 0.3330 0.0000 0.0000 0.0000 0.3330 0.3330 Map # 3 0.3330 0.0000 0.3330 0.0000 0.3330 0.3330 Map # 4 0.3330 0.0000 0.6660 0.0000 0.3330 0.3330 Map # 5 0.3330 0.0000 0.3330 0.0000 0.3330 0.6660 Points 0 through 10: 0 0.5732 0.8881 1 0.5239 0.2957 2 0.8405 0.4315 3 0.9459 0.4767 4 0.3150 0.4917 5 0.4379 0.8297 6 0.4788 0.6093 7 0.4924 0.2029 8 0.8300 0.4006 9 0.6094 0.1334 10 0.2029 0.3774 X coordinate range: 0.00000 1.00000 Y coordinate range: 0.00000 1.00000 The point data has been saved in the file "ranmap.txt". A point plot has been saved in the file "ranmap.eps". ranmap(): Normal end of execution. 06 October 2025 6:33:40.648 PM 06 October 2025 6:33:40.732 PM ranmap(): Fortran90 version Demonstrate the use of weighted affine mappings to draw fractals. Choose the number of points to plot The number of points to plot is 2000 Choose a map: 1 = the cross 2 = the dragon 3 = the fern 4 = the leaf 5 = the Levy dragon 6 = the tree 7 = the triangle 8 = a random map (not debugged) 9 = specify your own. The map choice is 2 The number of maps to use is 2 The map bin values: Left Right Length 0.0000 0.5000 0.5000 0.5000 1.0000 0.5000 Setting the map coefficients. Map # 1 0.5000 0.5000 0.1250 -0.5000 0.5000 0.6750 Map # 2 0.5000 0.5000 -0.1250 -0.5000 0.5000 0.3250 Points 0 through 10: 0 0.0445 0.1309 1 0.2127 0.7182 2 0.5905 0.9277 3 0.6341 0.4936 4 0.6889 0.6048 5 0.7718 0.6330 6 0.5774 0.2556 7 0.5415 0.5141 8 0.4028 0.3113 9 0.4820 0.6293 10 0.4307 0.3986 X coordinate range: 0.00000 1.00000 Y coordinate range: 0.00000 1.00000 The point data has been saved in the file "ranmap.txt". A point plot has been saved in the file "ranmap.eps". ranmap(): Normal end of execution. 06 October 2025 6:33:40.740 PM 06 October 2025 6:33:40.824 PM ranmap(): Fortran90 version Demonstrate the use of weighted affine mappings to draw fractals. Choose the number of points to plot The number of points to plot is 2000 Choose a map: 1 = the cross 2 = the dragon 3 = the fern 4 = the leaf 5 = the Levy dragon 6 = the tree 7 = the triangle 8 = a random map (not debugged) 9 = specify your own. The map choice is 3 The number of maps to use is 4 The map bin values: Left Right Length 0.0000 0.7500 0.7500 0.7500 0.8500 0.1000 0.8500 0.9500 0.1000 0.9500 1.0000 0.0500 Setting the map coefficients. Map # 1 0.8560 0.0414 0.0700 -0.0205 0.8580 0.1470 Map # 2 0.2440 -0.3850 0.3930 0.1760 0.2240 0.1020 Map # 3 -0.1440 0.3900 0.5270 0.1810 0.2590 -0.0140 Map # 4 0.0000 0.0000 0.4860 0.0310 0.2160 0.0500 Points 0 through 10: 0 0.5286 0.3198 1 0.5756 0.1645 2 0.5695 0.2763 3 0.5690 0.3724 4 0.5724 0.4549 5 0.5788 0.5256 6 0.5872 0.5861 7 0.5969 0.6378 8 0.6074 0.6820 9 0.6182 0.7197 10 0.6289 0.7518 X coordinate range: 0.00000 1.00000 Y coordinate range: 0.00000 1.00000 The point data has been saved in the file "ranmap.txt". A point plot has been saved in the file "ranmap.eps". ranmap(): Normal end of execution. 06 October 2025 6:33:40.832 PM 06 October 2025 6:33:40.916 PM ranmap(): Fortran90 version Demonstrate the use of weighted affine mappings to draw fractals. Choose the number of points to plot The number of points to plot is 2000 Choose a map: 1 = the cross 2 = the dragon 3 = the fern 4 = the leaf 5 = the Levy dragon 6 = the tree 7 = the triangle 8 = a random map (not debugged) 9 = specify your own. The map choice is 4 The number of maps to use is 4 The map bin values: Left Right Length 0.0000 0.2500 0.2500 0.2500 0.5000 0.2500 0.5000 0.7500 0.2500 0.7500 1.0000 0.2500 Setting the map coefficients. Map # 1 0.8000 0.0000 0.1000 0.0000 0.8000 0.0400 Map # 2 0.5000 0.0000 0.2500 0.0000 0.5000 0.4000 Map # 3 0.3550 -0.3550 0.2660 0.3550 0.3550 0.0780 Map # 4 0.3550 0.3550 0.3780 -0.3550 0.3550 0.4340 Points 0 through 10: 0 0.8307 0.0797 1 0.7012 0.1674 2 0.6863 0.2445 3 0.7084 0.2771 4 0.4191 0.4279 5 0.2629 0.3787 6 0.3103 0.3429 7 0.6099 0.4456 8 0.3243 0.4527 9 0.3595 0.4022 10 0.3876 0.3617 X coordinate range: 0.00000 1.00000 Y coordinate range: 0.00000 1.00000 The point data has been saved in the file "ranmap.txt". A point plot has been saved in the file "ranmap.eps". ranmap(): Normal end of execution. 06 October 2025 6:33:40.924 PM 06 October 2025 6:33:41.008 PM ranmap(): Fortran90 version Demonstrate the use of weighted affine mappings to draw fractals. Choose the number of points to plot The number of points to plot is 2000 Choose a map: 1 = the cross 2 = the dragon 3 = the fern 4 = the leaf 5 = the Levy dragon 6 = the tree 7 = the triangle 8 = a random map (not debugged) 9 = specify your own. The map choice is 5 The number of maps to use is 2 The map bin values: Left Right Length 0.0000 0.5000 0.5000 0.5000 1.0000 0.5000 Setting the map coefficients. Map # 1 0.5000 0.5000 0.5000 -0.5000 0.5000 0.5000 Map # 2 0.5000 -0.5000 -0.5000 0.5000 0.5000 0.5000 Points 0 through 10: 0 0.9197 0.9781 1 -0.5292 1.4489 2 0.9598 1.4890 3 1.7244 0.7646 4 -0.0201 1.7445 5 -1.3823 1.3622 6 0.4900 1.8723 7 1.6811 1.1911 8 -0.2550 1.9361 9 -1.5956 1.3406 10 0.3725 1.9681 X coordinate range: -1.99619 1.99971 Y coordinate range: -0.498685 1.99942 The point data has been saved in the file "ranmap.txt". A point plot has been saved in the file "ranmap.eps". ranmap(): Normal end of execution. 06 October 2025 6:33:41.016 PM 06 October 2025 6:33:41.101 PM ranmap(): Fortran90 version Demonstrate the use of weighted affine mappings to draw fractals. Choose the number of points to plot The number of points to plot is 2000 Choose a map: 1 = the cross 2 = the dragon 3 = the fern 4 = the leaf 5 = the Levy dragon 6 = the tree 7 = the triangle 8 = a random map (not debugged) 9 = specify your own. The map choice is 6 The number of maps to use is 4 The map bin values: Left Right Length 0.0000 0.0500 0.0500 0.0500 0.2000 0.1500 0.2000 0.6000 0.4000 0.6000 1.0000 0.4000 Setting the map coefficients. Map # 1 0.0000 0.0000 0.5000 0.0000 0.5000 0.0000 Map # 2 0.1000 0.0000 0.4500 0.0000 0.1000 0.1500 Map # 3 0.4200 -0.4200 0.2900 0.4200 0.4200 -0.0100 Map # 4 0.4200 0.4200 0.2900 -0.4200 0.4200 0.4100 Points 0 through 10: 0 0.3701 0.3539 1 0.2968 0.2941 2 0.2911 0.2382 3 0.5123 0.3878 4 0.6680 0.3577 5 0.7208 0.2797 6 0.7102 0.2247 7 0.4939 0.3827 8 0.5000 0.1913 9 0.5804 0.2804 10 0.5000 0.1402 X coordinate range: 0.00000 1.00000 Y coordinate range: 0.00000 1.00000 The point data has been saved in the file "ranmap.txt". A point plot has been saved in the file "ranmap.eps". ranmap(): Normal end of execution. 06 October 2025 6:33:41.108 PM 06 October 2025 6:33:41.193 PM ranmap(): Fortran90 version Demonstrate the use of weighted affine mappings to draw fractals. Choose the number of points to plot The number of points to plot is 2000 Choose a map: 1 = the cross 2 = the dragon 3 = the fern 4 = the leaf 5 = the Levy dragon 6 = the tree 7 = the triangle 8 = a random map (not debugged) 9 = specify your own. The map choice is 7 The number of maps to use is 3 The map bin values: Left Right Length 0.0000 0.3300 0.3300 0.3300 0.6600 0.3300 0.6600 1.0000 0.3400 Setting the map coefficients. Map # 1 0.5000 0.0000 0.0000 0.0000 0.5000 0.0000 Map # 2 0.5000 0.0000 0.5000 0.0000 0.5000 0.0000 Map # 3 0.5000 0.0000 0.2500 0.0000 0.5000 0.3300 Points 0 through 10: 0 0.6702 0.3624 1 0.8351 0.1812 2 0.9175 0.0906 3 0.7088 0.3753 4 0.8544 0.1877 5 0.6772 0.4238 6 0.8386 0.2119 7 0.6693 0.4360 8 0.5846 0.5480 9 0.7923 0.2740 10 0.8962 0.1370 X coordinate range: 0.00000 1.00000 Y coordinate range: 0.00000 1.00000 The point data has been saved in the file "ranmap.txt". A point plot has been saved in the file "ranmap.eps". ranmap(): Normal end of execution. 06 October 2025 6:33:41.200 PM