NRG Ljubljana  (c) Rok Zitko, rok.zitko@ijs.si, 2005-2018
Mathematica version: 11.0.0 for Linux x86 (64-bit) (July 28, 2016)
sneg version: 1.250
Loading module initialparse.m
Options: {}
def1ch, NRDOTS=1
COEFCHANNELS:1
H0=coefzeta[1, 0]*(-1 + nc[f[0, 0, 0], f[1, 0, 0]] + nc[f[0, 0, 1], f[1, 0, 1]])
adddots, nrdots=1
Loading module models.m
"models started"
Loading module custommodels.m
models $Id: custommodels.m,v 1.1 2015/11/09 12:23:47 rokzitko Exp rokzitko $
custommodels.m done

UpSet::write: Tag Gamma in isnumericQ[Gamma] is Protected.

UpSet::write: Tag Gamma in Conjugate[Gamma] is Protected.
params={gammaPol -> Sqrt[gammaA*theta0]/Sqrt[Pi], gammaPolCh[ch_] :> Sqrt[1/Pi*theta0Ch[ch]*gammaA], hybV[i_, j_] :> Sqrt[1/Pi]*V[i, j], coefzeta[ch_, j__] :> N[bandrescale*zeta[ch][j]], coefxi[ch_, j__] :> N[bandrescale*xi[ch][j]], 
   coefrung[ch_, j__] :> N[bandrescale*zetaR[ch][j]], coefdelta[ch_, j__] :> N[bandrescale*scdelta[ch][j]], coefkappa[ch_, j__] :> N[bandrescale*sckappa[ch][j]], U -> 0.01, delta -> 0, t -> 0., 
   gammaPol2 -> Sqrt[extraGamma2*gammaA*thetaCh[1]]/Sqrt[Pi], gammaPol2to2 -> Sqrt[extraGamma2to2*gammaA*thetaCh[2]]/Sqrt[Pi], gammaPolch1 -> Sqrt[extraGamma1*gammaA*thetaCh[1]]/Sqrt[Pi], 
   gammaPolch2 -> Sqrt[extraGamma2*gammaA*thetaCh[2]]/Sqrt[Pi], gammaPolch3 -> Sqrt[extraGamma3*gammaA*thetaCh[3]]/Sqrt[Pi], Jspin -> extraJspin*gammaA, Jcharge -> extraJcharge*gammaA, Jcharge1 -> extraJcharge1*gammaA, 
   Jcharge2 -> extraJcharge2*gammaA, Jkondo -> extraJkondo*gammaA, Jkondo1 -> extraJkondo1*gammaA, Jkondo2 -> extraJkondo2*gammaA, Jkondo3 -> extraJkondo3*gammaA, Jkondo1P -> extraJkondo1P*gammaA, Jkondo2P -> extraJkondo2P*gammaA, 
   Jkondo1Z -> extraJkondo1Z*gammaA, Jkondo2Z -> extraJkondo2Z*gammaA, JkondoP -> extraJkondoP*gammaA, JkondoZ -> extraJkondoZ*gammaA, Jkondo1ch2 -> extraJkondo1ch2*gammaA, Jkondo2ch2 -> extraJkondo2ch2*gammaA, gep -> extrag, dd -> extrad, 
   hybV11 -> Sqrt[extraGamma11*gammaA*thetaCh[1]]/Sqrt[Pi], hybV12 -> Sqrt[extraGamma12*gammaA*thetaCh[2]]/Sqrt[Pi], hybV21 -> Sqrt[extraGamma21*gammaA*thetaCh[1]]/Sqrt[Pi], hybV22 -> Sqrt[extraGamma22*gammaA*thetaCh[2]]/Sqrt[Pi], 
   U -> 0.01, Gamma -> 0.001, delta -> 0}
