$n=<>; if($n&1){ print"Yes\n@{[map$_*2%$n+1,0..$n-1]}\n@{[map+(($n-1)/2-$_)%$n+1,0..$n-1]}"; }else{ print"No"; }