RosettaCodeData/Task/Flatten-a-list/PARI-GP/flatten-a-list.pari

flatten(v)={
  my(u=[]);
  for(i=1,#v,
    u=concat(u,if(type(v[i])=="t_VEC",flatten(v[i]),v[i]))
  );
  u
};