TPIDSDC19 := (1+18*k-18*m)*z+(-906*k+336*m-81+18*l)*z^2+(-336*l+10248*k-4776*m+2001)*z^3+(-44076*k-13824+15576*m+4776*l)*z^4+(79988*k+42216-32488*m-15576*l)*z^5+(-77984*k+32488*l+14752*m-53836)*z^6+(-14752*l+45436+28064*k-23884*m)*z^7+(-4576+23884*l-25274*k-15500*m)*z^8+(20524-15466*k-20444*m+15500*l)*z^9+(-20444*k+20444*l-16768*m+17954)*z^10+(-16768*k-11720*m+16768*l+18606)*z^11+(11720*l+14244-6352*m-11720*k)*z^12+(9036-2696*m-6352*k+6352*l)*z^13+(4524-2696*k-856*m+2696*l)*z^14+(-194*m+856*l-856*k+1776)*z^15+(194*l-28*m+525-194*k)*z^16+(28*l-28*k+111-2*m)*z^17+(-2*k+15+2*l)*z^18+z^19:

TPIDSDC19:=expand(TPIDSDC19/z):

st:=time():
ANS:=resultant(TPIDSDC19,diff(TPIDSDC19,z),z):
time()-st;