algorithmic modeling for Rhino
Tags:
Dim distances As New List(Of Double)
For Each pt As Point3d in points
   distances.Add(pt.DistanceTo(anchor)
NextDim distances As New List(Of Double)
For i As Integer = 0 To points.Count-1
   distances.Add(points(i).DistanceTo(anchor)
NextDim distances As New List(Of Double)
For i As Integer = 0 To points.Count-1
   Dim mindist As Double = Double.MaxValue
   For j As Integer = 0 To points.Count-1
     If (i = j) Then Continue For
     mindist = Math.Min(mindist, points(i).DistanceTo(points(j)))
   Next
   distances.Add(mindist)
NextWelcome to
Grasshopper
Added by Parametric House 0 Comments 0 Likes
Added by Parametric House 0 Comments 0 Likes
Added by Parametric House 0 Comments 0 Likes
    © 2025               Created by Scott Davidson.             
    Powered by
    