add tprint function