Add majorDiameter and minorDiameter to ellipse fns

rust/kcl-lib/src/std/sketch.rs

@@ -1921,9 +1921,38 @@ async fn inner_subtract_2d(
 pub async fn elliptic_point(exec_state: &mut ExecState, args: Args) -> Result<KclValue, KclError> {
     let x = args.get_kw_arg_opt("x", &RuntimeType::length(), exec_state)?;
     let y = args.get_kw_arg_opt("y", &RuntimeType::length(), exec_state)?;
-    let major_radius = args.get_kw_arg("majorRadius", &RuntimeType::num_any(), exec_state)?;
-    let minor_radius = args.get_kw_arg("minorRadius", &RuntimeType::num_any(), exec_state)?;
+    let major_radius = args.get_kw_arg_opt("majorRadius", &RuntimeType::num_any(), exec_state)?;
+    let major_diameter: Option<TyF64> = args.get_kw_arg_opt("majorDiameter", &RuntimeType::num_any(), exec_state)?;
+    let minor_radius = args.get_kw_arg_opt("minorRadius", &RuntimeType::num_any(), exec_state)?;
+    let minor_diameter: Option<TyF64> = args.get_kw_arg_opt("minorDiameter", &RuntimeType::num_any(), exec_state)?;
 
+    let major_radius = match (major_radius, major_diameter) {
+        (Some(_), Some(_)) | (None, None) => {
+            return Err(KclError::new_type(KclErrorDetails::new(
+                "Provide either `majorDiameter` or `majorRadius`, not both.".to_string(),
+                vec![args.source_range],
+            )));
+        }
+        (Some(major_radius), _) => major_radius,
+        (_, Some(major_diameter)) => TyF64 {
+            n: 0.5 * major_diameter.n,
+            ty: major_diameter.ty,
+        },
+    };
+
+    let minor_radius = match (minor_radius, minor_diameter) {
+        (Some(_), Some(_)) | (None, None) => {
+            return Err(KclError::new_type(KclErrorDetails::new(
+                "Provide either `minorDiameter` or `minorRadius`, not both.".to_string(),
+                vec![args.source_range],
+            )));
+        }
+        (Some(minor_radius), _) => minor_radius,
+        (_, Some(minor_diameter)) => TyF64 {
+            n: 0.5 * minor_diameter.n,
+            ty: minor_diameter.ty,
+        },
+    };
     let elliptic_point = inner_elliptic_point(x, y, major_radius, minor_radius, &args).await?;
 
     args.make_kcl_val_from_point(elliptic_point, exec_state.length_unit().into())
@@ -2004,10 +2033,41 @@ pub async fn elliptic(exec_state: &mut ExecState, args: Args) -> Result<KclValue
     let angle_start = args.get_kw_arg("angleStart", &RuntimeType::degrees(), exec_state)?;
     let angle_end = args.get_kw_arg("angleEnd", &RuntimeType::degrees(), exec_state)?;
     let major_radius = args.get_kw_arg_opt("majorRadius", &RuntimeType::length(), exec_state)?;
+    let major_diameter: Option<TyF64> = args.get_kw_arg_opt("majorDiameter", &RuntimeType::length(), exec_state)?;
     let major_axis = args.get_kw_arg_opt("majorAxis", &RuntimeType::point2d(), exec_state)?;
-    let minor_radius = args.get_kw_arg("minorRadius", &RuntimeType::length(), exec_state)?;
+    let minor_radius = args.get_kw_arg_opt("minorRadius", &RuntimeType::length(), exec_state)?;
+    let minor_diameter: Option<TyF64> = args.get_kw_arg_opt("minorDiameter", &RuntimeType::length(), exec_state)?;
     let tag = args.get_kw_arg_opt("tag", &RuntimeType::tag_decl(), exec_state)?;
 
+    let major_radius = match (major_radius, major_diameter) {
+        (Some(_), Some(_)) => {
+            return Err(KclError::new_type(KclErrorDetails::new(
+                "Provide either `majorDiameter` or `majorRadius`, not both.".to_string(),
+                vec![args.source_range],
+            )));
+        }
+        (None, None) => None,
+        (Some(major_radius), _) => Some(major_radius),
+        (_, Some(major_diameter)) => Some(TyF64 {
+            n: 0.5 * major_diameter.n,
+            ty: major_diameter.ty,
+        }),
+    };
+
+    let minor_radius = match (minor_radius, minor_diameter) {
+        (Some(_), Some(_)) | (None, None) => {
+            return Err(KclError::new_type(KclErrorDetails::new(
+                "Provide either `minorDiameter` or `minorRadius`, not both.".to_string(),
+                vec![args.source_range],
+            )));
+        }
+        (Some(minor_radius), _) => minor_radius,
+        (_, Some(minor_diameter)) => TyF64 {
+            n: 0.5 * minor_diameter.n,
+            ty: minor_diameter.ty,
+        },
+    };
+
     let new_sketch = inner_elliptic(
         sketch,
         center,
@@ -2047,7 +2107,7 @@ pub(crate) async fn inner_elliptic(
     let major_axis = match (major_axis, major_radius) {
         (Some(_), Some(_)) | (None, None) => {
             return Err(KclError::new_type(KclErrorDetails::new(
-                "Provide either `majorAxis` or `majorRadius`.".to_string(),
+                "Provide either `majorAxis` or `majorRadius`, not both.".to_string(),
                 vec![args.source_range],
             )));
         }

rust/kcl-lib/std/sketch.kcl

@@ -355,17 +355,26 @@ export fn circle(
 /// exampleSketch = startSketchOn(XY)
 ///   |> ellipse(center = [0, 0], majorRadius = 50, minorRadius = 20)
 /// ```
+///
+/// ```
+/// exampleSketch = startSketchOn(YZ)
+///   |> ellipse(center = [10, 10], majorDiameter = 40, minorRadius = 10)
+/// ```
 @(impl = std_rust)
 export fn ellipse(
   /// Sketch to extend, or plane or surface to sketch on.
   @sketchOrSurface: Sketch | Plane | Face,
   /// The center of the ellipse.
   @(snippetArray = ["0", "0"])
   center: Point2d,
-  /// The minor radius of the ellipse.
-  minorRadius: number(Length),
-  /// The major radius of the ellipse. Equivalent to majorAxis = [majorRadius, 0].
+  /// The minor radius of the ellipse. Incompatible with `minorDiameter`.
+  minorRadius?: number(Length),
+  /// The minor diameter of the ellipse. Incompatible with `minorRadius`.
+  minorDiameter?: number(Length),
+  /// The major radius of the ellipse. Equivalent to majorAxis = [majorRadius, 0]. Incompatible with `majorDiameter`.
   majorRadius?: number(Length),
+  /// The major diameter of the ellipse. Equivalent to 2.0 * majorRadius. Incompatible with `majorRadius`.
+  majorDiameter?: number(Length),
   /// The major axis of the ellipse.
   majorAxis?: Point2d,
   /// Create a new tag which refers to this ellipse.
@@ -2230,11 +2239,15 @@ export fn elliptic(
   /// Where along the ellptic should this segment end?
   @(includeInSnippet = true)
   angleEnd: number(Angle),
-  /// The minor radius, b, of the elliptic equation x^2 / a^2 + y^2 / b^2 = 1.
+  /// The minor radius, b, of the elliptic equation x^2 / a^2 + y^2 / b^2 = 1. Incompatible with `minorDiameter`.
   @(includeInSnippet = true)
-  minorRadius: number(Length),
-  /// The major radius, a, of the elliptic equation x^2 / a^2 + y^2 / b^2 = 1. Equivalent to majorAxis = [majorRadius, 0].
+  minorRadius?: number(Length),
+  /// Them minor diameter of the elliptic equation. Incompatible with `minorRadius`.
+  minorDiameter?: number(Length),
+  /// The major radius, a, of the elliptic equation x^2 / a^2 + y^2 / b^2 = 1. Equivalent to majorAxis = [majorRadius, 0]. Incompatible with `majorDiameter`.
   majorRadius?: number(Length),
+  /// The major diameter of the elliptic equation. Incompatible with `majorRadius`.
+  majorDiameter?: number(Length),
   /// The major axis of the elliptic.
   @(includeInSnippet = true)
   majorAxis?: Point2d,
@@ -2252,8 +2265,10 @@ export fn elliptic(
 ///```
 @(impl = std_rust)
 export fn ellipticPoint(
-  /// The major radius, a, of the elliptic equation x^2 / a ^ 2 + y^2 / b^2 = 1.
-  majorRadius: number,
+  /// The major radius, a, of the elliptic equation x^2 / a ^ 2 + y^2 / b^2 = 1. Incompatible with `majorDiameter`.
+  majorRadius?: number,
+  /// Them major diameter of the elliptic equation. Incompatible with `majorRadius`.
+  majorDiameter?: number,
   ///  The minor radius, b, of the hyperbolic equation x^2 / a ^ 2 + y^2 / b^2 = 1.
   minorRadius: number,
   /// The x value. Calculates y and returns (x, y). Incompatible with `y`.