function pp_appendcolumn,strin,colname,icolvalues compile_opt idl2,logical_predicate nr=n_elements(strin) colvalues=n_elements(icolvalues) eq 1 ? replicate(icolvalues,nr) : icolvalues nc=n_elements(colvalues) if nr ne nc then return,!null ret=replicate(create_struct(strin[0],colname,colvalues[0]),nr) struct_assign,strin,ret ret.(n_tags(strin))=colvalues return,ret end