mirror of
https://github.com/QuantumPackage/qp2.git
synced 2024-08-25 13:41:47 +02:00
Fixed beta_rs
This commit is contained in:
parent
5cb411d364
commit
9717223a4d
@ -95,6 +95,6 @@ end
|
|||||||
double precision function beta_rs(rs)
|
double precision function beta_rs(rs)
|
||||||
implicit none
|
implicit none
|
||||||
double precision, intent(in) ::rs
|
double precision, intent(in) ::rs
|
||||||
beta_rs(rs) = 0.066725d0 * (1.d0 + 0.1d0 * rs)/(1.d0 + 0.1778d0 * rs)
|
beta_rs = 0.066725d0 * (1.d0 + 0.1d0 * rs)/(1.d0 + 0.1778d0 * rs)
|
||||||
|
|
||||||
end
|
end
|
||||||
|
Loading…
Reference in New Issue
Block a user