 p, chipq (-q, ..., q); bcdev=100000 m
 1, 0.34736854629836406-1.2042092894154788j, 0.007054366326603954+0.0j, -0.34736854629836406-1.2042092894154788j
 2, 0.0+0.0j, 0.0+0.0j, 0.0+0.0j, 0.0+0.0j, 0.0+0.0j
