new samplecmp.c
Working samplecmp.  Added samplediff. Now about to convert to .Call
working dups using .Call