|
| 1 | +using ITensors: @disable_warn_order |
| 2 | +using ITensorMPS: MPO, MPS, contract, inner, random_mps, siteinds, tdvp |
| 3 | +using LinearAlgebra: norm |
| 4 | +using Random: Random |
| 5 | + |
| 6 | +include("03_models.jl") |
| 7 | +include("03_updaters.jl") |
| 8 | + |
| 9 | +function main() |
| 10 | + Random.seed!(1234) |
| 11 | + |
| 12 | + # Time dependent Hamiltonian is: |
| 13 | + # H(t) = H₁(t) + H₂(t) + … |
| 14 | + # = f₁(t) H₁(0) + f₂(t) H₂(0) + … |
| 15 | + # = cos(ω₁t) H₁(0) + cos(ω₂t) H₂(0) + … |
| 16 | + |
| 17 | + # Number of sites |
| 18 | + n = 6 |
| 19 | + |
| 20 | + # How much information to output from TDVP |
| 21 | + # Set to 2 to get information about each bond/site |
| 22 | + # evolution, and 3 to get information about the |
| 23 | + # updater. |
| 24 | + outputlevel = 3 |
| 25 | + |
| 26 | + # Frequency of time dependent terms |
| 27 | + ω₁ = 0.1 |
| 28 | + ω₂ = 0.2 |
| 29 | + |
| 30 | + # Nearest and next-nearest neighbor |
| 31 | + # Heisenberg couplings. |
| 32 | + J₁ = 1.0 |
| 33 | + J₂ = 1.0 |
| 34 | + |
| 35 | + time_step = 0.1 |
| 36 | + time_stop = 1.0 |
| 37 | + |
| 38 | + # nsite-update TDVP |
| 39 | + nsite = 2 |
| 40 | + |
| 41 | + # Starting state bond/link dimension. |
| 42 | + # A product state starting state can |
| 43 | + # cause issues for TDVP without |
| 44 | + # subspace expansion. |
| 45 | + start_linkdim = 4 |
| 46 | + |
| 47 | + # TDVP truncation parameters |
| 48 | + maxdim = 100 |
| 49 | + cutoff = 1e-8 |
| 50 | + |
| 51 | + tol = 1e-15 |
| 52 | + |
| 53 | + @show n |
| 54 | + @show ω₁, ω₂ |
| 55 | + @show J₁, J₂ |
| 56 | + @show maxdim, cutoff, nsite |
| 57 | + @show start_linkdim |
| 58 | + @show time_step, time_stop |
| 59 | + |
| 60 | + ω⃗ = (ω₁, ω₂) |
| 61 | + f⃗ = map(ω -> (t -> cos(ω * t)), ω⃗) |
| 62 | + |
| 63 | + # H₀ = H(0) = H₁(0) + H₂(0) + … |
| 64 | + ℋ₁₀ = heisenberg(n; J=J₁, J2=0.0) |
| 65 | + ℋ₂₀ = heisenberg(n; J=0.0, J2=J₂) |
| 66 | + ℋ⃗₀ = (ℋ₁₀, ℋ₂₀) |
| 67 | + |
| 68 | + s = siteinds("S=1/2", n) |
| 69 | + |
| 70 | + H⃗₀ = map(ℋ₀ -> MPO(ℋ₀, s), ℋ⃗₀) |
| 71 | + |
| 72 | + # Initial state, ψ₀ = ψ(0) |
| 73 | + # Initialize as complex since that is what OrdinaryDiffEq.jl/DifferentialEquations.jl |
| 74 | + # expects. |
| 75 | + ψ₀ = complex.(random_mps(s, j -> isodd(j) ? "↑" : "↓"; linkdims=start_linkdim)) |
| 76 | + |
| 77 | + @show norm(ψ₀) |
| 78 | + |
| 79 | + println() |
| 80 | + println("#"^100) |
| 81 | + println("Running TDVP with ODE updater") |
| 82 | + println("#"^100) |
| 83 | + println() |
| 84 | + |
| 85 | + ψₜ_ode = tdvp( |
| 86 | + -im * TimeDependentSum(f⃗, H⃗₀), |
| 87 | + time_stop, |
| 88 | + ψ₀; |
| 89 | + updater=ode_updater, |
| 90 | + updater_kwargs=(; reltol=tol, abstol=tol), |
| 91 | + time_step, |
| 92 | + maxdim, |
| 93 | + cutoff, |
| 94 | + nsite, |
| 95 | + outputlevel, |
| 96 | + ) |
| 97 | + |
| 98 | + println() |
| 99 | + println("Finished running TDVP with ODE updater") |
| 100 | + println() |
| 101 | + |
| 102 | + println() |
| 103 | + println("#"^100) |
| 104 | + println("Running TDVP with Krylov updater") |
| 105 | + println("#"^100) |
| 106 | + println() |
| 107 | + |
| 108 | + ψₜ_krylov = tdvp( |
| 109 | + -im * TimeDependentSum(f⃗, H⃗₀), |
| 110 | + time_stop, |
| 111 | + ψ₀; |
| 112 | + updater=krylov_updater, |
| 113 | + updater_kwargs=(; tol, eager=true), |
| 114 | + time_step, |
| 115 | + cutoff, |
| 116 | + nsite, |
| 117 | + outputlevel, |
| 118 | + ) |
| 119 | + |
| 120 | + println() |
| 121 | + println("Finished running TDVP with Krylov updater") |
| 122 | + println() |
| 123 | + |
| 124 | + println() |
| 125 | + println("#"^100) |
| 126 | + println("Running full state evolution with ODE updater") |
| 127 | + println("#"^100) |
| 128 | + println() |
| 129 | + |
| 130 | + @disable_warn_order begin |
| 131 | + ψₜ_full, _ = ode_updater( |
| 132 | + -im * TimeDependentSum(f⃗, contract.(H⃗₀)), |
| 133 | + contract(ψ₀); |
| 134 | + internal_kwargs=(; time_step=time_stop, outputlevel), |
| 135 | + reltol=tol, |
| 136 | + abstol=tol, |
| 137 | + ) |
| 138 | + end |
| 139 | + |
| 140 | + println() |
| 141 | + println("Finished full state evolution with ODE updater") |
| 142 | + println() |
| 143 | + |
| 144 | + @show norm(ψₜ_ode) |
| 145 | + @show norm(ψₜ_krylov) |
| 146 | + @show norm(ψₜ_full) |
| 147 | + |
| 148 | + @show 1 - abs(inner(contract(ψₜ_ode), ψₜ_full)) |
| 149 | + @show 1 - abs(inner(contract(ψₜ_krylov), ψₜ_full)) |
| 150 | + return nothing |
| 151 | +end |
| 152 | + |
| 153 | +main() |
0 commit comments