JOINT   INSTITUTE   FOR   NUCLEAR   RESEARCH
lit PROGRAM   LIBRARY   JINRLIB

Clebsch2 - calculation of simple kind for Clebsch-Gordan coefficient.
Parallel version


Author: A.P.Sapozhnikov
rus
You are
counter
visitor here.

Language: Fortran


Real*8 function Clebsch2(k,n) calculates coefficient

Ñ(k,n) = k! * (n-k)! / n!

Function is free upon typical overflow errors while direct calculation of factorials. Being a descendant of MPI_AllReduce operation, function is a typical collective job for known MPI-package. It may be effectively used in parallel MPI applications.

Sources and detailed description of Clebsch2 are submitted.




home up e-mail