U
    ZÊ¹j&
  ã                   @   sL   d Z ddlmZ ddlmZmZmZmZmZ ddl	Z
ddlmZ dd„ ZdS )aL  
unit test describing the hyperbolic half-plane with the Poincare metric. This
is a basic model of hyperbolic geometry on the (positive) half-space

{(x,y) \in R^2 | y > 0}

with the Riemannian metric

ds^2 = (dx^2 + dy^2)/y^2

It has constant negative scalar curvature = -2

https://en.wikipedia.org/wiki/Poincare_half-plane_model
é    )Údiag)Útwoform_to_matrixÚmetric_to_Christoffel_1stÚmetric_to_Christoffel_2ndÚmetric_to_Riemann_componentsÚmetric_to_Ricci_componentsN)ÚImmutableDenseNDimArrayc                  C   s°  t jj} t jjj}|j}|j}|j}| ||ƒ| ||ƒ |d  }t|ƒ}t	|d |d ƒ}||ksft
‚t|ƒ}|d dks~t
‚|d |d  ks”t
‚|d |d  ksªt
‚|d dksºt
‚|d |d  ksÐt
‚|d	 dksàt
‚|d
 dksðt
‚|d |d k�st
‚t|ƒ}	|	d dk�s t
‚|	d |d  k�s8t
‚|	d |d  k�sPt
‚|	d dk�sbt
‚|	d |d  k�szt
‚|	d	 dk�sŒt
‚|	d
 dk�sžt
‚|	d |d k�s´t
‚t|ƒ}
|
d dk�sÎt
‚|
d dk�sàt
‚|
d dk�sòt
‚|
d dk�st
‚|
d dk�st
‚|
d |d  k�s.t
‚|
d |d k�sDt
‚|
d dk�sVt
‚|
d dk�sht
‚|
d |d k�s~t
‚|
d |d  k�s–t
‚|
d dk�s¨t
‚|
d dk�sºt
‚|
d dk�sÌt
‚|
d dk�sÞt
‚|
d dk�sðt
‚t|ƒ}|d |d  k�st
‚|d dk�s"t
‚|d dk�s4t
‚|d |d  k�sLt
‚|t|d  dd|d  gd ƒk�stt
‚|d |d!  |d"  }|dk�sšt
‚|d" dk�s¬t
‚d S )#Néþÿÿÿ)r   r   r   r   )r   r   é   éýÿÿÿ)r   r
   r   )r   r
   r
   )r
   r
   r
   )r
   r
   r   )r
   r   r
   )r
   r   r   éÿÿÿÿ)r   r   r   r   )r   r   r   r
   )r   r   r
   r   )r   r   r
   r
   )r   r
   r   r   )r   r
   r   r
   )r   r
   r
   r   )r   r
   r
   r
   )r
   r   r   r   )r
   r   r   r
   )r
   r   r
   r   )r
   r   r
   r
   )r
   r
   r   r   )r
   r
   r   r
   )r
   r
   r
   r   )r
   r
   r
   r
   )r   r   )r   r
   )r
   r   )é   r   )r
   r
   r   )ÚsympyZdiffgeomZTensorProductZrnÚR2ÚyÚdyÚdxr   r   ÚAssertionErrorr   r   r   r   r   )ZTPr   r   r   r   ÚgZautomatZmatZgamma1Zgamma2ZRmZRicÚR© r   úi/var/www/html/bwave/python/venv/lib/python3.8/site-packages/sympy/diffgeom/tests/test_hyperbolic_space.pyÚtest_H2   sj    
(r   )Ú__doc__Zsympy.matrices.denser   Zsympy.diffgeomr   r   r   r   r   Zsympy.diffgeom.rnr   Zsympy.tensor.arrayr   r   r   r   r   r   Ú<module>   s
   