Add startup message giving vector length

This allows you to check that a simulation is using vectorisation.



git-svn-id: https://svn.cct.lsu.edu/repos/numrel/LSUThorns/Vectors/trunk@11 105869f7-3296-0410-a4ea-f4349344b45a

2 files changed, 12 insertions, 1 deletions

diff --git a/src/make.code.defn b/src/make.code.defn
index fa10ccb..15ba9a9 100644
--- a/src/make.code.defn
+++ b/src/make.code.defn
@@ -1,7 +1,7 @@
 # Main make.code.defn file for thorn Vectors
 
 # Source files in this directory
-SRCS = 
+SRCS = vectors.c
 
 # Subdirectories containing source files
 SUBDIRS = 
diff --git a/src/vectors.c b/src/vectors.c
new file mode 100644
index 0000000..04df73c
--- /dev/null
+++ b/src/vectors.c
@@ -0,0 +1,11 @@
+
+#include "cctk.h" 
+#include "cctk_Arguments.h" 
+#include "cctk_Parameters.h" 
+#include "vectors.h"
+
+int Vectors_Startup(void)
+{
+  CCTK_VInfo(CCTK_THORNSTRING, "Using vector size %d", CCTK_REAL_VEC_SIZE);
+  return 0;
+}