Students Works, First Year IE School of Architecture, Segovia.

Extracto del encargo:
…Este proyecto consistirá en hacer un análisis espacial y/o programático de una parte de la Universidad con el objetivo de identificar una falencia que pueda ser suplida con un proyecto arquitectónico.

Hoy en día la profesión de arquitecto no puede ser planteada de la misma manera como se hizo hace algunos años atrás. El arquitecto que pretenda ser competitivo en el mercado internacional actual debe ser capaz de auto gestionarse y auto encargarse proyectos para buscar nichos económicos que no hayan sido explotados hasta el momento.

Nuestra profesión nos otorga una poderosa herramienta que es la observación y nos aprovecháremos de ella para desarrollar un proyecto arquitectónico que busque suplir un carencia dentro del edificio de la universidad y proponer una solución innovadora mediante la programación como herramienta proyectual.

El segundo encargo será un trabajo en parejas.
…

estatement of assignment…
…
This project will consist in to make a spatial analysis and / or programmatic analysis of the university with the objective to identify failures or problems that can be solved by architectonical project.

The profession of the architecture cannot be seen in the same way like years before. The architect that pretends to be competitive in the actual international market or even in the local market must be capable of self-managed and self-assignments projects that seek economic targets have not been exploited.

Our profession is based on a powerful tool that is the observation. We will use it to develop an architectonical project to propose an innovative solution trough scripting like design tool.

The second assignment will be in pairs.
…

Para más detalle de los proyectos, contactar a los alumnos a través de la universidad
For more information about the projects, please contact the students through the University.

Se deberá incluir análisis espacial, conceptos y el código que hizo posible el proyecto, secciones, plantas, elevaciones del proyecto, considerando materiales, espesores y principios estructurales. (Planimetría)
Además se deberán incluir renders, dibujos donde deberá aparecer reflejado el carácter o la intención de materialidad del proyecto. También deberán aparecer intenciones de la construcción, así como ensambles, fijaciones, tensores, pilares. Deberá aparecer como los alumnos se imaginan la construcción del proyecto, que técnicas utilizarían para poder concretar su fabricación, que tipo de tecnología necesitarían para desarrollar sus proyectos.

Lamina 1: análisis del espacio
Lamina 2: Referencias Biológicas y arquitectónicas.
Lamina 3: Concepto del Proyecto
Lamina 4: Plantas
Lamina 5: Elevaciones
Lamina 6: Secciones
Lamina 7: Renders y dibujos
Lamina 8: Construcción
…
Final submission: the students will be present 8 Panels A2. The presentation will be oral with 15 minutes per group.
The Students will be showing spatial analysis, concepts, and the code of the project. Sections, plants, views, considering materials, widths and structural principles (planimetry).

Also they will include renders, drawings showing the character of the intentions of the project. Furthermore they should demonstrate intentions of the construction, assemblies, connectors, tensors, pillars.

The students must be show how imagine the project, which techniques will use to build the projects, and which type of technology is necessary.

Lamina 1: space analysis
Lamina 2: Biological and architectonical references
Lamina 3: Concept of the Project
Lamina 4: Plants
Lamina 5: Views
Lamina 6: Sections
Lamina 7: Renders and Drawings
Lamina 8: Constructio
…

Para más detalle de los proyectos, contactar a los alumnos a través de la universidad
For more information about the projects, please contact the students through the University.

Some Images from the complete generation, saving every “child”:

And here the code:
some functions from Marius Watz:
Option Explicit
‘Script written by carlos de la b.
‘Script copyrighted by designemergente.org
‘Script version miércoles, 24 de junio de 2009 18:17:12

Call Main()
Sub Main()

