kc3-lang/kc3/libkc3/complex.h

• Show log

  Commit

• Hash : 1ae6ad0e
  Author : Thomas de Grivel
  Date : 2024-07-15T19:59:52
  

  rename c3 to kc3, fix update_source, configure, build

Download

• libkc3/complex.h

• /* kc3
   * Copyright 2022,2023,2024 kmx.io <contact@kmx.io>
   *
   * Permission is hereby granted to use this software granted the above
   * copyright notice and this permission paragraph are included in all
   * copies and substantial portions of this software.
   *
   * THIS SOFTWARE IS PROVIDED "AS-IS" WITHOUT ANY GUARANTEE OF
   * PURPOSE AND PERFORMANCE. IN NO EVENT WHATSOEVER SHALL THE
   * AUTHOR BE CONSIDERED LIABLE FOR THE USE AND PERFORMANCE OF
   * THIS SOFTWARE.
   */
  #ifndef LIBKC3_COMPLEX_H
  #define LIBKC3_COMPLEX_H
  
  #include "types.h"
  
  /* Stack-allocation compatible functions, call complex_clean
     after use. */
  void        complex_clean (s_complex *c);
  s_complex * complex_init (s_complex *c);
  s_complex * complex_init_1 (s_complex *c, const s8 *p);
  s_complex * complex_init_cast (s_complex *c, const s_sym * const *type,
                                 const s_tag *src);
  s_complex * complex_init_copy (s_complex *c, const s_complex *src);
  s_complex * complex_init_f32 (s_complex *c, f32 src);
  s_complex * complex_init_f64 (s_complex *c, f64 src);
  s_complex * complex_init_f128 (s_complex *c, f128 src);
  s_complex * complex_init_integer (s_complex *c, const s_integer *src);
  s_complex * complex_init_ratio (s_complex *c, const s_ratio *src);
  s_complex * complex_init_s8 (s_complex *c, s8 src);
  s_complex * complex_init_s16 (s_complex *c, s16 src);
  s_complex * complex_init_s32 (s_complex *c, s32 src);
  s_complex * complex_init_s64 (s_complex *c, s64 src);
  s_complex * complex_init_sw (s_complex *c, sw src);
  s_complex * complex_init_u8 (s_complex *c, u8 src);
  s_complex * complex_init_u16 (s_complex *c, u16 src);
  s_complex * complex_init_u32 (s_complex *c, u32 src);
  s_complex * complex_init_u64 (s_complex *c, u64 src);
  s_complex * complex_init_uw (s_complex *c, uw src);
  
  /* Setters */
  s_complex * complex_set_double (s_complex *a, double x, double y);
  
  /* Modifiers */
  s_complex * complex_add (const s_complex *a, const s_complex *b,
                           s_complex *dest);
  s_complex * complex_div (const s_complex *a, const s_complex *b,
                           s_complex *dest);
  s_complex * complex_mul (const s_complex *a, const s_complex *b,
                           s_complex *dest);
  s_complex * complex_sub (const s_complex *a, const s_complex *b,
                           s_complex *dest);
  
  /* Heap-allocation functions, call complex_delete after use. */
  void        complex_delete (s_complex *c);
  s_complex * complex_new (void);
  s_complex * complex_new_add (const s_complex *a, const s_complex *b);
  s_complex * complex_new_cast (const s_sym * const *type,
                                const s_tag *src);
  s_complex * complex_new_div (const s_complex *a, const s_complex *b);
  s_complex * complex_new_mul (const s_complex *a, const s_complex *b);
  s_complex * complex_new_sub (const s_complex *a, const s_complex *b);
  s_complex * complex_new_copy (const s_complex *a);
  
  /* Observers */
  bool complex_is_zero (const s_complex *c);
  f32  complex_to_f32 (const s_complex *c);
  f64  complex_to_f64 (const s_complex *c);
  f128 complex_to_f128 (const s_complex *c);
  
  #endif /* LIBKC3_COMPLEX_H */
  

Download