struct stype { 
  int  (*f1)(int);
  int  (*f2)(int, double*);
  int  (*f3)(int, int**);
  int  (*f4)(double, double**);
};