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.8709439943236637 faktor=0.755882360275742 Generating basis Basis states generated. BASIS NR=16 Basis: basis.SIAM..QS PREC=1000 Tmin=1.*^-10 Tmin=1.*^-10 ==> Nmax=68 DISCNMAX=68 mMAX=136 Diagonalisation. Discretization checksum [-1] (channel 1): 1.052669016082312398443455579109779342`10.*^-41 BAND="flat" thetaCh={"2."} Discretization (channel 1) "xitable" (channel 1) 0.5580358869 0.4904441818 0.5690620153 0.6229834111 0.434044415 0.2543193314 0.1684784293 0.1176744904 0.08291660756 0.05854505174 0.04136938033 0.02924292781 0.02067452073 0.01461791863 0.01033601563 0.007308520758 0.00516785303 0.003654205702 0.002583907192 0.001827096021 0.001291951181 0.0009135471568 0.0006459752889 0.0004567734717 0.0003229876067 0.0002283867225 0.0001614937986 0.0001141933596 0.00008074689873 0.00005709667958 0.00004037344929 0.00002854833977 0.00002018672464 0.00001427416988 0.00001009336232 7.137084939e-6 5.046681159e-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-997 0.e-996 0.e-995 0.e-994 0.e-993 0.e-992 0.e-992 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-981 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-970 0.e-969 0.e-968 0.e-967 0.e-966 0.e-965 0.e-965 0.e-964 0.e-963 0.e-962 0.e-961 0.e-960 0.e-959 0.e-959 0.e-958 0.e-957 0.e-956 0.e-955 0.e-954 0.e-954 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-943 0.e-942 Precision last xi:931.9023683582687 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, 68, 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.8709439943236637 Lowest energies (shifted and scaled):{0., 0.0134529215500246, 0.0134529215500246, 0.025668614145461576, 0.028341061859112924, 0.028341061859112924, 0.028341061859112924, 0.040556754454549905, 0.040556754454549905, 0.054009676004574514} 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.009273`4.4187652532789405} {ham, 0.030098`4.151931380971226} {maketable, 0.328182`5.967659750849703} {xi, 1.1495839999999999999`6.512085704119649} {_, 0} data gammaPol=0.0252313252202016 "Success!"