JHUGen MELA  JHUGen v7.5.6, MELA v2.4.2
Matrix element calculations as used in JHUGen.
modmisc::swap Interface Reference

Public Member Functions

subroutine swapi (i, j)
 
subroutine swapr (i, j)
 
subroutine swapc (i, j)
 
subroutine swap_mom (Mom1, Mom2)
 
subroutine swap_cmom (Mom1, Mom2)
 

Detailed Description

Definition at line 5 of file mod_Misc.F90.

Member Function/Subroutine Documentation

◆ swap_cmom()

subroutine modmisc::swap::swap_cmom ( complex(8), dimension(1:4)  Mom1,
complex(8), dimension(1:4)  Mom2 
)

Definition at line 434 of file mod_Misc.F90.

434 implicit none
435 complex(8) :: Mom1(1:4),Mom2(1:4),tmp(1:4)
436 
437  tmp(1:4) = mom2(1:4)
438  mom2(1:4) = mom1(1:4)
439  mom1(1:4) = tmp(1:4)
440 
441 RETURN

◆ swap_mom()

subroutine modmisc::swap::swap_mom ( real(8), dimension(1:4)  Mom1,
real(8), dimension(1:4)  Mom2 
)

Definition at line 423 of file mod_Misc.F90.

423 implicit none
424 real(8) :: Mom1(1:4),Mom2(1:4),tmp(1:4)
425 
426  tmp(1:4) = mom2(1:4)
427  mom2(1:4) = mom1(1:4)
428  mom1(1:4) = tmp(1:4)
429 
430 RETURN

◆ swapc()

subroutine modmisc::swap::swapc ( complex(8)  i,
complex(8)  j 
)

Definition at line 413 of file mod_Misc.F90.

413 implicit none
414 complex(8) :: i,j,temp
415 
416  temp=j
417  j=i
418  i=temp
419 

◆ swapi()

subroutine modmisc::swap::swapi ( integer  i,
integer  j 
)

Definition at line 393 of file mod_Misc.F90.

393 implicit none
394 integer :: i,j,temp
395 
396  temp=j
397  j=i
398  i=temp
399 

◆ swapr()

subroutine modmisc::swap::swapr ( real(8)  i,
real(8)  j 
)

Definition at line 403 of file mod_Misc.F90.

403 implicit none
404 real(8) :: i,j,temp
405 
406  temp=j
407  j=i
408  i=temp
409 

The documentation for this interface was generated from the following file: