JHUGen MELA  v2.4.1
Matrix element calculations as used in JHUGen. MELA is an important tool that was used for the Higgs boson discovery and for precise measurements of its structure and interactions. Please see the website https://spin.pha.jhu.edu/ and papers cited there for more details, and kindly cite those papers when using this code.
Public Member Functions | List of all members
hto_imag_lnz::operator(.ilnz.) Interface Reference

Public Member Functions

real *8 function ilnz (x, y)
 

Detailed Description

Definition at line 380 of file CALLING_cpHTO.f.

Member Function/Subroutine Documentation

◆ ilnz()

real*8 function hto_imag_lnz::operator(.ilnz.)::ilnz ( real*8, intent(in)  x,
real*8, intent(in)  y 
)

Definition at line 385 of file CALLING_cpHTO.f.

385  USE hto_riemann
386  IMPLICIT NONE
387  real*8, INTENT(IN) :: x,y
388  real*8 teta,tnteta,sr,si,ax,ay,ilnz
389  ax= abs(x)
390  ay= abs(y)
391  IF(x.eq.0.d0) THEN
392  IF(y > 0.d0) THEN
393  teta= pi/2.d0
394  ELSE
395  teta= -pi/2.d0
396  ENDIF
397  ilnz= teta
398  RETURN
399  ELSE IF(y.eq.0.d0) THEN
400  IF(x > 0.d0) THEN
401  teta= 0.d0
402  ELSE
403  teta= pi
404  ENDIF
405  ilnz= teta
406  RETURN
407  ELSE
408  tnteta= ay/ax
409  teta= atan(tnteta)
410  sr= x/ax
411  si= y/ay
412  IF(sr > 0.d0) THEN
413  ilnz= si*teta
414  ELSE
415  ilnz= si*(pi-teta)
416  ENDIF
417  RETURN
418  ENDIF

The documentation for this interface was generated from the following file:
hto_riemann
Definition: CALLING_cpHTO.f:195