‘//we need a Surface to grow and grow
Dim Idsrf
Idsrf = Rhino.GetObject(”sel srf”,
If IsNull(Idsrf) Then Exit Sub

Call rec(Idsrf, 0)

End Sub

Function rec(Idsrf, counter) ‘//recursion under your own Risk!!!

‘domain of the curve
Dim Udom, Vdom
Udom = Rhino.SurfaceDomain(Idsrf, 0)
Vdom = Rhino.SurfaceDomain(Idsrf, 1)

‘parameters, divisions, counters and a point
Dim Up, Vp, divU, divV, i, j, k, pt, l
k = 0
divU = 6
divV = 6

Dim arrPoints(35)

For i = 0 To divU – 1
For j = 0 To divV – 1

Up = Udom(0) + i * ((Udom(1) – Udom(0)) / divU)
Vp = Vdom(0) + j * ((Vdom(1) – Vdom(0)) / divV)

pt = Rhino.SurfaceCurvature(Idsrf, Array(Up, Vp))

‘Randomize
‘ If 0.5 < rnd Then
‘ pt(1) = Rhino.VectorScale(pt(1), rnd * 5)
‘ l = Rhino.PointAdd(pt(1), pt(0))

‘ Else
l = Rhino.PointAdd(pt(1), pt(0))

‘ End If

arrPoints(k) = l
k = k + 1

Next
Next

Call Rhino.DeleteObject(IDsrf)
Dim n: n = Rhino.AddSrfPtGrid (Array(divU, divV), arrPoints)

Call Rhino.sleep(3000)

renderView()

Call rec(n, counter + 1)

End Function

‘ Render current viewport
Function renderView()’this function from Marius Watz, a very little modification by me.
Dim view,filename

view = Rhino.CurrentView
Rhino.Command “_-Render”
filename=getRenderFileName(”GrowSurface”)
Dim cmd : cmd=”_-SaveRenderWindowAs ” & Chr(34) & filename & Chr(34)
Rhino.Command cmd
Rhino.Command “_-CloseRenderWindow”
Rhino.Sleep(3000)
End Function

‘ Get auto-incremented filename
Function getRenderFileName(scriptName) ‘this function from Marius Watz
Dim index,done, doc, file, temp,imgNum

done=-1
index=0
Do While done=-1
doc=Rhino.WorkingFolder & “\” & scriptName & padStr(scriptName,index) & “.jpg”
file=Rhino.FindFile(doc)
If IsNull(file)=True Then
done=1
Else
index=index+1
End If
Loop

getRenderFileName=doc
End Function

Function padStr(prefix,val) ‘this function from Marius Watz
Dim l : l=Len(val)
If l<1 Then
padStr=”000″ & val
ElseIf l<2 Then
padStr=”00″ & val
ElseIf l<3 Then
padStr=”0″ & val
Else
padStr=”" & val
End If
End Function

The atmosphere during the workshoop was really cool!. I would personally like to thank: Carmen García Reig (Organization and invitation), Ismael García (Organization), Antonio Casas (the mathematician), Pablo Miranda Carpintero (I’m eager to see the programming in Sketch-up), Tomás Pineda (Images), Miguel Vidal, see his blog: arquitecturaprogramable.es

With no particular order, some images of the projects during the workshop.




Tomás Pineda:

Pablo Miranda

Miguel Vidal

Ismael García

Carmen García Reig

Hago este post, de un pequeño seminario para profesores de la UPC, sobre Algoritmos Genéticos. Todos ellos sabían programar desde hace mucho. Habían comenzado con Auto Lisp para Auto CAD y eran muy hábiles con Visual BASIC, obsesionados con las nubes de puntos y el apilamiento de bloques.
Todos locos de la investigación y la exploración.
El Seminario fue muy corto, pero tuvimos oportunidad de intercambiar muchas ideas y estrategias en resolución de algoritmos y en la optimización de diferentes problemas.

Un ejercicio muy interesante fue el ByteString Problem, que comenzamos usando la fuerza bruta para descifrar una cadena de N bytes. Para luego poder incorporar estrategias evolutivas y poder comparar las diferentes estrategias.

Todas las imagenes tomadas de la web: google / imagenes / “parámetro de búsqueda”.
excepto imagen 9, cuaderno de notas, autor
excepto imagen 10, esquema básico de los AGs, autor
excepto imagen 20, funciones del ByteString Problem, autor, curso de Luis Belanche
excepto imagen 21, print pantalla de un resultado de búsqueda por medio de mutacion, población y descendencia, se uso RhinoScript, aunque VB dio algunos problemas fueron solucionados.
Excepto Imagen 25, estrategia tomada de http://www.geocities.com/pretabbed/ags.htm

I’ve been working yesterday in a Circle Packing, and I started with matsys pseudo-code.  I found a lot bugs, finally I decided to make a mixture between his algorithm and mine.  Circle Packing can be a very usefull algorithm and I think until now we have not seen their real power applied to architecture.

This is my little contribuition (pseudo_Code)

1_ Input: maxradius, boundary, iterations (not necessary the number of circles)

2_Add in a random position within the boundary a circle with maximum radius

3_Add a Random Point

4_If this Point is inside of the Circle just created, add another one and delete the old one

5_Add Line to this point (out of the circle) to the center of the circle, (here I use the same idea of matsys) “If the distance is greated than the maximum radius add a circle at that point with the maximum radius. If the distance is less than the maximum radius, add a circle at that point with the measured distance.”

6_ add another point and test if this point is within of any circle and add a line to every center circle to find the closest circle (step _5)

7_ repeat the steps 5  to 6 the number of the iterations

soon more images.

share, modify and send me an Image

best

Option Explicit
‘Script written by <Carlos de la Barrera>
‘Script copyrighted by <Carlos de la Barrera>

Call Main()
Sub Main()
Dim Pt, R
Pt = Array(rnd * 100, rnd * 100, 0)
R = FuncCir(Pt, 10)

Call Pack(R)
End Sub

Function Pack(R)
Dim Pt, i, count

count = Rhino.GetInteger(” number of circles “, 50, 2, 1000)
If IsNull (count) Then Exit Function

Dim ArrData()

For i = 0 To count
ReDim Preserve ArrData(i)
ArrData(i) = R

Pt = Array(Rnd * 100, rnd * 100, 0)

Dim j
Dim t: t = 0

For j = 0 To UBound(ArrData)
If Rhino.IsPointOnSurface(ArrData(j)(1)(0), Pt)Then
Call Rhino.print (”point in surface”)
t = t + 1

End If
Next

If (t = 0) Then
ReDim ArrLine(UBound(ArrData))
Dim k, line

For K = 0 To UBound(ArrData)
line = Rhino.AddLine(Pt, Rhino.CircleCenterPoint(ArrData(k)(0)))
ArrLine(k) = Line
Next

Dim d, d2, l
d = funcDist(Pt, ArrData(0)(0), ArrLine(0))

For l = 0 To UBound(ArrLine)
d2 = funcDist(Pt, ArrData(l)(0), ArrLine(l))

If d < d2 Then
‘Call Rhino.Print (”nothing”)

Else
d = d2

End If
Next

R = FuncCir(Pt, d)
Call Rhino.DeleteObjects (ArrLine)

End If
Next
End Function

Function FuncCir(p, D)

If D >= 10 Then
D = 10

End If

Dim plane
Dim R(1)

plane = Rhino.PlaneFromFrame(p, Array(1.0,0.0,0.0), Array(0.0,1.0,0.0))
R(0)   = Rhino.AddCircle(plane, D)
R(1) = Rhino.AddPlanarSrf(Array(R(0)))

FuncCir = R
End Function

Function funcDist(Pt, circleP, Line)
Dim Ap, j, d
Ap = Rhino.CurveCurveIntersection (circleP, Line)

For j = 0 To UBound(Ap)
d = Rhino.Distance(Pt, Ap(j, 1))
Next

funcDist = d
End Function

the other day I listen: – talk it’s easy,  ¡ show me the code ! - ]]> http://www.designemergente.org/rhinoscripting/circle-packing/feed/ 0 http://www.designemergente.org/rhinoscripting/sensitive-analisys-prato-italy/ http://www.designemergente.org/rhinoscripting/sensitive-analisys-prato-italy/#comments Wed, 06 Aug 2008 09:12:50 +0000 carlos delab http://www.designemergente.org/?p=423 I was invited to paticipate in a contest to the Comune di Prato in Italy. I have to say thank you to this cool group of architects from Lisboa: Duarte Cardoso Ferreira, Nuno Lobo Guerra, Ricardo Boaventura, Rita Frias Silva from ADOC architects and all the team of 4ARQ encharged of the 3D images.

