diff --git a/pub/ptest/intgr1a.f2t b/pub/ptest/intgr1a.f2t
new file mode 100755
index 0000000000000000000000000000000000000000..bc0977a09f9ad57015bf9a33543c46fa40fd6b1d
--- /dev/null
+++ b/pub/ptest/intgr1a.f2t
@@ -0,0 +1,6 @@
+#!/usr/bin/env frida
+cca t^p0
+ms* 10000
+op0 j/1000
+oi integrate(0,1)
+exit(0)
\ No newline at end of file