$:=($w=<>)*2+6;$r=_ x($m=$w>3?3:$w);$k="#"x($w-3)."."."-"x$m;sub
r
{($y,$_)=@_;$x=$y=~y//./rc
;s/$x$/$y/r
}printf"%$:s%s(map{". ".$
"x$_."["."#"x$_,r("[#$k"x/$w/,"/__".__ x$_)}1..++$w), r("_|".$"x$m,$z=substr"|__"x$:,0,2*++$w),r("_|$r",$z),r("\\$r","##"x$w),"|_$r","\\__$r"
JDo9KCR3PTw+KSoyKzY7JHI9XyB4KCRtPSR3PjM/Mzokdyk7JGs9IiMieCgkdy0zKS4iLiIuIi0ieCRtO3N1YgpyeygkeSwkXyk9QF87JHg9JHk9fnkvLy4vcmM7cy8keCQvJHkvcn1wcmludGYiJSQ6cyVzCiIseSEvXFxbIVxcL10hciwocmV2ZXJzZT1+cy8uLy9yKWZvciIuIiwifCIsCihtYXB7Ii4gICIuJCJ4JF8uIlsiLiIjIngkXyxyKCJbIyRrIngvJHcvLCIvX18iLl9fIHgkXyl9MS4uKyskdyksCnIoIl98Ii4kIngkbSwkej1zdWJzdHIifF9fIngkOiwwLDIqKyskdykscigiX3wkciIsJHopLHIoIlxcJHIiLCIjIyJ4JHcpLCJ8XyRyIiwiXFxfXyRyIg==