//Optimize the footing size for bearing

SetUnits("Kips & Inches");
DeleteAll();

//Build the model
var radius = 12.0;
var slab = AddCircleSlab(0, 0, radius);
var pier = AddPier(0, 0);
SetMeshCoarse();

//Load the pier
LoadPier("D", pier, 0.0, 0.0, -3.0, 0.0, 0.0);
LoadPier("L", pier, 0.0, 0.0, -6.0, 0.0, 2.0);

//Add one inch to the footing radius until the soil bearing checks pass
await Design();
while(Status("Soil Bearing") < 2)
{
    radius += 1.0;
    Radius(slab, radius);
    await Design();
}

//Print out the final results
$"Final Radius = {radius}"