Geant4.10
 All Data Structures Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Macros Groups Pages
Functions/Subroutines
dtu25lap.f File Reference

Go to the source code of this file.

Functions/Subroutines

subroutine jtdtu (IOPT)
 
subroutine selhrd (MHARD, IJPVAL, IJTVAL, PTTHRE)
 
subroutine harevt (MHARD, PT1IN)
 
subroutine hamult
 
subroutine recchk (LINMAX, X, IOPT)
 
subroutine xcheck (X1S, X2S, LINMAX)
 
subroutine hax1x2
 
subroutine harkin
 
subroutine hachek (IOPT)
 
subroutine hafdis (PDS, PDA, PDB, FDISTR)
 
subroutine harsca
 
subroutine haoutp
 
subroutine jtpdis (X, QQ, IHATYP, MSPR, PD)
 
subroutine phkmrs (XQ, QQ, PD, MODE)
 
subroutine laptab
 
subroutine csj2m (PT, ETAC, ETAD, DSIGMM)
 
subroutine csj1m (PT, ETAC, DSIGM)
 
subroutine csj1mi (PT, DSIGM)
 
subroutine csharm (DSIGM)
 
subroutine hisout (IOUT)
 
subroutine hisini
 
subroutine hisfil
 
subroutine hatest (IOUT)
 
subroutine harini
 
subroutine habint (IND)
 
subroutine hamaxi (IND)
 
subroutine hafdi1 (NKON, Z, FDIS, IND)
 
subroutine hastrt
 
subroutine dor94lo (X, Q2, UV, DV, DEL, UDB, SB, GL)
 
subroutine dor94ho (X, Q2, UV, DV, DEL, UDB, SB, GL)
 
subroutine dor94di (X, Q2, UV, DV, DEL, UDB, SB, GL)
 
function dor94fv (X, N, AK, BK, A, B, C, D)
 
function dor94fw (X, S, AL, BE, AK, BK, A, B, C, D, E, ES)
 
function dor94fs (X, S, AL, BE, AK, AG, B, D, E, ES)
 

Function/Subroutine Documentation

subroutine csharm ( dimension(0:maxpro)  DSIGM)

Definition at line 1682 of file dtu25lap.f.

References csj1mi(), CLHEP::HepLorentzVector::e(), G4Abla::f(), gset(), c2_factory< float_type >::log(), maxpro, and HepGeom::BasicVector3D< T >::r().

subroutine csj1m (   PT,
  ETAC,
dimension(0:maxpro)  DSIGM 
)

Definition at line 1614 of file dtu25lap.f.

References csj2m(), HepGeom::Plane3D< T >::d(), c2_factory< float_type >::exp(), gset(), c2_factory< float_type >::log(), and maxpro.

subroutine csj1mi (   PT,
dimension(0:maxpro)  DSIGM 
)

Definition at line 1653 of file dtu25lap.f.

References csj1m(), gset(), c2_factory< float_type >::log(), maxpro, and c2_factory< float_type >::sqrt().

subroutine csj2m (   PT,
  ETAC,
  ETAD,
dimension(0:maxpro)  DSIGMM 
)

Definition at line 1518 of file dtu25lap.f.

References HepGeom::Plane3D< T >::d(), c2_factory< float_type >::exp(), jtpdis(), c2_factory< float_type >::log(), maxpro, and CLHEP::HepBoost::tt().

subroutine dor94di (   X,
  Q2,
  UV,
  DV,
  DEL,
  UDB,
  SB,
  GL 
)

Definition at line 2677 of file dtu25lap.f.

References dor94fs(), dor94fv(), dor94fw(), HepGeom::Transform3D::dx(), c2_factory< float_type >::log(), and c2_factory< float_type >::sqrt().

function dor94fs (   X,
  S,
  AL,
  BE,
  AK,
  AG,
  B,
  D,
  E,
  ES 
)

Definition at line 2769 of file dtu25lap.f.

