levator over the automobile, complex issues are at play in concentrating population and built infrastructure in contemporary high-rise cities. How do you meet the challenges of system design for high quality compact urban environments?
The Smartgeometry Workshop is a unique creative cauldron attracting attendees from across the world of academia, professional practice and industry. The workshop is open to 100 applicants who come together for four intensive days of design and collaboration.
More Info and to Apply
The application deadline to attend the sg2014 Workshop has been extended to June 1st, 2014 at midnight PST. Reviews and early notifications will proceed for those who have already applied.
Image: Cities without Ground - Adam Frampton, Jonathan D Solomon and Clara Wong
WORKSHOP CLUSTERS
The sg2014 Workshop will be organised around Clusters. Clusters are hubs of expertise. They comprise of people, knowledge, tools, materials and machines. The Clusters provide a focus for workshop participants working together within a common framework.
Clusters provide a forum for the exchange of ideas, processes and techniques and act as a catalyst for design resolution. The sg2014 Workshop is made up of ten Clusters that respond in diverse ways to the challenge Urban Compaction.
sg2014 WORKSHOP CLUSTERS
The Bearable Lightness of Being
Block
Deep Space
Design Space Exploration
Flows, Bits, Relationships
Fulldome Projections
HK_smarTowers
Private Microclimates
Resilient Networks
Spaces in Experience
CONFERENCE
After four intense days of innovative work, the 2-day sgConference offers an opportunity for critical reflection on what has been accomplished in the Workshop and in the global design arena. It will be an opportunity to open debates, pose questions, challenge orthodoxies, and propose new ideas.
The sgConference features invited keynote speakers showcasing major projects and research from around the globe, mixed with panel sessions for open debate. The end of the first day will include reports and highlights from the Workshop, giving an opportunity to view work created during the previous four days of intensive collaboration, design and development, followed by an exhibition of the work.
Invited Speakers & Panelists:Carlo Ratti Sensable City Lab, MITCristiano Ceccato Zaha HadidTom Kvan & Justyna Karakiewicz Melbourne UniversityJun Sato Jun Sato Structural EngineersMario Carpo Yale UniversityEddie Can Zaha HadidLi Xinggang Atelier Li Xinggang, China Architecture Design & Research GroupMartin Reise FrontPhilip Yuan Tongji ShanghaiYusuke Obuchi Tokyo UniversityYusushi Ikada Ikada-Lab Keio University, Japan
Additional speakers to be announced soon. Registration to open soon.
www.Smartgeometry.org…
rter way.
then using the mirror component i generated a clone that fits into the original face.
it does work for 3 or 4 domes, but if i want to generate....say.....100....i will be complicated.
any suggestions???
besides, the ghx file is already 1mb, just having 3 domes!!!
cheers.…
nkels bei Zerlegung in 2 Dreiecke'Zeichnen der Zerlegung nach dem kleineren Winkel 'Eingabe: 4 Punkte im Raum 'Peter Mayrhofer 05-2007'==================================================Sub Main() Dim arrPts 'Array der 4 Eingabepunkte Dim arrN1, arrN2 'Normalvektoren einer Zerlegung in 2 Dreiecke Dim winkel1, winkel2, wmin, wmax 'Winkel bei gemeinsamer Kante Dim pi, grad pi = 4*Atn(1): grad = 180/pi 'Eingabe arrPts = GetPoints(,, "4 Punkte eingeben..." ,, 4)'Punkte 0,1,2,3 'Berechnung Winkel1 bei Zerlegung mit gemeinsamer Kante [1,3] arrN1 = VectorUnitize(VectorCrossProduct(VectorCreate(arrPts(0), arrPts(1)),VectorCreate(arrPts(0), arrPts(3)))) arrN2 = VectorUnitize(VectorCrossProduct(VectorCreate(arrPts(2), arrPts(3)),VectorCreate(arrPts(2), arrPts(1)))) If VectorCompare (arrN1, arrN2) Then winkel1 = 180 'Das Viereck ist planar! MessageBox "*Viereck ist planar*" Exit Sub Else winkel1 = Arccos(VectorDotProduct(arrN1, arrN2))*grad End If 'Berechnung Winkel2 bei Zerlegung mit gemeinsamer Kante [0,2] arrN1 = VectorUnitize(VectorCrossProduct(VectorCreate(arrPts(1), arrPts(2)),VectorCreate(arrPts(1), arrPts(0)))) arrN2 = VectorUnitize(VectorCrossProduct(VectorCreate(arrPts(3), arrPts(0)),VectorCreate(arrPts(3), arrPts(2)))) winkel2 = Arccos(VectorDotProduct(arrN1, arrN2))*grad 'Winkelvergleich und Ausgabemeldung If winkel1 <= winkel2 Then wmin = winkel1 : wmax = winkel2 AddLine arrPts(0), arrPts(2) 'Dreieckszerlegung bei kleinerem Winkel Else wmin = winkel2 : wmax = winkel1 AddLine arrPts(1), arrPts(3) 'Dreieckszerlegung bei kleinerem Winkel End If wmin = Fix(wmin*100)/100: wmax = Fix(wmax*100)/100 MessageBox "*Viereck nicht planar*"&vbNewLine& _ " Minimalwinkel = "&wmin&"°"&vbNewLine& _ " Maximalwinkel = "&wmax&"°"End SubMain 'Aufruf des Hauptprogramms
'================================='Funktionen aus der Vector-Library'================================='Make a vector from two 3D pointsPublic Function VectorCreate(p1, p2) VectorCreate = Null If Not IsArray(p1) Or (UBound(p1) <> 2) Then Exit Function If Not IsArray(p2) Or (UBound(p2) <> 2) Then Exit Function VectorCreate = Array(p2(0) - p1(0), p2(1) - p1(1), p2(2) - p1(2))End Function
'Unitize a 3D vectorPublic Function VectorUnitize(v) VectorUnitize = Null If Not IsArray(v) Or (UBound(v) <> 2) Then Exit Function Dim dist, x, y, z, x2, y2, z2 x = v(0) : y = v(1) : z = v(2) x2 = x * x : y2 = y * y : z2 = z * z dist = x2 + y2 + z2 If (dist < 0.0) Then Exit Function dist = Sqr(dist) x = x / dist y = y / dist z = z / dist VectorUnitize = Array(x, y, z)End Function
'Return the dot product of two 3D vectorsPublic Function VectorDotProduct(v1, v2) VectorDotProduct = Null If Not IsArray(v1) Or (UBound(v1) <> 2) Then Exit Function If Not IsArray(v2) Or (UBound(v2) <> 2) Then Exit Function VectorDotProduct = v1(0) * v2(0) + v1(1) * v2(1) + v1(2) * v2(2)End Function
'Return the cross product of two 3D vectorsPublic Function VectorCrossProduct(v1, v2) VectorCrossProduct = Null If Not IsArray(v1) Or (UBound(v1) <> 2) Then Exit Function If Not IsArray(v2) Or (UBound(v2) <> 2) Then Exit Function Dim x, y, z x = v1(1) * v2(2) - v1(2) * v2(1) y = v1(2) * v2(0) - v1(0) * v2(2) z = v1(0) * v2(1) - v1(1) * v2(0) VectorCrossProduct = Array(x, y, z)End Function
'Function: ArccosFunction Arccos(x) Arccos = Atn(-x / Sqr(-x * x + 1)) + 2 * Atn(1)End Function
'Compare two 3D vectors for equalityPublic Function VectorCompare(v1, v2) VectorCompare = False If Not IsArray(v1) Or (UBound(v1) <> 2) Then Exit Function If Not IsArray(v2) Or (UBound(v2) <> 2) Then Exit Function If v1(0) = v2(0) And v1(1) = v2(1) And v1(2) = v2(2) Then VectorCompare = True End IfEnd Function
…
eate a surface from any where between 3 sides and 100 sides depending on the outline and the outline will always be drawn by a polyline.
Any guidance would be appreciated,
Thanks,
Zach…
00 are in exactly the same spot as your three spin force centres. This is somehow causing the error. Change the seed to 2 and the error goes away.
However all the resulting lines only contain a single segment, rather than the requested 1000. I'm looking into why this would be.…
0, y:100"?
To do this I have been creating a surface and then doing things like creating a uv grid, but is there a way to skip that and just input coordinates into a plane?
Thanks!…