[orx-noise] Tidy up demos

Produce 720px wide images.
Use main() = application { for reduced indentation

orx-noise/src/jvmDemo/kotlin/glsl/DemoSimplexGLSL.kt

@@ -0,0 +1,53 @@
+package glsl
+
+import org.openrndr.application
+import org.openrndr.color.rgb
+import org.openrndr.draw.colorBuffer
+import org.openrndr.extra.noise.filters.SimplexNoise3D
+import org.openrndr.extra.noise.uniform
+import org.openrndr.math.Vector3
+import org.openrndr.math.Vector4
+import kotlin.math.sin
+
+/**
+ * A sine oscillator with randomized parameters
+ */
+class SinOsc {
+    private val freq = Double.uniform(0.1, 2.0)
+    private val phase = Double.uniform(0.0, 6.28)
+    private val add = Double.uniform(0.0, 1.0)
+    private val mul = Double.uniform(0.0, 1.0 - add)
+    operator fun invoke() = sin(System.currentTimeMillis() * 0.0001 * freq + phase) * mul + add
+}
+
+/**
+ * Render an animated Simplex3D texture using shaders.
+ *
+ * The uniforms in the shader are controlled by
+ * randomized sine oscillators.
+ */
+fun main() = application {
+    configure {
+        width = 720
+        height = 540
+    }
+    program {
+        val noise = SimplexNoise3D()
+        val img = colorBuffer(width, height)
+        val wav = List(21) { SinOsc() }
+
+        extend {
+            noise.seed = Vector3(wav[0](), wav[1](), wav[2]()) // = position
+            noise.scale = Vector3(wav[3](), wav[4](), wav[5]())
+            noise.lacunarity = Vector3(wav[6](), wav[7](), wav[8]())
+            noise.gain = Vector4(wav[9](), wav[10](), wav[11](), wav[12]())
+            noise.decay = Vector4(wav[13](), wav[14](), wav[15](), wav[16]())
+            noise.octaves = 4
+            noise.bias = Vector4(wav[17](), wav[18](), wav[19](), wav[20]())
+
+            noise.apply(emptyArray(), img)
+            drawer.clear(rgb(0.20, 0.18, 0.16))
+            drawer.image(img)
+        }
+    }
+}