this is my gcd r script

-- INSERT --