/* (c) Anders Claesson 2013 */ void simion_schmidt(long *, const long *, long); void simion_schmidt_inverse(long *, const long *, long);