> Der Polygon soll das folgende Format haben:
>
> Entweder
>
> {9, {{0, 0, 1000}, {500, 0, 1000}, {500, 250, 1000}, ___}}
>
> oder
>
> {{0, 0, 1000}, {500, 0, 1000}, {500, 250, 1000}, ___}
>
> wobei ___ für eine beliebige Menge von Vektoren {x,y,z} steht.
>
> 1. Frage
>
> Was mach Mathematica bei Patternmatching mit _?(BlaBlaBla)&: Map, MapAll,
> Apply oder was?
BlaBlaBla auf das Pattern anwenden, also BlaBlaBla&[p].
> 2. Frage
>
> Wie könnte die Funktion aussehen, die die obige Bedingung erfüllt?
Ich bin ziemlich sicher, daß es mit einem geeigneten Pattern
erheblich schneller geht, z.B.
P$Polygon = {{_?NumericQ, _?NumericQ, _?NumericQ}..}
sp[{p:P$Polygon}] := sp[{Length[p], p}]
sp[{n_, p:P$Polygon}] := ...
Gruß,
Thomas Hahn