!  ┓ ┏•┓ ┓┏┓  Licensed under the MIT License
!  ┃┃┃┓┃┏┫┣   Copyright (c) 2025 Rodrigo Castro
!  ┗┻┛┗┗┗┻┻   https://github.com/rodpcastro/wildf 

module wildf_kinds
!* # Kinds
! Kinds for numeric types.
!
! Constants:
!
! - `i1`: 1-byte integer
! - `i2`: 2-byte integer
! - `i4`: 4-byte integer
! - `sp`: Single (4-byte) precision real
! - `dp`: Double (8-byte) precision real
! - `wp`: Working precision real. By default, `wp = dp`
!*

  use, intrinsic :: iso_fortran_env, only: int8, int16, int32, real32, real64

  implicit none
  private
  public :: i1, i2, i4, sp, dp, wp

  integer(int8), parameter :: i1 = int8   !! 1-byte integer
  integer(int8), parameter :: i2 = int16  !! 2-byte integer
  integer(int8), parameter :: i4 = int32  !! 4-byte integer

  integer(int8), parameter :: sp = real32  !! Single (4-byte) precision real
  integer(int8), parameter :: dp = real64  !! Double (8-byte) precision real
  integer(int8), parameter :: wp = real64  !! Working precision real

end module wildf_kinds