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