diff --git a/src/Language/Futhark/Prop.hs b/src/Language/Futhark/Prop.hs
index 7577c2d6e9..73a1c26ec4 100644
--- a/src/Language/Futhark/Prop.hs
+++ b/src/Language/Futhark/Prop.hs
@@ -261,7 +261,7 @@ arrayOf ::
   Shape dim ->
   TypeBase dim as ->
   TypeBase dim as
-arrayOf u s t = arrayOfWithAliases mempty u s (t `setUniqueness` Nonunique)
+arrayOf = arrayOfWithAliases mempty
 
 arrayOfWithAliases ::
   Monoid as =>