I was encharge to develope by programming the plans and the general features of the school. We start working identify every tree in the ground and the area of the differents rooms for the school. Every tree was identify by a point and a minum area of influence (in the fisrt step of the algorithm) and each area of the room of the school was enter in to the algorithm to know the best performance of the build with out touch any tree.

Then the algorithm calculate a voronoi diagram (only with the trees) and inform the resultant areas and we could see where can “grow” our building. the next step was develope a second algorithm to generate pseudo-random points, between the trees and responding obviously to the influence area of them.

Then the process consist basicaly in create generations and test the results, if the dispositions of points allow build the school (first and more important test), if the result produce nice spaces, if we like it, if the algorithm respect entrance determined by us, etc. etc. after every generation, we pass again this second algorithm to produce in some points a random movement to explore new configurations and results.

I take this idea from Mutsuro Sasaki, he use an strategy based in the approach in successive steps to get the best result moving the points in pseudo random way.

Thi first step was to find the correct data store to find the points. then I put all this points inside of an array and then create the curve. and for the other curves I did the same, searching the even and odd of every point.

I know there are a lot kind of patterns in the textile insdustri, and also my Grandmother know how to create with the crochet technics differents patterns, some of them with very complex estructures. If we thought that an algortihm is and a mathematic or aritmetic rule that is repeated, (Cecil Balmond, Informal, page 112), we will see that my grandmother and all the people who elaborate knitted fabric are actually programming an Algortihm.

These images represent the process of my recursion work that started few weeks ago, with the post recursion, I will continue working in this kind of programming, and exploring differents types of recursion. there are a lot information of recursion in the web. and also example codes in differents languages like C++, C#, Java, Rvb, etc. etc.

In relation with the architecture you can see the web page of Marc Fornes, he explore the process of recursion in deep, you can find very cool information about this kind of programming, and other interesting data type. THE VERY MANY also is reference of my work and reference of many other architects who explore the new technologies.