Program description
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