diff --git a/collects/tests/typed-scheme/succeed/function.rkt b/collects/tests/typed-scheme/succeed/function.rkt
new file mode 100644
index 00000000..ff4ed53d
--- /dev/null
+++ b/collects/tests/typed-scheme/succeed/function.rkt
@@ -0,0 +1,10 @@
+#lang typed/racket
+
+;; Test imports from racket/function
+
+(identity 5)
+(identity (lambda (x) "test"))
+
+((const 'foo) 1 2 3)
+
+((curry (lambda (x y) (cons x y)) 5) '())