bridge/class-master/depend/pari/src/basemath/mftrace.c
/* vF not empty, same hypotheses as bhnmat_extend */
vF not empty, same hypotheses as bhnmat_extend
vF not empty same hypotheses as bhnmat_extend
static GEN
bhnmat_extend_nocache(GEN M, long N, long n, long d, GEN vF)
{
  cachenew_t cache;
  long l = lg(vF);
  GEN f;
  if (l == 1) return M? M: cgetg(1, t_MAT);
  f = bhn_newtrace(gel(vF,1)); 
  init_cachenew(&cache, n*d, N, f);
  M = bhnmat_extend(M, n, d, vF, &cache);
  dbg_cachenew(&cache); return M;
}
static GEN bhnmat_extend_nocache ( GEN M , long N , long n , long d , GEN vF ) { cachenew_t cache ; long l = lg ( vF ) ; GEN f ; if ( l == 1 ) return M ? M : cgetg ( 1 , t_MAT ) ; f = bhn_newtrace ( gel ( vF , 1 ) ) ; init_cachenew ( & cache , n * d , N , f ) ; M = bhnmat_extend ( M , n , d , vF , & cache ) ; dbg_cachenew ( & cache ) ; return M ; }
vF not empty, same hypotheses as bhnmat_extend
vF not empty same hypotheses as bhnmat_extend
/* N.B. mf_get_N(f) divides N */