Program description

Program diagram

alternate text

Main routines

Theses routines solve..

CALL READENTREE(ns,cin,nss,nls,a,rmax,smax,rmt,smt,delS,fdelL,delL)   ! read input parameters
CALL LIGCOL(Lfin,nl,R,S,L,Lig,Col)
CALL INTEGORDRE2(Lfin,nl,R,S,L,Lig,Col,UG,Lc,Mc,Nc)                    ! solve CGM equation INTEGORDRE2(Lfin,nl,R,S,L,UG,Lc,Mc,Nc)
CALL SOLVEFRAME(nl,R,L,S,Mc,Nc,Lig,Col,V)
program Main

This is the main program.

subroutine READENTREE(ns, cin, nss, nls, a, rmax, smax, rmt, smt, delS, fdelL, delL)
Read input parameters.
param ns (inout):
 number of point for s.
param ns (inout):
 number of point for s
param cin (inout):
 kind of initial condition
param nss (in):number of output point for s
param nls (in):number of output point for l
param a,rmax,smax (in):
 black hole spin, rmax, smax
param rmt,smt (in):
 maximal radius for outing tab (<rmax) and corresponding s
param delS,fdelL (in):
 corresponding delta S, delta Lambda = fdel L x delS
param delL (in):
 corresponding delta L
return:0 if no error, 1 elsewhere