= #JxnPortable\docs\plot_examples\demos\SmithChart.jxn

slider = @JxnSliderPanel( $this )
R1 = slider.add( "R1", 1.,   0., 20. )
X1 = slider.add( "X1", 0., -10., 10. )
R2 = slider.add( "R2", 0.,   0., 20. )
X2 = slider.add( "X2", 1., -10., 10. )
!
logSkal = @JxnRealArrayAlgebra { 0.1, 0.15, 0.2, 0.3, 0.5, 0.7, 1., 1.5, 2., 3., 5., 7., 10., 15., 20., 30., 50., 70., 100. }
logSkal = @JxnRealArrayAlgebra { 0.,  0.1,  0.2, 0.3, 0.5, 0.7, 1., 1.5, 2., 3., 5., 7., 10., 15., 20., 30., 50., 70., 100. }
logY = concat( reverse( -logSkal ), logSkal.range(1) )
!
m = length logSkal - 1
xy = @JxnUVGrid( 0., m, 2., 0., 2 m, 2., 5 )
z = logSkal[ xy.u() ] + j logY[ xy.v() ]  ! [] maps to JxnRealArrayAlgebra get(JxnRealArrayAlgebra ra)
z1 = R1 + j X1
z2 = R2 + j X2
r  = ( z  - 1 )/( z  + 1 )
r1 = ( z1 - 1 )/( z1 + 1 )
r2 = ( z2 - 1 )/( z2 + 1 )
pf = plot( real r, imag r, 1. )
FILL_CIRCLE = 1
pf.add( @JxnSymbolPainter( FILL_CIRCLE, real r1, imag r1, 5 ).setColor(G) )
pf.add( @JxnSymbolPainter( FILL_CIRCLE, real r2, imag r2, 5 ).setColor(B) )