• #### Intermediate variables in user functions

From layzarc@aol.com@21:1/5 to All on Sun Aug 25 06:33:35 2019
I have a script that works beautifully that has the following function definitions:

phi(x,y) = (1+x)/(1+sqrt(1+(x*x-1)*y))
astig(n,x,y) = phi(x,y)*(1-phi(x,y)*y)*(n-1)**2-(phi(x,y)-n*n)*(n-1+y*(phi(x,y)-n))**2

It would be a lot cleaner if the following was possible:

phi(x,y) = (1+x)/(1+sqrt(1+(x*x-1)*y))
astig(n,x,y) = f=phi(x,y) f*(1-f*y)*(n-1)**2-(f-n*n)*(n-1+y*(f-n))**2

Al

--- SoupGate-Win32 v1.05
* Origin: fsxNet Usenet Gateway (21:1/5)
• From Ethan Merritt@21:1/5 to layzarc on Sun Aug 25 17:46:21 2019
On Sun, 25 Aug 2019 06:33:35 -0700, layzarc wrote:

I have a script that works beautifully that has the following function definitions:

phi(x,y) = (1+x)/(1+sqrt(1+(x*x-1)*y))
astig(n,x,y) = phi(x,y)*(1-phi(x,y)*y)*(n-1)**2-(phi(x,y)-n*n)*(n-1+y*(phi(x,y)-n))**2

It would be a lot cleaner if the following was possible:

phi(x,y) = (1+x)/(1+sqrt(1+(x*x-1)*y))
astig(n,x,y) = f=phi(x,y) f*(1-f*y)*(n-1)**2-(f-n*n)*(n-1+y*(f-n))**2

Al

Use the serial evaluation operator (a,b):

astig(n,x,y) = (f=phi(x,y) , f*(1-f*y)*(n-1)**2-(f-n*n)*(n-1+y*(f-n))**2)

--- SoupGate-Win32 v1.05
* Origin: fsxNet Usenet Gateway (21:1/5)
• From layzarc@aol.com@21:1/5 to All on Sun Aug 25 12:21:21 2019
Ethan,

Been using Gnuplot for years but somehow missed that feature.

Thanks,
Al

--- SoupGate-Win32 v1.05
* Origin: fsxNet Usenet Gateway (21:1/5)