Infinitesimal radius cycle and orthogonality condition¶
Exercise I.7.26 [1] $ \newcommand{\scalar}[3][]{\left\langle #2,#3 \right\rangle_{#1}} \newcommand{\Space}[3][]{\mathbb{#2}^{#3}_{#1}} \newcommand{\Space}[3][]{\mathbb{#2}^{#3}_{#1}} \newcommand{\cycle}[3][]{{#1 C^{#2}_{#3}}} \newcommand{\realline}[3][]{#1 R^{#2}_{#3}} \newcommand{\bs}{\breve{\sigma}} \newcommand{\zcycle}[3][]{#1 Z^{#2}_{#3}} \newcommand{\SL}[1][2]{\mathrm{SL}_{#1}(\Space{R}{})} \newcommand{\rs}{\sigma_r} \newcommand{\lvec}[1]{\overrightarrow{#1}} \newcommand{\rmi}{\mathrm{i}} \newcommand{\alli}{\iota} \newcommand{\rme}{\mathrm{e}} \newcommand{\rmd}{\mathrm{d}} \newcommand{\rmh}{\mathrm{j}} \newcommand{\rmp}{\varepsilon} \newcommand{\modulus}[2][]{\left| #2 \right|_{#1}} \newcommand{\sperp}{⋋} $ Let $\cycle{s}{\bs}$ be the infinitesimal cycle and $\cycle[\breve]{s}{\bs}=(k,l,n,m)$ be a generic cycle. Then:
- Both the orthogonality condition $\cycle{s}{\bs}\perp \cycle[\breve]{s}{\bs}$ and the f-orthogonality $\cycle[\breve]{s}{\bs} \sperp \cycle{s}{\bs}$ are given by \begin{equation} ku_0^2-2lu_0+m=O(\epsilon). \end{equation} In other words, the cycle $\cycle[\breve]{s}{\bs}$ has the real root $u_0$.
- The f-orthogonality $\cycle{s}{\bs} \sperp \cycle[\breve]{s}{\bs}$ is given by \begin{equation} \label{eq:f-orthog-infinites} ku_0^2-2lu_0-2nv_0+m=O(\epsilon). \end{equation} In other words, the cycle $\cycle[\breve]{s}{\bs}$ passes the focus $(u_0,v_0)$ of the infinitesimal cycle in the p-implementation.
Solution. Define the new symbol for vertical coordinate of the focus.
from init_cycle import *
vp=possymbol("vp")
The procedure which will check all statesments.
def infinitesimal_ortho(nval):
epsilon_is_zero = relational(epsilon, 0, eq)
C10 = cycle2D(1, [u, n], pow(u,2)-pow(n,2)*sign1+pow(epsilon,2), e).subs(nval)
display(Latex("Checking infinitesimal cycle: $%s$" % C10.string()))
display(Latex(" Orthogonality (leading term) to infinitesimal cycle is: $%s$" %\
C.is_orthogonal(C10, e).series(epsilon_is_zero, 1).normal()))
display(Latex(" f-orthogonality of other cycle to infinitesimal: $%s$" %\
C.is_f_orthogonal(C10, es).series(epsilon_is_zero, 1).normal()))
return Latex(" f-orthogonality of infinitesimal cycle to other: $%s$" %\
C10.is_f_orthogonal(C, es).series(epsilon_is_zero, 3).normal())
The first type of infinitesimal cycle
infinitesimal_ortho([n==(vp-(pow(pow(vp,2)-pow(epsilon,2)*(sign2-sign1),half)))/(sign2-sign1)])
The parabolic-focus infinitesimal cycle.
infinitesimal_ortho([n==pow(epsilon,2)/2/vp, sign2==sign1])
This notebook is a part of the MoebInv notebooks project [2] .
References¶
Vladimir V. Kisil. Geometry of Möbius Transformations: Elliptic, Parabolic and Hyperbolic Actions of $SL_2(\mathbb{R})$. Imperial College Press, London, 2012. Includes a live DVD.
Vladimir V. Kisil, MoebInv notebooks, 2019.