Bojan Mitrovic's Blog – June 2009 Archive (1)

Spatial curves

Sub RunScript(ByVal minU As Double, ByVal maxU As Double, ByVal dens As Integer)   Dim uStep, i As Double   Dim rv As New List(Of Double)   uStep = (maxU - minU) / dens

   For i = minU To maxU + 0.0001 Step uStep


      rv.Add(i)…


  

Added by Bojan Mitrovic on June 13, 2009 at 4:30am — No Comments