lit
    JINRLIB

H2F1 - -

c361

: .. :

c pp F pp G po.

:

: - SUBROUTINE
: - FGETA

:

CALL FGETA(L,E,R,G,GP,F,FP,S), :

L - opa o 0;
E - ooc apap 4;
R - ap 'ro;
F - ppo 1 c pa co
2 =0, acoc op
5;
F - pooa 7;
G - ppo p pr, cpo p ro=0
acoc op
6;
G - pooa 8;
S - ooca aa sigma.

L INTEGER, - REAL*8.

:

0 <= <= 20, ro >= 0.5.

:

B opopa aoac oopc poca
F'G - FG'= 1.

:

  1. H.F.Lutz, M.D.Karvelis. Nucl. Phys., 43, 31, 1963.
:
       . . .
       L=2
       E=2.5D0
       R=0.5D0
       CALL FGETA(L,E,R,G,GP,F,FP,S)
       . . .
:
       G =     .1050782617D+04
       GP=    -.5207766430D+04
       F =     .8148427082D-04
       FP=     .5478350619D-03
       S =     .5426037723D+00


home up e-mail