tebdol

Simulation of ultracold atoms in optical lattices
git clone https://miroslavurbanek.com/git/tebdol.git
Log | Files | Refs | README

tensor.10 (4672B)


      1 #S(TENSOR
      2    :INDICES ((#S(SEGMENT :NUMBERS (0) :DIMENSION 1)
      3               #S(SEGMENT :NUMBERS (1) :DIMENSION 1)
      4               #S(SEGMENT :NUMBERS (2) :DIMENSION 1)
      5               #S(SEGMENT :NUMBERS (3) :DIMENSION 1)
      6               #S(SEGMENT :NUMBERS (4) :DIMENSION 1)
      7               #S(SEGMENT :NUMBERS (5) :DIMENSION 1)
      8               #S(SEGMENT :NUMBERS (6) :DIMENSION 1)
      9               #S(SEGMENT :NUMBERS (7) :DIMENSION 1)
     10               #S(SEGMENT :NUMBERS (8) :DIMENSION 1)
     11               #S(SEGMENT :NUMBERS (9) :DIMENSION 1)
     12               #S(SEGMENT :NUMBERS (10) :DIMENSION 1)
     13               #S(SEGMENT :NUMBERS (11) :DIMENSION 1))
     14              (#S(SEGMENT :NUMBERS (0) :DIMENSION 1)
     15               #S(SEGMENT :NUMBERS (1) :DIMENSION 1)
     16               #S(SEGMENT :NUMBERS (2) :DIMENSION 1)
     17               #S(SEGMENT :NUMBERS (3) :DIMENSION 1)
     18               #S(SEGMENT :NUMBERS (4) :DIMENSION 1)
     19               #S(SEGMENT :NUMBERS (5) :DIMENSION 1)
     20               #S(SEGMENT :NUMBERS (6) :DIMENSION 1)
     21               #S(SEGMENT :NUMBERS (7) :DIMENSION 1)
     22               #S(SEGMENT :NUMBERS (8) :DIMENSION 1)
     23               #S(SEGMENT :NUMBERS (9) :DIMENSION 1)
     24               #S(SEGMENT :NUMBERS (10) :DIMENSION 1)
     25               #S(SEGMENT :NUMBERS (11) :DIMENSION 1)
     26               #S(SEGMENT :NUMBERS (12) :DIMENSION 1)
     27               #S(SEGMENT :NUMBERS (13) :DIMENSION 1)
     28               #S(SEGMENT :NUMBERS (14) :DIMENSION 1))
     29              (#S(SEGMENT :NUMBERS (-11) :DIMENSION 1)))
     30    :SECTORS (#S(SECTOR
     31                 :NUMBERS ((0) (11) (-11))
     32                 :ARRAY #.(MAKE-ARRAY '(1 1 1) :ELEMENT-TYPE
     33                                      '(COMPLEX DOUBLE-FLOAT) :INITIAL-CONTENTS
     34                                      '(((#C(1.0d0 0.0d0))))))
     35              #S(SECTOR
     36                 :NUMBERS ((1) (10) (-11))
     37                 :ARRAY #.(MAKE-ARRAY '(1 1 1) :ELEMENT-TYPE
     38                                      '(COMPLEX DOUBLE-FLOAT) :INITIAL-CONTENTS
     39                                      '(((#C(-1.0d0 0.0d0))))))
     40              #S(SECTOR
     41                 :NUMBERS ((2) (9) (-11))
     42                 :ARRAY #.(MAKE-ARRAY '(1 1 1) :ELEMENT-TYPE
     43                                      '(COMPLEX DOUBLE-FLOAT) :INITIAL-CONTENTS
     44                                      '(((#C(-1.0d0 0.0d0))))))
     45              #S(SECTOR
     46                 :NUMBERS ((3) (8) (-11))
     47                 :ARRAY #.(MAKE-ARRAY '(1 1 1) :ELEMENT-TYPE
     48                                      '(COMPLEX DOUBLE-FLOAT) :INITIAL-CONTENTS
     49                                      '(((#C(1.0d0 0.0d0))))))
     50              #S(SECTOR
     51                 :NUMBERS ((4) (7) (-11))
     52                 :ARRAY #.(MAKE-ARRAY '(1 1 1) :ELEMENT-TYPE
     53                                      '(COMPLEX DOUBLE-FLOAT) :INITIAL-CONTENTS
     54                                      '(((#C(1.0d0 0.0d0))))))
     55              #S(SECTOR
     56                 :NUMBERS ((5) (6) (-11))
     57                 :ARRAY #.(MAKE-ARRAY '(1 1 1) :ELEMENT-TYPE
     58                                      '(COMPLEX DOUBLE-FLOAT) :INITIAL-CONTENTS
     59                                      '(((#C(-1.0d0 0.0d0))))))
     60              #S(SECTOR
     61                 :NUMBERS ((6) (5) (-11))
     62                 :ARRAY #.(MAKE-ARRAY '(1 1 1) :ELEMENT-TYPE
     63                                      '(COMPLEX DOUBLE-FLOAT) :INITIAL-CONTENTS
     64                                      '(((#C(1.0d0 0.0d0))))))
     65              #S(SECTOR
     66                 :NUMBERS ((7) (4) (-11))
     67                 :ARRAY #.(MAKE-ARRAY '(1 1 1) :ELEMENT-TYPE
     68                                      '(COMPLEX DOUBLE-FLOAT) :INITIAL-CONTENTS
     69                                      '(((#C(-1.0d0 0.0d0))))))
     70              #S(SECTOR
     71                 :NUMBERS ((8) (3) (-11))
     72                 :ARRAY #.(MAKE-ARRAY '(1 1 1) :ELEMENT-TYPE
     73                                      '(COMPLEX DOUBLE-FLOAT) :INITIAL-CONTENTS
     74                                      '(((#C(1.0d0 0.0d0))))))
     75              #S(SECTOR
     76                 :NUMBERS ((9) (2) (-11))
     77                 :ARRAY #.(MAKE-ARRAY '(1 1 1) :ELEMENT-TYPE
     78                                      '(COMPLEX DOUBLE-FLOAT) :INITIAL-CONTENTS
     79                                      '(((#C(-1.0d0 0.0d0))))))
     80              #S(SECTOR
     81                 :NUMBERS ((10) (1) (-11))
     82                 :ARRAY #.(MAKE-ARRAY '(1 1 1) :ELEMENT-TYPE
     83                                      '(COMPLEX DOUBLE-FLOAT) :INITIAL-CONTENTS
     84                                      '(((#C(-1.0d0 0.0d0))))))
     85              #S(SECTOR
     86                 :NUMBERS ((11) (0) (-11))
     87                 :ARRAY #.(MAKE-ARRAY '(1 1 1) :ELEMENT-TYPE
     88                                      '(COMPLEX DOUBLE-FLOAT) :INITIAL-CONTENTS
     89                                      '(((#C(-1.0d0 0.0d0))))))))