fit: try to let max of t not be changed

* add work around method for the problem that time interval of plot in *_e_t.dat is uncorrect
sean0921 · Feb 18, 2020 · 0906a70 · 0906a70
1 parent f5b98ff
commit 0906a70
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/05_Fit_velocity/fit.for b/05_Fit_velocity/fit.for
@@ -153,7 +153,7 @@
             nn(s1)=1
             do i=2,n
               if((t(i)-t(i-1))>0.5) nn(s1)=nn(s1)+1
-              if((t(i)-t(i-1))<0.5) t(i)=t(i-1)
+c              if((t(i)-t(i-1))<0.5) t(i)=t(i-1)
             end do
           end if