Added a Bisection function that works for Biot values of 1, which unfortunately is not good enough. Better, but not much better than the previous transient model.
@ -77,7 +77,7 @@ Qdot = -1*heatConvection*surfaceArea*(tempAtTime-tempInfini) //Heat Transfer Rat
@@ -77,7 +77,7 @@ Qdot = -1*heatConvection*surfaceArea*(tempAtTime-tempInfini) //Heat Transfer Rat
console.log("The Temperature At radius "+rPosition+" m and time "+t+" seconds is "+tempAtTimeAndRadius+" C or "+celsiusToFarenheit(tempAtTimeAndRadius)+" F");
}
functionfindAllRoots(Biot){
limit=11;//Terms to Compute too
storage=[];
for(vark=0;k<=limit;k++){
minK=(k+0.5)*Math.PI;
maxK=(k+1)*Math.PI;
answer=bisectionMethod(minK,maxK,Biot);
if(answer!=null){
storage.push(answer);
}
}
console.log(storage)
return(storage)
}
functionbisectionMethod(min,max,Biot){
errorTolerance=(1/Math.pow(10,8))
result=100// some large value to ensure the calculation goes through.
console.log("The Temperature at radius "+rPosition+" m and time "+t+" seconds is "+tempAtTimeAndRadius+" C or "+celsiusToFarenheit(tempAtTimeAndRadius)+" F");