void revers ( int ivec[], int kdim );
int simdo ( bool qind, bool qfor, int iprod[], int kdim, int *jsub, int ivec[] );
void timestamp ( );