Millepede-II  V04-03-09
Functions/Subroutines
isuper.f90 File Reference

Initial Millepede-I implementation by V. More...

Go to the source code of this file.

Functions/Subroutines

subroutine dalign
 
function urand ()
 
function unorm ()
 
subroutine initgl (nagbar, nalcar, nstd, iprlim)
 
subroutine parglo (par)
 
subroutine parsig (INDEX, sigma)
 
subroutine parget (INDEX, par, sig)
 
subroutine nonlin (INDEX)
 
subroutine initun (lun, cutfac)
 
subroutine constf (dercs, rhs)
 
subroutine equloc (dergb, derlc, rrmeas, sigma)
 
subroutine zerloc (dergb, derlc)
 
subroutine fitloc
 
subroutine fitglo (par)
 
function errpar (i)
 
function corpar (i, j)
 
subroutine prtglo (lun)
 

Detailed Description

Initial Millepede-I implementation by V.

Blobel for H1.

CMZ : 11/12/2006 16.01.29 by Claus Kleinwort – Author : Claus Kleinwort 14/04/99

 A Least Squares Method for Detector Alignment - Fortran code

 DALIGN      short test program for detector aligment

 INITGL      initialization
 PARGLO       optional: initialize parameters with nonzero values
 PARSIG       optional: define sigma for single parameter
 INITUN       optional: unit for iterations
 INITCS       optional: constraints
 EQULOC      equations for local fit
 FITLOC      local parameter fit
 FITGLO      final global parameter fit


 Special matrix subprograms (all in Double Precision):
    SPMINV   matrix inversion + solution
    SPAVAT   special double matrix product
    SPAX     special matrix product

 CHINDL      limit of chi**2/nd 

Definition in file isuper.f90.

Function/Subroutine Documentation

◆ constf()

subroutine constf ( real, dimension(*)  dercs,
  rhs 
)

Definition at line 361 of file isuper.f90.

◆ corpar()

function corpar (   i,
  j 
)

Definition at line 1083 of file isuper.f90.

References corpar().

◆ dalign()

subroutine dalign ( )

Definition at line 33 of file isuper.f90.

References equloc(), fitglo(), fitloc(), initgl(), prtglo(), unorm(), urand(), and zerloc().

◆ equloc()

subroutine equloc ( real, dimension(*)  dergb,
real, dimension(*)  derlc,
  rrmeas,
  sigma 
)

Definition at line 393 of file isuper.f90.

◆ errpar()

function errpar (   i)

Definition at line 1053 of file isuper.f90.

References errpar().

◆ fitglo()

subroutine fitglo ( real, dimension(*)  par)

Definition at line 840 of file isuper.f90.

References fitloc(), and prtglo().

◆ fitloc()

subroutine fitloc ( )

Definition at line 516 of file isuper.f90.

References chindl().

◆ initgl()

subroutine initgl (   nagbar,
  nalcar,
  nstd,
  iprlim 
)

Definition at line 95 of file isuper.f90.

References chindl().

◆ initun()

subroutine initun (   lun,
  cutfac 
)

Definition at line 318 of file isuper.f90.

◆ nonlin()

subroutine nonlin (   INDEX)

Definition at line 291 of file isuper.f90.

◆ parget()

subroutine parget (   INDEX,
  par,
  sig 
)

Definition at line 261 of file isuper.f90.

◆ parglo()

subroutine parglo ( real, dimension(*)  par)

Definition at line 203 of file isuper.f90.

◆ parsig()

subroutine parsig (   INDEX,
  sigma 
)

Definition at line 232 of file isuper.f90.

◆ prtglo()

subroutine prtglo (   lun)

Definition at line 1118 of file isuper.f90.

◆ unorm()

function unorm ( )

Definition at line 83 of file isuper.f90.

References unorm().

◆ urand()

function urand ( )

Definition at line 75 of file isuper.f90.

References urand().

◆ zerloc()

subroutine zerloc ( real, dimension(*)  dergb,
real, dimension(*)  derlc 
)

Definition at line 481 of file isuper.f90.