|
| 1 | +@testitem "Gabs and QuantumOptics Gaussian interop" begin |
| 2 | + using Gabs |
| 3 | + using QuantumOptics |
| 4 | + using QuantumSymbolics |
| 5 | + |
| 6 | + samestate(ket1, ket2; atol=1e-10) = isapprox(dm(ket1), dm(ket2); atol=atol, rtol=0) |
| 7 | + |
| 8 | + express_via_gabs(state, repr, basis) = express(express(state, GabsRepr(basis)), repr) |
| 9 | + |
| 10 | + function act_via_gabs(op, state, repr, basis) |
| 11 | + grepr = GabsRepr(basis) |
| 12 | + express(express(op, grepr) * express(state, grepr), repr) |
| 13 | + end |
| 14 | + |
| 15 | + direct_action(op, state, repr) = express(op, repr) * express(state, repr) |
| 16 | + symbolic_action(op, state, repr) = express(op * state, repr) |
| 17 | + |
| 18 | + @testset "Pure-state conversions" begin |
| 19 | + repr = QuantumOpticsRepr(14) |
| 20 | + α = 0.21 - 0.13im |
| 21 | + z = 0.17 * exp(-0.3im) |
| 22 | + |
| 23 | + direct_vacuum = express(vac, repr) |
| 24 | + direct_product = express(CoherentState(α) ⊗ vac, repr) |
| 25 | + direct_twomode_squeezed = express(TwoSqueezedState(z), repr) |
| 26 | + |
| 27 | + for basis in (QuadPairBasis, QuadBlockBasis) |
| 28 | + @test samestate(express_via_gabs(vac, repr, basis), direct_vacuum) |
| 29 | + @test samestate(express_via_gabs(CoherentState(α) ⊗ vac, repr, basis), direct_product) |
| 30 | + @test samestate( |
| 31 | + express_via_gabs(TwoSqueezedState(z), repr, basis), |
| 32 | + direct_twomode_squeezed; |
| 33 | + atol=1e-9, |
| 34 | + ) |
| 35 | + end |
| 36 | + |
| 37 | + pair_state = express_via_gabs(TwoSqueezedState(z), repr, QuadPairBasis) |
| 38 | + block_state = express_via_gabs(TwoSqueezedState(z), repr, QuadBlockBasis) |
| 39 | + @test samestate(pair_state, block_state; atol=1e-9) |
| 40 | + end |
| 41 | + |
| 42 | + @testset "Simple edge cases" begin |
| 43 | + repr = QuantumOpticsRepr(14) |
| 44 | + α = 0.21 - 0.13im |
| 45 | + z = 0.0 + 0.2im |
| 46 | + πf = float(pi) |
| 47 | + |
| 48 | + for basis in (QuadPairBasis, QuadBlockBasis) |
| 49 | + @test samestate( |
| 50 | + act_via_gabs(PhaseShiftOp(0.0), CoherentState(α), repr, basis), |
| 51 | + express(CoherentState(α), repr), |
| 52 | + ) |
| 53 | + @test samestate( |
| 54 | + act_via_gabs(PhaseShiftOp(πf), CoherentState(α), repr, basis), |
| 55 | + express(CoherentState(-α), repr), |
| 56 | + ) |
| 57 | + |
| 58 | + @test samestate( |
| 59 | + act_via_gabs(BeamSplitterOp(0.0), CoherentState(α) ⊗ vac, repr, basis), |
| 60 | + express(CoherentState(α) ⊗ vac, repr), |
| 61 | + ) |
| 62 | + @test samestate( |
| 63 | + act_via_gabs(BeamSplitterOp(1.0), CoherentState(α) ⊗ vac, repr, basis), |
| 64 | + express(vac ⊗ CoherentState(-α), repr), |
| 65 | + ) |
| 66 | + |
| 67 | + @test samestate( |
| 68 | + act_via_gabs(TwoSqueezeOp(0.0 + 0.0im), vac ⊗ vac, repr, basis), |
| 69 | + express(vac ⊗ vac, repr), |
| 70 | + ) |
| 71 | + @test samestate( |
| 72 | + act_via_gabs(TwoSqueezeOp(z), vac ⊗ vac, repr, basis), |
| 73 | + express(TwoSqueezedState(z), repr), |
| 74 | + ) |
| 75 | + end |
| 76 | + end |
| 77 | + |
| 78 | + @testset "Operator actions agree across paths" begin |
| 79 | + repr = QuantumOpticsRepr(14) |
| 80 | + α = 0.21 - 0.13im |
| 81 | + z = 0.17 * exp(-0.3im) |
| 82 | + |
| 83 | + phase = PhaseShiftOp(pi / 2) |
| 84 | + beamsplitter = BeamSplitterOp(0.35) |
| 85 | + twosqueeze = TwoSqueezeOp(z) |
| 86 | + |
| 87 | + phase_state = CoherentState(α) |
| 88 | + twomode_state = CoherentState(α) ⊗ vac |
| 89 | + vacuum_pair = vac ⊗ vac |
| 90 | + |
| 91 | + phase_direct = direct_action(phase, phase_state, repr) |
| 92 | + phase_symbolic = symbolic_action(phase, phase_state, repr) |
| 93 | + @test samestate(phase_symbolic, phase_direct) |
| 94 | + |
| 95 | + beamsplitter_direct = direct_action(beamsplitter, twomode_state, repr) |
| 96 | + beamsplitter_symbolic = symbolic_action(beamsplitter, twomode_state, repr) |
| 97 | + @test samestate(beamsplitter_symbolic, beamsplitter_direct) |
| 98 | + |
| 99 | + twosqueeze_direct = direct_action(twosqueeze, twomode_state, repr) |
| 100 | + twosqueeze_symbolic = symbolic_action(twosqueeze, twomode_state, repr) |
| 101 | + @test samestate(twosqueeze_symbolic, twosqueeze_direct; atol=1e-9) |
| 102 | + |
| 103 | + twosqueeze_vacuum_direct = direct_action(twosqueeze, vacuum_pair, repr) |
| 104 | + twosqueeze_vacuum_symbolic = symbolic_action(twosqueeze, vacuum_pair, repr) |
| 105 | + twosqueeze_state = express(TwoSqueezedState(z), repr) |
| 106 | + @test samestate(twosqueeze_vacuum_symbolic, twosqueeze_vacuum_direct) |
| 107 | + @test samestate(twosqueeze_vacuum_symbolic, twosqueeze_state) |
| 108 | + |
| 109 | + for basis in (QuadPairBasis, QuadBlockBasis) |
| 110 | + phase_via_gabs = act_via_gabs(phase, phase_state, repr, basis) |
| 111 | + @test samestate(phase_via_gabs, phase_direct) |
| 112 | + |
| 113 | + beamsplitter_via_gabs = act_via_gabs(beamsplitter, twomode_state, repr, basis) |
| 114 | + @test samestate(beamsplitter_via_gabs, beamsplitter_direct) |
| 115 | + |
| 116 | + twosqueeze_via_gabs = act_via_gabs(twosqueeze, twomode_state, repr, basis) |
| 117 | + @test samestate(twosqueeze_via_gabs, twosqueeze_direct; atol=1e-9) |
| 118 | + |
| 119 | + twosqueeze_vacuum_via_gabs = act_via_gabs(twosqueeze, vacuum_pair, repr, basis) |
| 120 | + @test samestate(twosqueeze_vacuum_via_gabs, twosqueeze_state; atol=1e-9) |
| 121 | + end |
| 122 | + |
| 123 | + pair_state = act_via_gabs(twosqueeze, twomode_state, repr, QuadPairBasis) |
| 124 | + block_state = act_via_gabs(twosqueeze, twomode_state, repr, QuadBlockBasis) |
| 125 | + @test samestate(pair_state, block_state; atol=1e-9) |
| 126 | + end |
| 127 | +end |
0 commit comments