References HepGeom::Plane3D< T >::d(), dor94fs(), HepGeom::Transform3D::dx(), CLHEP::HepLorentzVector::e(), c2_factory< float_type >::log(), and c2_factory< float_type >::sqrt().

function dor94fv (   X,
  N,
  AK,
  BK,
  A,
  B,
  C,
  D 
)

Definition at line 2752 of file dtu25lap.f.

References a, bk(), HepGeom::Plane3D< T >::d(), dor94fv(), HepGeom::Transform3D::dx(), n, and c2_factory< float_type >::sqrt().

function dor94fw (   X,
  S,
  AL,
  BE,
  AK,
  BK,
  A,
  B,
  C,
  D,
  E,
  ES 
)

Definition at line 2760 of file dtu25lap.f.

References a, bk(), HepGeom::Plane3D< T >::d(), dor94fw(), CLHEP::HepLorentzVector::e(), c2_factory< float_type >::log(), and c2_factory< float_type >::sqrt().

subroutine dor94ho (   X,
  Q2,
  UV,
  DV,
  DEL,
  UDB,
  SB,
  GL 
)

Definition at line 2602 of file dtu25lap.f.

References dor94fs(), dor94fv(), dor94fw(), HepGeom::Transform3D::dx(), c2_factory< float_type >::log(), and c2_factory< float_type >::sqrt().

subroutine dor94lo (   X,
  Q2,
  UV,
  DV,
  DEL,
  UDB,
  SB,
  GL 
)

Definition at line 2527 of file dtu25lap.f.

References dor94fs(), dor94fv(), dor94fw(), HepGeom::Transform3D::dx(), c2_factory< float_type >::log(), and c2_factory< float_type >::sqrt().

subroutine habint (   IND)

Definition at line 2163 of file dtu25lap.f.

References a, c2_factory< float_type >::exp(), gset(), c2_factory< float_type >::log(), maxpro, c2_transformation< float_type >::one(), c2_factory< float_type >::sqrt(), z, and c2_transformation< float_type >::zero().

subroutine hachek (   IOPT)

Definition at line 643 of file dtu25lap.f.

References a.

subroutine hafdi1 (   NKON,
dimension(3)  Z,
  FDIS,
  IND 
)

Definition at line 2300 of file dtu25lap.f.

References a, HepGeom::Plane3D< T >::d(), c2_factory< float_type >::exp(), G4Abla::f(), jtpdis(), c2_factory< float_type >::log(), maxpro, n, c2_transformation< float_type >::one(), c2_factory< float_type >::sqrt(), CLHEP::HepLorentzVector::t(), z, and c2_transformation< float_type >::zero().

subroutine hafdis (   PDS,
dimension(-6:6)  PDA,
dimension(-6:6)  PDB,
  FDISTR 
)

Definition at line 657 of file dtu25lap.f.

References a, HepGeom::Plane3D< T >::d(), G4Abla::f(), jtpdis(), c2_factory< float_type >::log(), maxpro, and c2_transformation< float_type >::one().

subroutine hamaxi (   IND)

Definition at line 2245 of file dtu25lap.f.

References HepGeom::Plane3D< T >::d(), hafdi1(), maxpro, z, and HepGeom::Transform3D::zz().

subroutine hamult ( )

Definition at line 244 of file dtu25lap.f.

References a, HepGeom::Plane3D< T >::d(), harsca(), maxpro, G4Abla::mod(), c2_transformation< float_type >::one(), rndm(), c2_factory< float_type >::sqrt(), and xcheck().

subroutine haoutp ( )

Definition at line 894 of file dtu25lap.f.

References maxpro, n, and HepGeom::BasicVector3D< T >::phi().

subroutine harevt (   MHARD,
  PT1IN 
)

Definition at line 212 of file dtu25lap.f.

References hamult(), haoutp(), hisfil(), and maxpro.

subroutine harini ( )

Definition at line 2056 of file dtu25lap.f.

