diff --git a/disk_cleanup.sh b/disk_cleanup.sh
index 41195ff6..fa8967db 100755
--- a/disk_cleanup.sh
+++ b/disk_cleanup.sh
@@ -11,4 +11,7 @@ sudo rm -rf /usr/local/share/boost
 # .Net Core の削除
 sudo rm -rf /usr/share/dotnet
 
+# Haskell の削除
+sudo rm -rf /opt/ghc
+
 df -h