Ian Jauslin
c1b477a1b2
feature: compute the 2-point correlation function in easyeq.
feature: compute the Fourier transform of the 2-point correlation function
in anyeq and easyeq.
feature: compute the local maximum of the 2-point correlation function and
its Fourier transform.
feature: compute the compressibility for anyeq.
feature: allow for linear spacing of rho's.
feature: print the scattering length.
change: ux and uk now return real numbers.
fix: error in the computation of the momentum distribution: wrong
definition of delta functions.
fix: various minor bugs.
optimization: assign explicit types to variables.
53 lines
1.3 KiB
Julia
53 lines
1.3 KiB
Julia
## Copyright 2021-2023 Ian Jauslin
|
|
##
|
|
## Licensed under the Apache License, Version 2.0 (the "License");
|
|
## you may not use this file except in compliance with the License.
|
|
## You may obtain a copy of the License at
|
|
##
|
|
## http://www.apache.org/licenses/LICENSE-2.0
|
|
##
|
|
## Unless required by applicable law or agreed to in writing, software
|
|
## distributed under the License is distributed on an "AS IS" BASIS,
|
|
## WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
|
## See the License for the specific language governing permissions and
|
|
## limitations under the License.
|
|
|
|
# print progress
|
|
@everywhere function progress(
|
|
j::Int64,
|
|
tot::Int64,
|
|
freq::Int64
|
|
)
|
|
if (j-1)%ceil(Int,tot/freq)==0
|
|
if j>1
|
|
@printf(stderr,"\r")
|
|
end
|
|
@printf(stderr,"%d/%d",j,tot)
|
|
end
|
|
if j==tot
|
|
@printf(stderr,"\r")
|
|
@printf(stderr,"%d/%d\n",j,tot)
|
|
end
|
|
end
|
|
|
|
# print progress of two indices at once
|
|
@everywhere function progress_mat(
|
|
j1::Int64,
|
|
tot1::Int64,
|
|
j2::Int64,
|
|
tot2::Int64,
|
|
freq::Int64
|
|
)
|
|
if ((j1-1)*tot2+j2-1)%ceil(Int,tot1*tot2/freq)==0
|
|
if j1>1 || j2>1
|
|
@printf(stderr,"\r")
|
|
end
|
|
@printf(stderr,"%2d/%2d, %2d/%2d",j1,tot1,j2,tot2)
|
|
end
|
|
if j1==tot1 && j2==tot2
|
|
@printf(stderr,"\r")
|
|
@printf(stderr,"%2d/%2d, %2d/%2d\n",j1,tot1,j2,tot2)
|
|
end
|
|
end
|
|
|