NRDOTS:1
CHANNELS:1
basis:{d[], f[0]}
lrchain:{}
lrextrarule:{}
NROPS:2
Hamiltonian generated. U/2 - coefzeta[1, 0] + delta*nc[d[0, 0], d[1, 0]] - (U*nc[d[0, 0], d[1, 0]])/2 + gammaPolCh[1]*nc[d[0, 0], f[1, 0, 0]] + delta*nc[d[0, 1], d[1, 1]] - (U*nc[d[0, 1], d[1, 1]])/2 + 
   gammaPolCh[1]*nc[d[0, 1], f[1, 0, 1]] + gammaPolCh[1]*nc[f[0, 0, 0], d[1, 0]] + coefzeta[1, 0]*nc[f[0, 0, 0], f[1, 0, 0]] + gammaPolCh[1]*nc[f[0, 0, 1], d[1, 1]] + coefzeta[1, 0]*nc[f[0, 0, 1], f[1, 0, 1]] - 
   U*nc[d[0, 0], d[0, 1], d[1, 0], d[1, 1]]
H-conj[H]=0
SCALE[0]=1.3229571856065079
faktor=1.0689790854605403
Generating basis
Basis states generated.
BASIS NR=16
Basis: basis.SIAM..QS
PREC=1000
Tmin=1.*^-10
Tmin=1.*^-10 ==> Nmax=67
DISCNMAX=67
mMAX=134
Diagonalisation.
Discretization checksum [-1] (channel 1): 2.977397598467095800253477133775954384`10.*^-41
BAND="flat" thetaCh={"2."}
Discretization (channel 1)
"xitable" (channel 1)
0.5955698974
0.539351812
0.4548286169
0.3309626766
0.232121433
0.1641549742
0.1164175732
0.08249112985
0.0583968882
0.04131735685
0.02922459587
0.02066805001
0.01461563274
0.01033520777
0.007308235196
0.005167752078
0.003654170012
0.002583894574
0.00182709156
0.001291949604
0.0009135465991
0.0006459750917
0.000456773402
0.0003229875821
0.0002283867138
0.0001614937956
0.0001141933585
0.00008074689835
0.00005709667945
0.00004037344924
0.00002854833975
0.00002018672463
0.00001427416988
0.00001009336232
7.137084939e-6
5.046681158e-6
3.56854247e-6
2.523340579e-6
1.784271235e-6
1.26167029e-6
8.921356174e-7
6.308351448e-7
4.460678087e-7
3.154175724e-7
2.230339044e-7
1.577087862e-7
1.115169522e-7
7.88543931e-8
5.575847609e-8
3.942719655e-8
2.787923804e-8
1.971359828e-8
1.393961902e-8
9.856799138e-9
6.969809511e-9
4.928399569e-9
3.484904756e-9
2.464199784e-9
1.742452378e-9
1.232099892e-9
8.712261889e-10
6.160499461e-10
4.356130944e-10
3.080249731e-10
2.178065472e-10
1.540124865e-10
1.089032736e-10
7.700624326e-11
"zetatable" (channel 1)
0.e-999
0.e-998
0.e-997
0.e-996
0.e-996
0.e-995
0.e-994
0.e-993
0.e-992
0.e-991
0.e-991
0.e-990
0.e-989
0.e-988
0.e-987
0.e-986
0.e-986
0.e-985
0.e-984
0.e-983
0.e-982
0.e-981
0.e-980
0.e-980
0.e-979
0.e-978
0.e-977
0.e-976
0.e-975
0.e-975
0.e-974
0.e-973
0.e-972
0.e-971
0.e-970
0.e-969
0.e-969
0.e-968
0.e-967
0.e-966
0.e-965
0.e-964
0.e-964
0.e-963
0.e-962
0.e-961
0.e-960
0.e-959
0.e-958
0.e-958
0.e-957
0.e-956
0.e-955
0.e-954
0.e-953
0.e-953
0.e-952
0.e-951
0.e-950
0.e-949
0.e-948
0.e-948
0.e-947
0.e-946
0.e-945
0.e-944
0.e-943
0.e-942
Precision last xi:932.6596754328527
Precision last zeta: 0.
Discretization done.
--EOF--
           {{# Input file for NRG Ljubljana, Rok Zitko, rok.zitko@ijs.si, 2005-2015}, {# symtype , QS}, {# Using sneg version , 1.250}, {#!8}, {# Number of channels, impurities, chain sites, subspaces: }, {1, 1, 67, 6}}

maketable[]

exnames={d, delta, g, Gamma, Gamma1, Gamma11, Gamma12, Gamma2, Gamma21, Gamma22, Gamma2to2, Gamma3, Jcharge, Jcharge1, Jcharge2, Jkondo, Jkondo1, Jkondo1ch2, Jkondo1P, Jkondo1Z, Jkondo2, Jkondo2ch2, Jkondo2P, Jkondo2Z, Jkondo3, JkondoP, 
   JkondoZ, Jspin, U}

UpSet::write: Tag Gamma in isnumericQ[Gamma] is Protected.

UpSet::write: Tag Gamma in Conjugate[Gamma] is Protected.
thetaCh={"2."}
theta0Ch={"0.002"}
gammaPolCh={"0.025231325220201602"}
checkdefinitions[] -> 0.08592530088080641
calcgsenergy[]
diagvc[{-2, 1}]
Generating matrix: ham.SIAM..QS_-2.1
hamil={{(U - 2*coefzeta[1, 0])/2}}
dim={1, 1}
det[vec]=1. 1-abs=0.
orthogonality check=0.
diagvc[{-1, 2}]
Generating matrix: ham.SIAM..QS_-1.2
hamil={{U/2, gammaPolCh[1]}, {gammaPolCh[1], delta - coefzeta[1, 0]}}
dim={2, 2}
det[vec]=-1. 1-abs=0.
orthogonality check=4.440892098500626*^-16
diagvc[{0, 1}]
Generating matrix: ham.SIAM..QS_0.1
hamil={{U/2 + coefzeta[1, 0], Sqrt[2]*gammaPolCh[1], 0}, {Sqrt[2]*gammaPolCh[1], delta, Sqrt[2]*gammaPolCh[1]}, {0, Sqrt[2]*gammaPolCh[1], (4*delta + U - 2*coefzeta[1, 0])/2}}
dim={3, 3}
det[vec]=1. 1-abs=0.
orthogonality check=1.3322676295501878*^-15
diagvc[{0, 3}]
Generating matrix: ham.SIAM..QS_0.3
hamil={{delta}}
dim={1, 1}
det[vec]=1. 1-abs=0.
orthogonality check=0.
diagvc[{1, 2}]
Generating matrix: ham.SIAM..QS_1.2
hamil={{delta + coefzeta[1, 0], -gammaPolCh[1]}, {-gammaPolCh[1], (4*delta + U)/2}}
dim={2, 2}
det[vec]=1. 1-abs=0.
orthogonality check=4.440892098500626*^-16
diagvc[{2, 1}]
Generating matrix: ham.SIAM..QS_2.1
hamil={{2*delta + U/2 + coefzeta[1, 0]}}
dim={1, 1}
det[vec]=1. 1-abs=0.
orthogonality check=0.
Lowest energies (absolute):{-0.048024539478062775, -0.022854876697936857, -0.022854876697936857, 0., 0.004999999999999999, 0.005, 0.005, 0.027854876697936858, 0.027854876697936858, 0.0530245394780628}
Lowest energies (GS shifted):{0., 0.025169662780125918, 0.025169662780125918, 0.048024539478062775, 0.05302453947806277, 0.05302453947806277, 0.05302453947806277, 0.07587941617599964, 0.07587941617599964, 0.10104907895612558}
Scale factor SCALE(Ninit):1.3229571856065079
Lowest energies (shifted and scaled):{0., 0.019025304109586073, 0.019025304109586073, 0.03630090225183364, 0.04008031405321235, 0.04008031405321235, 0.04008031405321235, 0.05735591219545992, 0.05735591219545992, 0.07638121630504602}
makeireducf GENERAL
ireducTable: f[0]{}
Loading module operators.m
"operators.m started"
d: A_d d
ireducTable: d{}
operators.m done
Loading module customoperators.m
"customoperators $Id: customoperators.m,v 1.1 2015/11/09 12:23:54 rokzitko Exp rokzitko $"
Customoperators done.
Loading module modeloperators.m
Can't load modeloperators.m. Continuing.
-- maketable[] done --
Timing report
{basis, 0.010625`4.477873932218323}
{ham, 0.0276690000000000001`4.1153872064697685}
{maketable, 0.294243`5.920251133329083}
{xi, 1.108378`6.496232890456921}
{_, 0}
data
gammaPol=0.0252313252202016
"Success!"
