Hi,
I have a macro for torus as

#include"transforms.inc"
#macro Torus(Center, Normal, Radius1, Radius2)
torus{ Radius1, Radius2 Reorient_Trans(y, Normal) translate Center }
#end

object {Torus (
1, 0, 0, 0, 0, 0, 2, 4)
texture{ pigment{ LightBlue} }}

How I modify it to make elliptical torus?


--
Thanks
Gurwinder Singh  Bains

Post a reply to this message

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA256

Le 20/07/2015 08:27, bakom a écrit :
> Hi, I have a macro for torus as
> 
> #include"transforms.inc" #macro Torus(Center, Normal, Radius1,
> Radius2) torus{ Radius1, Radius2 Reorient_Trans(y, Normal)
> translate Center } #end
> 
> object {Torus ( 1, 0, 0, 0, 0, 0, 2, 4) texture{ pigment{
> LightBlue} }}
> 
> How I modify it to make elliptical torus?
> 

If you mean a rotating disc along an ellipse, you will need to use the
true equation (fourth order polynomial), as you cannot transform the
master circle into an ellipse while keeping the rotating circle a true
circle.

If you mean rotating an ellipse along a circle (elliptic torus at
Wolfram), a scale along the single axis of the torus should satisfy
you. (as long as you accept a scaled disc to be an ellipse).

> http://mathworld.wolfram.com/EllipticTorus.html

Otherwise, the fourth order polynomial is also the way to go. (quartic)


> http://wiki.povray.org/content/Reference:Polynomial


> 
> -- Thanks Gurwinder Singh  Bains
> 
> 

-----BEGIN PGP SIGNATURE-----
Version: GnuPG v2

iJwEAQEIAAYFAlWtMpgACgkQhKAm8mTpkW38EAQAofKMKOwCxn6AiJL7P/5F0/pL
rRsjLs1wBZkWHEqAV7My2EAyBaqc8HiSs7wdvZJsTNsOqxGUQ7hzbW8c95KpY3er
//WOh/wMuSeXMsz7b4SB14AXA4pL62NDY9QjLBXzC3mLrEUnVSCKywGhhrfX078t
B09qktCg7KjYClwEvsE=
=NkII
-----END PGP SIGNATURE-----

Post a reply to this message

On 07/20/2015 02:27 AM, bakom wrote:
> Hi,
> I have a macro for torus as
>
> #include"transforms.inc"
> #macro Torus(Center, Normal, Radius1, Radius2)
> torus{ Radius1, Radius2 Reorient_Trans(y, Normal) translate Center }
> #end
>
> object {Torus (
> 1, 0, 0, 0, 0, 0, 2, 4)
> texture{ pigment{ LightBlue} }}
>
> How I modify it to make elliptical torus?

Are you looking for something like this?

http://lib.povray.org/collection/roundedge/cousin%20ricky%201.3/roundedge_05.jpg

This object is available from the Object Collection.  If it's what 
you're looking for, you can go to lib.povray.org and type RoundEdge into 
the search field.

Post a reply to this message

Cousin Ricky <ric### [at] yahoocom> wrote:
> On 07/20/2015 02:27 AM, bakom wrote:
> > Hi,
> > I have a macro for torus as
> >
> > #include"transforms.inc"
> > #macro Torus(Center, Normal, Radius1, Radius2)
> > torus{ Radius1, Radius2 Reorient_Trans(y, Normal) translate Center }
> > #end
> >
> > object {Torus (
> > 1, 0, 0, 0, 0, 0, 2, 4)
> > texture{ pigment{ LightBlue} }}
> >
> > How I modify it to make elliptical torus?
>
> Are you looking for something like this?
>
> http://lib.povray.org/collection/roundedge/cousin%20ricky%201.3/roundedge_05.jpg
>
> This object is available from the Object Collection.  If it's what
> you're looking for, you can go to lib.povray.org and type RoundEdge into
> the search field.

Thanks alot for this.


Gurwinder singh

Post a reply to this message