integer_set

A simple unoptimized integer set for fortran.

Contains:

• int32_set
• int64_set

Add to your project:

[dependencies]
integer_set = { git = "https://github.com/jordan4ibanez/integer_set" }

Example:

program tutorial
  use, intrinsic :: iso_c_binding
  use :: integer32_set
  implicit none

  type(int32_set) :: my_set
  integer(c_int32_t) :: i

  ! Ensure that you create the memory for the set using this built-in method.
  my_set = new_int32_set()

  ! Let us add some data, backwards.
  do i = 10,1,-1
    call my_set%push(i)
  end do

  print*,"size:",my_set%size

  ! Now let us push it back in forwards.
  do i = 1,10
    call my_set%push(i)
  end do

  ! The size is still 10.
  print*,"size:",my_set%size

  print*,my_set%data

  ! We can get it to go from min->max using the sort method.
  call my_set%sort()

  print*,"size:",my_set%size

  print*,my_set%data

  ! Suppose we want to remove the even numbers.
  do i = 0,10, 2
    call my_set%pop(i)
  end do

  print*,"size:",my_set%size

  ! Tada.
  print*,my_set%data

  !! Don not forget to destroy the memory. :)
  call my_set%destroy()

  ! Which will give you a size of -1.
  print*,my_set%size

  ! And then you just use the new_int32_set function to re-use the variable.

  ! Using int64_set is literally the same, but you are using c_int64_t.
end program tutorial