Up

##
##
##        Calculate equivalent conicity by using Klingel's equation
##        ---------------------------------------------------------
##
##        Lw=2*pi*sqrt(bo*ro/lambda)
##
##        Lw = Length of wave
##
##        lambda = 4*pi*pi*bo*ro/Lw/Lw
##

create_scalar CURVE_ZERO  axl_111.zero axl_111.y

func operp  Periodtid= axl_111.zero.z3 - axl_111.zero.z1

func operp  Lw= Periodtid * Vo

func operp  Lw2= Lw * Lw

func operp  Lambda= 39.47841762 * bo * ro1 / Lw2

print scalar gauge_dev init_ampl Lambda