inline int[*] reshape( int[.] shp, int[.] data)
{
  return( _reshape_( shp, data));
}

int main()
{
  empty_vect = [];
  empty_mat = reshape( [22,0], empty_vect);

  return(0);
}