// SPDX-License-Identifier: MIT
// Copyright (c) 2026 Incoprea
// Circular arch from span and rise
// Not compiled or tested in-world
// Setup: Place in a spare prim. Set SPAN and RISE positive. Owner touch prints results without altering the scene.
// Stop / restore: Disable or remove. No prim properties are changed.
// Notes: Models the circular segment through the two spring points and crown. A rise greater than half-span describes a major segment.
// License: see LICENSE in this distribution.
// Original Incoprea. MIT. Owner-only calculation.
float SPAN=6.0;
float RISE=1.4;
default
{
    touch_start(integer detectedCount)
    {
        if (llDetectedKey(0)!=llGetOwner()) return;
        if(SPAN<=0.0||RISE<=0.0)
        {
            llOwnerSay("Positive span and rise required.");
            return;
        }
        float radius=(SPAN*SPAN)/(8.0*RISE)+RISE*0.5;
        llOwnerSay("Radius="+(string)radius+"; centre elevation above spring line="+(string)(RISE-radius));
    }
}