Scripts and User Functions Center

Create the 40 m radio telescope from Yebes Observatory

This script creates the 40 m radio telescope from Yebes Observatory.

More detailed information can be found in next link http://www.oan.es/rt40m/optica[en].html

Thumb radiotelescope Thumb mainparameters Thumb radiotelescope nf
#
#	 newFASANT script file 
#
# 	Creates the 40 m radio telescope from Yebes Observatory
#	More detailed information can be found in next link
#		http://www.oan.es/rt40m/optica[en].html
#
#	The following specifications are given:
#		D: Main reflector diameter
#		fp: Main reflector focal length
#		Dvp: Diameter of the vertex hole of the main reflector
#		Ds: Sub reflector diameter
#		hp: Main reflector depth
#		Dvs: Diameter of the vertex hole of the sub reflector
#		Lv: Distance between primary focus and sub reflector vertex
#		Ls: Distance between parabola border and sub reflector vertex
#
#	Parameters with fixed values

set D {40.0}
set fp {15.0}
set Dvp {2.882}
set Ds {3.28}
set hp {6.667}
set Dvs {0.2635}
set Lv {1.20413}
set Ls {7.129}
#	Auxiliary parameters defined automatically

set $3  = Dvs/2
set $1  = hp+Ls
set $2  = hp+Ls+Lv
set $4  = Ls+Lv
#	Main reflector

paraboloid -n reflector -p 0.0 0.0 0.0 Dvp fp D D
#	Subreflector

hyperboloid -n hyperboloid -p 0.0 0.0 0.0 $1 $2 Ds
explode -s hyperboloid
splitSurfaceByIsoparam -u -s hyperboloid_1 -p 0.25 0.5 0.75
group -s hyperboloid_1_1 hyperboloid_1_2 hyperboloid_1_3 hyperboloid_1_4 -n hyperboloid2
cylinder -c -n cylinder -p 0.0 0.0 hp $3 $4
booleanOutside -s -objectA hyperboloid2 -objectB cylinder -n subreflector

Did you find this information useful?

We use cookies on this website to improve your navigation experience on this site. By using this site, you agree to our cookie policy.

I agree