References csharm(), HepGeom::Plane3D< T >::d(), habint(), hamaxi(), maxpro, c2_factory< float_type >::sqrt(), and timdat().

subroutine harkin ( )

Definition at line 543 of file dtu25lap.f.

References a, HepGeom::Plane3D< T >::d(), c2_factory< float_type >::exp(), hax1x2(), c2_factory< float_type >::log(), maxpro, c2_transformation< float_type >::one(), HepGeom::BasicVector3D< T >::r(), rndm(), and c2_factory< float_type >::sqrt().

subroutine harsca ( )

Definition at line 725 of file dtu25lap.f.

References a, HepGeom::Plane3D< T >::d(), G4Abla::f(), hachek(), hafdis(), harkin(), int(), maxpro, and rndm().

subroutine hastrt ( )

Definition at line 2366 of file dtu25lap.f.

References CLHEP::HepLorentzVector::e(), and maxpro.

subroutine hatest (   IOUT)

Definition at line 1954 of file dtu25lap.f.

References csharm(), csj1m(), HepGeom::Plane3D< T >::d(), HepGeom::Transform3D::dy(), CLHEP::HepLorentzVector::e(), G4StatDouble::fill(), jtpdis(), maxpro, plot(), and HepGeom::BasicVector3D< T >::y().

subroutine hax1x2 ( )

Definition at line 485 of file dtu25lap.f.

References a, HepGeom::Plane3D< T >::d(), c2_factory< float_type >::exp(), c2_factory< float_type >::log(), c2_transformation< float_type >::one(), rndm(), c2_factory< float_type >::sqrt(), HepGeom::BasicVector3D< T >::y(), and z.

subroutine hisfil ( )

Definition at line 1914 of file dtu25lap.f.

References G4StatDouble::fill(), int(), maxpro, and n.

Referenced by harevt().

subroutine hisini ( )

Definition at line 1881 of file dtu25lap.f.

References G4StatDouble::fill(), and maxpro.

subroutine hisout (   IOUT)

Definition at line 1746 of file dtu25lap.f.

References HepGeom::Plane3D< T >::d(), HepGeom::BasicVector3D< T >::eta(), G4StatDouble::fill(), maxpro, c2_transformation< float_type >::one(), plot(), c2_factory< float_type >::sqrt(), and c2_transformation< float_type >::zero().

subroutine jtdtu (   IOPT)

Definition at line 15 of file dtu25lap.f.

References harini(), hastrt(), hisini(), maxpro, and title().

subroutine jtpdis (   X,
  QQ,
  IHATYP,
  MSPR,
dimension(-6:6)  PD 
)

Definition at line 939 of file dtu25lap.f.

References HepGeom::Plane3D< T >::d(), and phkmrs().

subroutine laptab ( )

Definition at line 1189 of file dtu25lap.f.

References harevt(), harini(), hatest(), hisini(), hisout(), int(), jtdtu(), maxpro, n, timdat(), and CexmcException::what().

subroutine phkmrs ( real *8  XQ,
real *8  QQ,
real *8, dimension(-6:6)  PD,
  MODE 
)

Definition at line 1010 of file dtu25lap.f.

References po_grv98lo(), G4StatDouble::scale(), and structm().

subroutine recchk (   LINMAX,
  X,
  IOPT 
)

Definition at line 367 of file dtu25lap.f.

References a, and maxpro.

subroutine selhrd (   MHARD,
  IJPVAL,
  IJTVAL,
  PTTHRE 
)

Definition at line 84 of file dtu25lap.f.

References harevt(), maxpro, n, and title().

subroutine xcheck (   X1S,
  X2S,
  LINMAX 
)

Definition at line 416 of file dtu25lap.f.

References a, HepGeom::Plane3D< T >::d(), maxpro, c2_transformation< float_type >::one(), recchk(), c2_factory< float_type >::sqrt(), and c2_function< float_type >::xmax().

Generated on Wed Apr 30 2014 15:55:35 for Geant4.10 by   doxygen 1.8.7