Added define_gsubr function, WIP