xclose $dad_wtr if $dup_wtr;