(* The Temperature Measured at Successive Time Increments *)

colname={time,temperature};



temps = {{0, 70.86}, {1, 68.71}, {2, 66.67},

{3, 64.73}, {4, 63.25}, {5, 61.57}, {6, 60.25},

{7, 58.74}, {8, 57.6}, {9, 56.17}, {10, 54.94},

{11, 53.82}, {12, 52.64}, {13, 51.7}, {14, 50.64},

{15, 49.81}, {16, 48.85}, {17, 48.04}, {18, 47.24},

{19, 46.45}, {20, 45.8}, {21, 45.03}, {22, 44.27},

{23, 43.64}, {24, 43.01}, {25, 42.27}, {26, 41.78},

{27, 41.05}, {28, 40.57}, {29, 39.97}, {30, 39.37},

{31, 38.9}, {32, 38.31}, {33, 37.84}, {34, 37.37},

{35, 36.71}, {36, 36.33}, {37, 35.79}, {38, 35.41},

{39, 34.98}, {40, 34.53}, {41, 34.18}, {42, 33.81},

{43, 33.39}, {44, 33.05}, {45, 32.72}, {46, 32.38},

{47, 32.04}, {48, 31.82}, {49, 31.48}, {50, 31.15},

{51, 30.92}, {52, 30.59}, {53, 30.63}, {54, 30.03},

{55, 29.81}, {56, 29.59}, {57, 29.36}, {58, 29.14},

{59, 28.81}, {60, 28.59}, {61, 28.09}, {62, 28.25},

{63, 28.03}, {64, 27.81}, {65, 27.7}, {66, 27.48},

{67, 27.37}, {68, 27.15}, {69, 27.04}, {70, 26.82},

{71, 26.7}, {72, 26.69}, {73, 26.37}, {74, 26.26},

{75, 26.15}, {76, 26.04}, {77, 25.82}, {78, 25.71},

{79, 25.71}, {80, 25.49}, {81, 25.38}, {82, 25.27},

{83, 25.16}, {84, 24.95}, {85, 24.95}, {86, 24.94},

{87, 24.73}, {88, 24.62}, {89, 24.51}, {90, 24.39},

{91, 24.28}, {92, 24.17}, {93, 24.17}, {94, 24.06},

{95, 23.95}, {96, 23.84}, {97, 23.73}, {98, 23.73}};