Homard executable

[modules/homard.git] / src / tool / Includes_Generaux / fracth.h

diff --git a/src/tool/Includes_Generaux/fracth.h b/src/tool/Includes_Generaux/fracth.h
new file mode 100644 (file)
index 0000000..1726c57
--- /dev/null
+++ b/src/tool/Includes_Generaux/fracth.h
@@ -0,0 +1,14 @@
+c
+c  la liste qui suit concerne les fractions en x/32
+c
+      double precision unstr2
+      parameter ( unstr2 = 1.0d0/32.0d0 )
+c
+      double precision cqstr2
+      parameter ( cqstr2 = 5.0d0/32.0d0 )
+c
+      double precision trstr2
+      parameter ( trstr2 = 3.0d0/32.0d0 )
+c
+      double precision nfstr2
+      parameter ( nfstr2 = 9.0d0/32.0d0 )