Add ninja instaler, First try travis

.travis.yml

@@ -6,12 +6,13 @@ python:
 
 before_script:
   - sudo apt-get update
-  - sudo apt-get install gfortran liblapack-dev 
+  - sudo apt-get install gfortran liblapack-dev gcc
   - sudo apt-get install graphviz
 
 script: 
   - ./setup_environment.sh --robot 
   - source ./quantum_package.rc
   - cp ./src/Makefile.config.gfortran  ./src/Makefile.config
-  - make build 
+  - ./scripts/compilation/create_ninja_build.py > build.ninja
+  - ./ninja/ninja
   - ./tests/unit_test/unit_test.py

scripts/install/install_ninja.sh

@@ -0,0 +1,25 @@
+#!/bin/bash
+#
+# Installs m4 for ocaml
+# Thu Oct 23 22:02:08 CEST 2014
+
+BASE="ninja"
+URL="https://github.com/martine/ninja/archive/master.tar.gz"
+
+if [[ -z ${QPACKAGE_ROOT} ]]
+then
+  echo "The QPACKAGE_ROOT environment variable is not set."
+  echo "Please reload the quantum_package.rc file."
+  exit -1
+fi
+
+cd ${QPACKAGE_ROOT}
+
+${QPACKAGE_ROOT}/scripts/install/fetch_from_web.py ${URL} ${QPACKAGE_ROOT}/${BASE}.tar.gz
+tar -zxf ${BASE}.tar.gz && rm ${BASE}.tar.gz ||exit 1
+rm -rf ${BASE}
+mv ${BASE}-master ${BASE}
+cd ${BASE}
+./configure.py --bootstrap
+
+

setup_environment.sh

@@ -39,6 +39,9 @@ fi
 
 mkdir -p ${QPACKAGE_ROOT}/install_logs
 
+echo "${BLUE}===== Installing Ninja ===== ${BLACK}"
+${QPACKAGE_ROOT}/scripts/install/install_ninja.sh       | tee ${QPACKAGE_ROOT}/install_logs/install_ninja.log
+
 echo "${BLUE}===== Installing Zlib ===== ${BLACK}"
 ${QPACKAGE_ROOT}/scripts/install/install_zlib.sh       | tee ${QPACKAGE_ROOT}/install_logs/install_zlib.log
 

src/Utils/constants.F

@@ -0,0 +1,10 @@
+integer, parameter :: max_dim = 255
+integer, parameter :: SIMD_vector = 32
+
+double precision, parameter :: pi =  dacos(-1.d0)
+double precision, parameter :: sqpi =  dsqrt(dacos(-1.d0))
+double precision, parameter :: pi_5_2 =  34.9868366552d0
+double precision, parameter :: dfour_pi =  4.d0*dacos(-1.d0)
+double precision, parameter :: dtwo_pi =  2.d0*dacos(-1.d0)
+double precision, parameter :: inv_sq_pi =  1.d0/dsqrt(dacos(-1.d0))
+double precision, parameter :: inv_sq_pi_2 = 0.5d0/dsqrt(dacos(-1.d0))