--- /dev/null
+include "File"\r
+include "Simantics/SelectionView"\r
+\r
+importJava "org.simantics.modeling.ModelingUtils" where\r
+ """Queries for a file using a common file dialog."""\r
+ fileDialog :: String -> [(String,String)] -> <Proc> Maybe File\r