Computation of PPtilde and PPhat. IO still in dev.

main.jl

@@ -30,11 +30,11 @@ while RUN_ON
     @timeit "HMC" Gauge_update()
 
     @timeit "Two point function" begin
-        two_pt()
-        two_pt_rnd()
+        Frontflow_pt()
+        two_pt_lagrange()
     end
 
-    @timeit "One point function" one_pt()
+    @timeit "One point function" Backflow_pt()
 
     @timeit "Saving" save_data()
 

src/io.jl

@@ -112,7 +112,7 @@ end
 
 function save_data()
 
-    ihdr = [convert(Int32,0608686513)]
+    ihdr = [convert(Int32,1730280201)]
     fname = "./output/"*params["Run"]["name"]*".bdio"
 
     if isfile(fname)
@@ -151,7 +151,8 @@ function save_data()
             BDIO_write!(fb,pp_corr_t[:,noi,fl])
             BDIO_write!(fb,ap_corr_t[:,noi,fl])
 
-            BDIO_write!(fb,[phat_t[noi,fl]])
+            BDIO_write!(fb,pp_hat_t[:,noi,fl])
+            BDIO_write!(fb,pptilde_t[:,noi,fl])
         end
     end
 

src/utils.jl

@@ -3,6 +3,7 @@ using ADerrors
 using BDIO
 
 
+## NEDS UPDATE
 function read_ff(name::String)
 
     file = BDIO_open(name,"r","FerFlow correlators")