move proc into qcode-tcl
Merge pull request #49 from qcode-software/ll2pg_copy

move proc into qcode-tcl