Function GetTEVersion(ITerraExplorer51)
	Dim Major, Minor, Build
	
	ITerraExplorer51.GetTEVersion Major, Minor, Build
            
    GetTEVersion = CStr(Major) + "." + CStr(Minor) + "." + CStr(Build)
End Function

Function IsValidTEVersion(ITerraExplorer51, Major, Minor, Build)
	Dim OutMajor, OutMinor, OutBuild
	
	ITerraExplorer51.GetTEVersion OutMajor, OutMinor, OutBuild
	
	If OutMajor < Major Or OutMajor = Major And OutMinor < Minor Or OutMajor = Major And OutMinor = Minor And OutBuild < Build Then
		IsValidTEVersion = False
	Else
		IsValidTEVersion = True
	End If
End Function