Observatorio con mathematica

OBSERVATORIO.nb

1

TRABAJO FINAL DE CURVAS Y SUPERFICIES:

Creación de un Observatorio a partir de superficies
Autor : DANIEL REGORDÁN RAMOS Dni : 76648032  A En primer lugar, creamos laparabólica:
 Graphics`ContourPlot3D` ContourPlot3Dx ^ 2  y ^ 2  z, x, 1, 1, y, 1, 1, z, 0, 2, Axes  True
1 0.5 0 -0.5 -1 2

1.5

1 0.5 0 -1 -0.5 0 0.5 1

Graphics3DOBSERVATORIO.nb

2

Parabolica  ContourPlot3Dx ^ 2  y ^ 2  z, x, 1, 1, y, 1, 1, z, 0, 1, Axes  True, PlotPoints  5

1 0.75 0.5 0.25 0 -1 -0.5 0 0.5 1 -1 -0.5 0 1 0.5

Graphics3DA continuación, creamos los receptores:
 Graphics`; Receptores  ShowGraphics3D Blue, Thickness0.03, Polygon0, 1, 1, 0, 1, 0.9, 0, 0, 1.9, 0, 0, 2, Polygon0.866, 0.5, 1,0.866, 0.5, 0.9, 0, 0, 1.9, 0, 0, 2, Polygon0.866, 0.5, 1, 0.866, 0.5, 0.9, 0, 0, 1.9, 0, 0, 2, Axes  True, PlotRange  All

2 1.75 1.5 1.25 1 0.5 -0.5 0 0 0.5 -0.5 1Graphics3D

Posteriormente, unimos los receptores y la parabólica para ir formando la antena:

OBSERVATORIO.nb

3

antena  ShowReceptores, Parabolica
1 0.5 0 -0.5 -1 2

1.5

1 0.50 -1 -0.5 0 0.5 1

Graphics3D

Creamos la base:
ContourPlot3Dx ^ 2  y ^ 2  1  9z ^ 2, x, 1, 1, y, 1, 1, z, 1, 1, Axes  True

-0.2 0.2 0 -0.2 1

0

0.2

0.5

0-0.5

-1

Graphics3D

OBSERVATORIO.nb

4

ContourPlot3Dx ^ 2  y ^ 2  1  9z ^ 2, x, 1, 1, y, 1, 1, z, 1, 1, Axes  True, PlotPoints  7
-0.2 0.2 0 -0.2 1

0

0.20.5

0

-0.5

-1

Graphics3D Base  ContourPlot3Dx ^ 2  y ^ 2  1  9z ^ 2, x, 0.4, 0.4, y, 0.4, 0.4, z, 2, 0, Axes  True, PlotPoints  7

-0.4 0.4 0.2 -0.2 0 0.2 0 0.4 -0.2-0.4 0

-0.5

-1

-1.5

Graphics3D

Ahora unimos la base, el receptor y la parabólica y queda como resultado la antena formada:

OBSERVATORIO.nb

5

ShowReceptores, Base,...