I am trying to negate (some) squiggle arrows in tikzcd. I have tried "/" marking, etc. I can either get the appropriate squiggle arrow not negated, or I can get a normal arrow negated, but not a squiggle arrow negated. What I want is exactly what the code below produces except with the arced squiggle arrow from r to q negated.
\documentclass[tikz,convert=false]{standalone}
\usepackage{tikz-cd}
\usetikzlibrary{graphs,decorations.pathmorphing,decorations.markings}
\begin{document}
\begin{tikzcd}[row sep=tiny]
& & & q \\
& & p \arrow[ur, rightsquigarrow] & \\
& r \arrow[ur] \arrow[bend left=50, rightsquigarrow, to=1-4] & & \\
\top \arrow[ur] & & &
\end{tikzcd}
\end{document}