1  void zgemm_ (const int*, const double*);
       2  extern void matmul_c8 (_Complex double * dest)
       3  {
       4    const int  ldc = 0;
       5    const double zero = 0;
       6    zgemm_ ( &zero, &ldc);
       7    dest[1] += 1 ;
       8  }