You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
35 lines
619 B
35 lines
619 B
2 years ago
|
$ {include("common.h")}
|
||
|
$ {len1 = sqrt(8.5^2 - 7.428^2)}
|
||
|
$ {len2 = FR1 - rad1 - len1}
|
||
|
$ {th = 0.090}
|
||
|
spline 3
|
||
|
front
|
||
|
LEFT 0.0
|
||
|
right 0.0
|
||
|
$ {intr = 73} {_i=0}
|
||
|
{Loop(73)}
|
||
|
{_x = _i/(72) * len1} {sqrt( (8.5+th)^2 - _x^2)} $ {_i++}
|
||
|
{endloop}
|
||
|
$ {_i=1}
|
||
|
{loop(27)}
|
||
|
{_x = len1 + (_i/27) * len2} {7.428+.09} $ {_i++}
|
||
|
{endloop}
|
||
|
Back
|
||
|
LEFT 0.0
|
||
|
right 0.0
|
||
|
$ {intr = 151} {_i=0}
|
||
|
{Loop(151)}
|
||
|
{_x = _i/(150) * len1} {sqrt( (8.501)^2 - _x^2)} $ {_i++}
|
||
|
{endloop}
|
||
|
$ {_i=1}
|
||
|
{loop(100)}
|
||
|
{_x = len1 + (_i/100) * len2} {7.428} $ {_i++}
|
||
|
{endloop}
|
||
|
end
|
||
|
$ sideset back {FireBaseS}
|
||
|
sideset back 10
|
||
|
$ nodeset front 92
|
||
|
revolve x -90
|
||
|
shift y -7.338
|
||
|
EXIT
|