Didn't take long...
TMM.zip. It includes a readme and source code. Basic usage examples:
bobbing, tff:
tdeint(mode=1,order=1,emask=TMM(mode=1,order=1))
bobbing, bff:
tdeint(mode=1,order=0,emask=TMM(mode=1,order=0))
same rate, keep top field, tff:
tdeint(order=1,field=1,emask=TMM(order=1,field=1))
same rate, keep bot field, bff:
tdeint(order=0,field=0,emask=TMM(order=0,field=0))