diff --git a/VECTO Changelog.txt b/VECTO Changelog.txt
index eafc789ccccddb8961a264c94d4962bf6bb7dc19..63b8440298639aa4c8455201c0cb6a43fee57994 100644
--- a/VECTO Changelog.txt	
+++ b/VECTO Changelog.txt	
@@ -2,12 +2,12 @@ VECTO ?.? (future release)
 - Eco-Roll & Over-/Under-Speed
 - Gearbox Rules must be set when loading .gbx file to aviod invalid settings (e.g. AT with Skip Gears)
 
-VECTO 1.1 x (current source - next release)
-
+VECTO 1.2 x (current source - next release)
 
 VECTO 1.2
 - Bugfix: When opening the Gearbox Editor the Gear Shift Settings (e.g. Skip Gears) were not valid for MT
-
+- Fixed error in FC interpolation (invalid extrapolation errors caused by rounding errors)
+- Bugfix: Cycle was cut by one second (as usual in Vehicle Mode)
 
 VECTO 1.1 beta 4
 - Engine Start/Stop implemented
diff --git a/VECTO/MODcalc/cMOD.vb b/VECTO/MODcalc/cMOD.vb
index bef66ad4b755eef34decd32a4b3e0e59cac4f64e..32ed16c3be2cf5b08cfe17ca519951940067a6d5 100644
--- a/VECTO/MODcalc/cMOD.vb
+++ b/VECTO/MODcalc/cMOD.vb
@@ -270,7 +270,7 @@ Public Class cMOD
         Dim L As List(Of Double)
 
         'Zykluslänge definieren: Gleiche Länge wie Zyklus (nicht reduziert weil keine "Zwischensekunden") |@@| Define Cycle-length: Same length as Cycle (not reduced because no "interim seconds")
-        tDim = DRI.tDim - 1
+        tDim = DRI.tDim
 
         'Here the actual cycle is read:
         Vh.EngCylceInit()
diff --git a/VECTO/cDelaunayMap.vb b/VECTO/cDelaunayMap.vb
index c68f02e3cd53e89630548b99bd7063638a998bb2..e30874864a791c6b891013a8c19871678c556a95 100644
--- a/VECTO/cDelaunayMap.vb
+++ b/VECTO/cDelaunayMap.vb
@@ -48,14 +48,17 @@ Public Class cDelaunayMap
 
 
 
-        '#If DEBUG Then
-        '        Debug.Print("x,y,z,x,y,z")
-        '        For Each tr In lDT
-        '            Debug.Print(tr.P1.X & "," & tr.P1.Y & "," & tr.P1.Z & "," & tr.P2.X & "," & tr.P2.Y & "," & tr.P2.Z)
-        '            Debug.Print(tr.P3.X & "," & tr.P3.Y & "," & tr.P3.Z & "," & tr.P2.X & "," & tr.P2.Y & "," & tr.P2.Z)
-        '            Debug.Print(tr.P1.X & "," & tr.P1.Y & "," & tr.P1.Z & "," & tr.P3.X & "," & tr.P3.Y & "," & tr.P3.Z)
-        '        Next
-        '#End If
+#If DEBUG Then
+        Dim i As Int16
+        Debug.Print("#,x1,y1,z1,x2,y2,z2")
+        i = -1
+        For Each tr In lDT
+            i += 1
+            Debug.Print(i & "," & tr.P1.X & "," & tr.P1.Y & "," & tr.P1.Z & "," & tr.P2.X & "," & tr.P2.Y & "," & tr.P2.Z)
+            Debug.Print(i & "," & tr.P3.X & "," & tr.P3.Y & "," & tr.P3.Z & "," & tr.P2.X & "," & tr.P2.Y & "," & tr.P2.Z)
+            Debug.Print(i & "," & tr.P1.X & "," & tr.P1.Y & "," & tr.P1.Z & "," & tr.P3.X & "," & tr.P3.Y & "," & tr.P3.Z)
+        Next
+#End If
 
 
 
@@ -216,7 +219,7 @@ Public Class cDelaunayMap
         v = (dot00 * dot12 - dot01 * dot02) * invDenom
 
         ' Check if point is in triangle
-        Return (u >= 0) And (v >= 0) And (u + v <= 1.00000000001)
+        Return (u >= -0.000001) And (v >= -0.000001) And (u + v <= 1.000001)
 
     End Function