{"title":"六参数耦合系数与广义超几何函数","authors":"S. Özay , S. Akdemir , E. Öztekin","doi":"10.1016/j.cpc.2025.109656","DOIUrl":null,"url":null,"abstract":"<div><div>In this study, the Gaunt coefficients, Clebsch–Gordan coefficients, and the Wigner 3<em>j</em> and 6<em>j</em> symbols are expressed as the product of generalized hypergeometric functions with unit argument and a normalization coefficient. By exploiting the symmetry properties of generalized hypergeometric functions, these functions are transformed into numerically computable forms, and the normalization coefficients are fully expressed in terms of binomial coefficients. New mathematical expressions, in the form of a series of products of three Gaunt coefficients, are presented, which can be used to verify the accuracy of numerical calculations.</div><div>An algorithm has been developed to compute binomial coefficients and generalized hypergeometric functions using recurrence relations, eliminating the need for factorial functions. Utilizing this algorithm and the derived analytical expressions, the Gaunt_CG_3j_and_6j Mathematica program, which numerically calculates the Gaunt coefficients, Clebsch–Gordan coefficients, and the Wigner 3<em>j</em> and 6<em>j</em> symbols, was written without relying on Mathematica’s built-in functions. The program can be easily adapted to other programming languages and run on all versions of Mathematica.</div></div><div><h3>Program Summary</h3><div><em>Program title:</em> Gaunt_CG_<em>3j_</em>and_<em>6j</em></div><div><em>CPC Library link to program files:</em> <span><span>https://doi.org/10.17632/pwhry4278g.1</span><svg><path></path></svg></span></div><div><em>Licensing provisions:</em> GPLv2</div><div><em>Programming language</em>: Wolfram Language (Mathematica 9.0 or higher)</div><div><em>Nature of problem</em>:</div><div>In this study, analytical expressions for the Gaunt coefficients and Wigner 6<em>j</em> symbols are derived as the product of generalized hypergeometric functions and a normalization coefficient. Analytical expressions for the Wigner 3<em>j</em> symbols in terms of the Clebsch–Gordan (CG) coefficients are given in the same form in Ref. [<span><span>27</span></span>]. This study introduces new analytical expressions involving sums to verify the accuracy of numerical calculations for all coupling coefficients with six parameters consolidated into a single formula. The Gaunt_CG_3j_and_6j program numerically calculates the coupling coefficients presented in this study and Ref. [<span><span>27</span></span>].</div><div><em>Solution method</em>:</div><div>In this study, all coupling coefficients with six parameters are expressed as the product of the generalized hypergeometric function with unit argument and the “<em>normalization</em>” constant, which is written in terms of binomial coefficients. Therefore, the main structure of our program consists of numerical calculation of the binomial coefficients and generalized hypergeometric functions with unit argument.</div><div>In our algorithm, binomial coefficients with parameters containing negative or positive integers are calculated using the <em>binomcag</em> and <em>binomcalc</em> modules, based on Eq. (12) in Ref. [<span><span>31</span></span>]. The <em>binomcalc</em> module computes the binomial coefficients using the recurrence relation:<span><span><span><math><mrow><mi>F</mi><mrow><mo>(</mo><mrow><mi>n</mi><mo>,</mo><mi>m</mi></mrow><mo>)</mo></mrow><mo>=</mo><mspace></mspace><mfrac><mi>n</mi><mrow><mi>n</mi><mo>−</mo><mi>m</mi></mrow></mfrac><mspace></mspace><mi>F</mi><mrow><mo>(</mo><mrow><mi>n</mi><mo>−</mo><mn>1</mn><mo>,</mo><mspace></mspace><mi>m</mi></mrow><mo>)</mo></mrow><mo>,</mo><mspace></mspace><mi>n</mi><mo>≥</mo><mn>1</mn><mo>,</mo><mspace></mspace><mi>m</mi><mspace></mspace><mo>≥</mo><mn>0</mn></mrow></math></span></span></span>with the initial conditions <span><math><mrow><mi>F</mi><mo>(</mo><mrow><mi>m</mi><mo>,</mo><mspace></mspace><mi>m</mi></mrow><mo>)</mo><mo>=</mo><mn>1</mn></mrow></math></span> and <span><math><mrow><mi>F</mi><mo>(</mo><mrow><mi>n</mi><mo>,</mo><mi>m</mi></mrow><mo>)</mo><mo>=</mo><mn>0</mn><mo>,</mo><mspace></mspace><mi>f</mi><mi>o</mi><mi>r</mi><mspace></mspace><mi>m</mi><mo>></mo><mi>n</mi></mrow></math></span>.</div><div>To calculate the coupling coefficients with six parameters, generalized hypergeometric functions and binomial coefficients can be used, as demonstrated in this study, as an alternative to recurrence relations or serial expressions and factorial functions. We implemented the <em>hypergeowhl</em> and <em>hipergeomcal</em> modules in our algorithm to calculate the generalized hypergeometric functions. We used Eq. (21) in Ref. [<span><span>29</span></span>] to compute the generalized hypergeometric functions with unit argument.</div><div><em>Additional comments including Restrictions and Unusual features</em>:</div><div>When determining CPU times, issues unrelated to our program arise from Mathematica. The command lines we use to measure CPU time are: x1=TimeUsed[];</div><div><span><math><mo>⋮</mo></math></span> x2= TimeUsed[]; time=x2-x1</div><div>We encountered two problems when determining CPU times in this manner. The first problem occurs when we try to measure the calculation time for a single coupling coefficient, where Mathematica reports this time as zero (in seconds). We calculated the average CPU time by computing 1000 or more coupling coefficients for a single quantum set to overcome this. The second problem arises from the CPU times for non-zero coupling coefficients (particularly in expressions involving sums), which are unstable and vary each time the program is run. Since these results are reproducible across multiple program executions, we take the average of the computed times.</div><div><strong>Long write-up</strong></div></div>","PeriodicalId":285,"journal":{"name":"Computer Physics Communications","volume":"315 ","pages":"Article 109656"},"PeriodicalIF":3.4000,"publicationDate":"2025-05-16","publicationTypes":"Journal Article","fieldsOfStudy":null,"isOpenAccess":false,"openAccessPdf":"","citationCount":"0","resultStr":"{\"title\":\"The coupling coefficients with six parameters and the generalized hypergeometric functions\",\"authors\":\"S. Özay , S. Akdemir , E. Öztekin\",\"doi\":\"10.1016/j.cpc.2025.109656\",\"DOIUrl\":null,\"url\":null,\"abstract\":\"<div><div>In this study, the Gaunt coefficients, Clebsch–Gordan coefficients, and the Wigner 3<em>j</em> and 6<em>j</em> symbols are expressed as the product of generalized hypergeometric functions with unit argument and a normalization coefficient. By exploiting the symmetry properties of generalized hypergeometric functions, these functions are transformed into numerically computable forms, and the normalization coefficients are fully expressed in terms of binomial coefficients. New mathematical expressions, in the form of a series of products of three Gaunt coefficients, are presented, which can be used to verify the accuracy of numerical calculations.</div><div>An algorithm has been developed to compute binomial coefficients and generalized hypergeometric functions using recurrence relations, eliminating the need for factorial functions. Utilizing this algorithm and the derived analytical expressions, the Gaunt_CG_3j_and_6j Mathematica program, which numerically calculates the Gaunt coefficients, Clebsch–Gordan coefficients, and the Wigner 3<em>j</em> and 6<em>j</em> symbols, was written without relying on Mathematica’s built-in functions. The program can be easily adapted to other programming languages and run on all versions of Mathematica.</div></div><div><h3>Program Summary</h3><div><em>Program title:</em> Gaunt_CG_<em>3j_</em>and_<em>6j</em></div><div><em>CPC Library link to program files:</em> <span><span>https://doi.org/10.17632/pwhry4278g.1</span><svg><path></path></svg></span></div><div><em>Licensing provisions:</em> GPLv2</div><div><em>Programming language</em>: Wolfram Language (Mathematica 9.0 or higher)</div><div><em>Nature of problem</em>:</div><div>In this study, analytical expressions for the Gaunt coefficients and Wigner 6<em>j</em> symbols are derived as the product of generalized hypergeometric functions and a normalization coefficient. Analytical expressions for the Wigner 3<em>j</em> symbols in terms of the Clebsch–Gordan (CG) coefficients are given in the same form in Ref. [<span><span>27</span></span>]. This study introduces new analytical expressions involving sums to verify the accuracy of numerical calculations for all coupling coefficients with six parameters consolidated into a single formula. The Gaunt_CG_3j_and_6j program numerically calculates the coupling coefficients presented in this study and Ref. [<span><span>27</span></span>].</div><div><em>Solution method</em>:</div><div>In this study, all coupling coefficients with six parameters are expressed as the product of the generalized hypergeometric function with unit argument and the “<em>normalization</em>” constant, which is written in terms of binomial coefficients. Therefore, the main structure of our program consists of numerical calculation of the binomial coefficients and generalized hypergeometric functions with unit argument.</div><div>In our algorithm, binomial coefficients with parameters containing negative or positive integers are calculated using the <em>binomcag</em> and <em>binomcalc</em> modules, based on Eq. (12) in Ref. [<span><span>31</span></span>]. The <em>binomcalc</em> module computes the binomial coefficients using the recurrence relation:<span><span><span><math><mrow><mi>F</mi><mrow><mo>(</mo><mrow><mi>n</mi><mo>,</mo><mi>m</mi></mrow><mo>)</mo></mrow><mo>=</mo><mspace></mspace><mfrac><mi>n</mi><mrow><mi>n</mi><mo>−</mo><mi>m</mi></mrow></mfrac><mspace></mspace><mi>F</mi><mrow><mo>(</mo><mrow><mi>n</mi><mo>−</mo><mn>1</mn><mo>,</mo><mspace></mspace><mi>m</mi></mrow><mo>)</mo></mrow><mo>,</mo><mspace></mspace><mi>n</mi><mo>≥</mo><mn>1</mn><mo>,</mo><mspace></mspace><mi>m</mi><mspace></mspace><mo>≥</mo><mn>0</mn></mrow></math></span></span></span>with the initial conditions <span><math><mrow><mi>F</mi><mo>(</mo><mrow><mi>m</mi><mo>,</mo><mspace></mspace><mi>m</mi></mrow><mo>)</mo><mo>=</mo><mn>1</mn></mrow></math></span> and <span><math><mrow><mi>F</mi><mo>(</mo><mrow><mi>n</mi><mo>,</mo><mi>m</mi></mrow><mo>)</mo><mo>=</mo><mn>0</mn><mo>,</mo><mspace></mspace><mi>f</mi><mi>o</mi><mi>r</mi><mspace></mspace><mi>m</mi><mo>></mo><mi>n</mi></mrow></math></span>.</div><div>To calculate the coupling coefficients with six parameters, generalized hypergeometric functions and binomial coefficients can be used, as demonstrated in this study, as an alternative to recurrence relations or serial expressions and factorial functions. We implemented the <em>hypergeowhl</em> and <em>hipergeomcal</em> modules in our algorithm to calculate the generalized hypergeometric functions. We used Eq. (21) in Ref. [<span><span>29</span></span>] to compute the generalized hypergeometric functions with unit argument.</div><div><em>Additional comments including Restrictions and Unusual features</em>:</div><div>When determining CPU times, issues unrelated to our program arise from Mathematica. The command lines we use to measure CPU time are: x1=TimeUsed[];</div><div><span><math><mo>⋮</mo></math></span> x2= TimeUsed[]; time=x2-x1</div><div>We encountered two problems when determining CPU times in this manner. The first problem occurs when we try to measure the calculation time for a single coupling coefficient, where Mathematica reports this time as zero (in seconds). We calculated the average CPU time by computing 1000 or more coupling coefficients for a single quantum set to overcome this. The second problem arises from the CPU times for non-zero coupling coefficients (particularly in expressions involving sums), which are unstable and vary each time the program is run. Since these results are reproducible across multiple program executions, we take the average of the computed times.</div><div><strong>Long write-up</strong></div></div>\",\"PeriodicalId\":285,\"journal\":{\"name\":\"Computer Physics Communications\",\"volume\":\"315 \",\"pages\":\"Article 109656\"},\"PeriodicalIF\":3.4000,\"publicationDate\":\"2025-05-16\",\"publicationTypes\":\"Journal Article\",\"fieldsOfStudy\":null,\"isOpenAccess\":false,\"openAccessPdf\":\"\",\"citationCount\":\"0\",\"resultStr\":null,\"platform\":\"Semanticscholar\",\"paperid\":null,\"PeriodicalName\":\"Computer Physics Communications\",\"FirstCategoryId\":\"101\",\"ListUrlMain\":\"https://www.sciencedirect.com/science/article/pii/S0010465525001584\",\"RegionNum\":2,\"RegionCategory\":\"物理与天体物理\",\"ArticlePicture\":[],\"TitleCN\":null,\"AbstractTextCN\":null,\"PMCID\":null,\"EPubDate\":\"\",\"PubModel\":\"\",\"JCR\":\"Q1\",\"JCRName\":\"COMPUTER SCIENCE, INTERDISCIPLINARY APPLICATIONS\",\"Score\":null,\"Total\":0}","platform":"Semanticscholar","paperid":null,"PeriodicalName":"Computer Physics Communications","FirstCategoryId":"101","ListUrlMain":"https://www.sciencedirect.com/science/article/pii/S0010465525001584","RegionNum":2,"RegionCategory":"物理与天体物理","ArticlePicture":[],"TitleCN":null,"AbstractTextCN":null,"PMCID":null,"EPubDate":"","PubModel":"","JCR":"Q1","JCRName":"COMPUTER SCIENCE, INTERDISCIPLINARY APPLICATIONS","Score":null,"Total":0}
The coupling coefficients with six parameters and the generalized hypergeometric functions
In this study, the Gaunt coefficients, Clebsch–Gordan coefficients, and the Wigner 3j and 6j symbols are expressed as the product of generalized hypergeometric functions with unit argument and a normalization coefficient. By exploiting the symmetry properties of generalized hypergeometric functions, these functions are transformed into numerically computable forms, and the normalization coefficients are fully expressed in terms of binomial coefficients. New mathematical expressions, in the form of a series of products of three Gaunt coefficients, are presented, which can be used to verify the accuracy of numerical calculations.
An algorithm has been developed to compute binomial coefficients and generalized hypergeometric functions using recurrence relations, eliminating the need for factorial functions. Utilizing this algorithm and the derived analytical expressions, the Gaunt_CG_3j_and_6j Mathematica program, which numerically calculates the Gaunt coefficients, Clebsch–Gordan coefficients, and the Wigner 3j and 6j symbols, was written without relying on Mathematica’s built-in functions. The program can be easily adapted to other programming languages and run on all versions of Mathematica.
Program Summary
Program title: Gaunt_CG_3j_and_6j
CPC Library link to program files:https://doi.org/10.17632/pwhry4278g.1
Licensing provisions: GPLv2
Programming language: Wolfram Language (Mathematica 9.0 or higher)
Nature of problem:
In this study, analytical expressions for the Gaunt coefficients and Wigner 6j symbols are derived as the product of generalized hypergeometric functions and a normalization coefficient. Analytical expressions for the Wigner 3j symbols in terms of the Clebsch–Gordan (CG) coefficients are given in the same form in Ref. [27]. This study introduces new analytical expressions involving sums to verify the accuracy of numerical calculations for all coupling coefficients with six parameters consolidated into a single formula. The Gaunt_CG_3j_and_6j program numerically calculates the coupling coefficients presented in this study and Ref. [27].
Solution method:
In this study, all coupling coefficients with six parameters are expressed as the product of the generalized hypergeometric function with unit argument and the “normalization” constant, which is written in terms of binomial coefficients. Therefore, the main structure of our program consists of numerical calculation of the binomial coefficients and generalized hypergeometric functions with unit argument.
In our algorithm, binomial coefficients with parameters containing negative or positive integers are calculated using the binomcag and binomcalc modules, based on Eq. (12) in Ref. [31]. The binomcalc module computes the binomial coefficients using the recurrence relation:with the initial conditions and .
To calculate the coupling coefficients with six parameters, generalized hypergeometric functions and binomial coefficients can be used, as demonstrated in this study, as an alternative to recurrence relations or serial expressions and factorial functions. We implemented the hypergeowhl and hipergeomcal modules in our algorithm to calculate the generalized hypergeometric functions. We used Eq. (21) in Ref. [29] to compute the generalized hypergeometric functions with unit argument.
Additional comments including Restrictions and Unusual features:
When determining CPU times, issues unrelated to our program arise from Mathematica. The command lines we use to measure CPU time are: x1=TimeUsed[];
x2= TimeUsed[]; time=x2-x1
We encountered two problems when determining CPU times in this manner. The first problem occurs when we try to measure the calculation time for a single coupling coefficient, where Mathematica reports this time as zero (in seconds). We calculated the average CPU time by computing 1000 or more coupling coefficients for a single quantum set to overcome this. The second problem arises from the CPU times for non-zero coupling coefficients (particularly in expressions involving sums), which are unstable and vary each time the program is run. Since these results are reproducible across multiple program executions, we take the average of the computed times.
期刊介绍:
The focus of CPC is on contemporary computational methods and techniques and their implementation, the effectiveness of which will normally be evidenced by the author(s) within the context of a substantive problem in physics. Within this setting CPC publishes two types of paper.
Computer Programs in Physics (CPiP)
These papers describe significant computer programs to be archived in the CPC Program Library which is held in the Mendeley Data repository. The submitted software must be covered by an approved open source licence. Papers and associated computer programs that address a problem of contemporary interest in physics that cannot be solved by current software are particularly encouraged.
Computational Physics Papers (CP)
These are research papers in, but are not limited to, the following themes across computational physics and related disciplines.
mathematical and numerical methods and algorithms;
computational models including those associated with the design, control and analysis of experiments; and
algebraic computation.
Each will normally include software implementation and performance details. The software implementation should, ideally, be available via GitHub, Zenodo or an institutional repository.In addition, research papers on the impact of advanced computer architecture and special purpose computers on computing in the physical sciences and software topics related to, and of importance in, the physical sciences may be considered.