diff --git a/dev/README b/dev/README
new file mode 100644
index 000000000..b666e0e3b
--- /dev/null
+++ b/dev/README
@@ -0,0 +1,2 @@
+Tools for developpers only
+Don't use them if you don't know their purpose
diff --git a/dev/reset.sql b/dev/reset.sql
new file mode 100644
index 000000000..0ccc2aa67
--- /dev/null
+++ b/dev/reset.sql
@@ -0,0 +1,13 @@
+\t
+\o reset_seq_jrn.sql
+select 'select setval (''s_jrn_'||jrn_def_id||''',1,false);' from jrn_def;
+\o
+\t
+
+\i reset_seq_jrn.sql
+select setval('s_centralized',1,false);
+select setval('s_central',1,false);
+delete from centralized;
+update jrnx set j_centralized='f';
+select setval('s_central_order',1,false);
+
diff --git a/dev/reset_seq_jrn.sql b/dev/reset_seq_jrn.sql
new file mode 100644
index 000000000..49112b6ce
--- /dev/null
+++ b/dev/reset_seq_jrn.sql
@@ -0,0 +1,10 @@
+ select setval ('s_jrn_4',1,false);
+ select setval ('s_jrn_3',1,false);
+ select setval ('s_jrn_1',1,false);
+ select setval ('s_jrn_2',1,false);
+ select setval ('s_jrn_5',1,false);
+ select setval ('s_jrn_6',1,false);
+ select setval ('s_jrn_7',1,false);
+ select setval ('s_jrn_8',1,false);
+ select setval ('s_jrn_9',1,false);
+
diff --git a/dev/test_parse_formula.php b/dev/test_parse_formula.php
new file mode 100644
index 000000000..5a3b3bbe8
--- /dev/null
+++ b/dev/test_parse_formula.php
@@ -0,0 +1,48 @@
+<?
+include_once('impress_inc.php');
+
+echo '<hr>';
+foreach ( array('1',
+		'(45+5)',
+	    'round([45])',
+		'$A=9',
+		'$S30=($F1 >=0)?$F1:0',
+
+	    '[45%]',
+	    '[50]*[51%]',
+	    '$A1=[50]*[51%]',
+	    '[50]*9',
+	    '[50]*9.0',
+	    '[50%]*9',
+	    '$C1111=[50%]*9',
+	    '$C1111=[50%]*9*$D1',
+	    '$C10=[10%]',
+	    '[50%]*9.0',
+	    '[50%]*9.0 FROM=01.2004',
+	    '[50%]*9.0FROM=01.2004',
+		'system',
+		'unlink',
+		'ls -1')
+	as $a ) {
+  echo "Testing :".$a;
+  echo (CheckFormula($a)==false)?'Non valide ':'ok';
+
+  echo '<br>';
+  
+  foreach (array('+','-','/') as $b ) {
+    $ee=str_replace('*',$b,$a);
+    echo "Testing :".$ee;
+    echo (CheckFormula($ee)==false)?'Non valide ':'ok';
+    echo '<br>';
+
+  }
+  for($e=0;$e<3;$e++) {
+    $a.="*".$a;
+  echo "Testing :".$a;
+  echo (CheckFormula($a)==false)?'Non valide ':'ok';
+  echo '<br>';
+
+  }
+ }
+
+?>