A practical method for calculating thermally-induced stresses in pile foundations used as heat exchangers. (October 2020)