cryst1:=
[ [ [ [ [ 1 ] ] ] ], [ [ [ [ -1 ] ] ] ] ];