WOLFRAM

Wolfram Language & System Documentation Center

Generate a Mandelbulb Set with CUDA Functionality

    
Load the CUDALink package:
Wolfram Language code: Needs["CUDALink`"]
Define the size and parameters of the Mandelbulb set:
Wolfram Language code: width = 640; height = 480; iconfig = {width, height, 1, 0, 1, 6}; config = {0.001, 0.0, 0.0, 0.0, 8.0, 15.0, 10.0, 5.0};
Define the camera position:
Wolfram Language code: camera = {{2.0, 2.0, 2.0}, {0.0, 0.0, 0.0}}; AppendTo[camera, Normalize[camera[[2]] - camera[[1]]]]; AppendTo[camera, 0.75 * Normalize[Cross[camera[[3]], {0.0, 1.0, 0.0}]]]; AppendTo[camera, 0.75 * Normalize[Cross[camera[[4]], camera[[3]]]]];
Combine these parameters in the configuration:
Wolfram Language code: config = Join[{config, Flatten[camera]}];
Allocate the CUDA GPU memory:
Wolfram Language code: pixelsMem = CUDAMemoryAllocate["Float", {height, width, 3}]
Load and link the CUDA Mandelbulb function:
Wolfram Language code: srcf = FileNameJoin[{$CUDALinkPath, "SupportFiles", "mandelbulb.cu"}]
Wolfram Language code: mandelbulb = CUDAFunctionLoad[{srcf}, "MandelbulbGPU", {{"Float", _, "Output"}, {"Float", _, "Input"}, {"Integer32", _, "Input"}, "Integer32", "Float", "Float"}, {16}, "UnmangleCode" -> False]
Execute the Mandelbulb function with the specified parameters:
Wolfram Language code: mandelbulb[pixelsMem, Flatten[config], iconfig, 0, 0.0, 0.0, {width * height * 3}]
Get the result from the GPU memory and display it:
Wolfram Language code: pixels = CUDAMemoryGet[pixelsMem];
Wolfram Language code: Image[pixels]