The Framework Dedicated to Three Phase Flows Wellbore Modelling

Listing 3

Heat transfer algorithm.

for i=0 To WellBottom

HT[i]=(log(OD[i]/ID[i])/Conn[i])+(log(boreDiameter[i]/OD[i])/Conn[i])