Computational Code for Optimization of Thermal Treatment of Fine Grained Soils as a Method of Expediting their Load Induced Consolidation