Add box and whisker functionality

Author: jchristopherson

examples/box_whisker_example.f90

@@ -11,10 +11,11 @@ program example
     real(real64) :: boxmin(n), boxmax(n), whiskermin(n), whiskermax(n)
     type(plot_2d) :: plt
     type(plot_data_box_whisker) :: pd
+    class(plot_axis), pointer :: xAxis
 
     ! Initialization
     do i = 1, n
-        titles(i) = "Item-" // to_string(i)
+        titles(i) = '"' // "Item " // to_string(i) // '"'
     end do
     boxmin = [4.5d0, 5.0d0, 6.0d0]
     boxmax = [7.5d0, 8.0d0, 9.0d0]
@@ -23,9 +24,14 @@ program example
 
     ! Create the plot
     call plt%initialize()
+    xAxis => plt%get_x_axis()
+    call xAxis%set_autoscale(.false.)
+    call xAxis%set_limits(0.0d0, n + 1.0d0)
 
     call pd%define_data(titles, boxmin, boxmax, whiskermin, whiskermax)
     call pd%set_line_width(2.0)
+    call pd%set_box_fill_opacity(0.5)
+    call pd%set_box_width(0.1)
     call plt%push(pd)
     call plt%draw()
 end program

src/CMakeLists.txt

@@ -48,6 +48,7 @@ set(FPLOT_SOURCES ${FPLOT_SOURCES} PARENT_SCOPE)
 
 # Dependencies
 include(FetchContent)
+find_package(OpenMP REQUIRED COMPONENTS Fortran)
 find_package(ferror QUIET)
 find_package(collections QUIET)
 find_package(geompack QUIET)
@@ -134,6 +135,11 @@ target_link_libraries(
     $<BUILD_INTERFACE:forcolormap>
 )
 
+if (OpenMP_Fortran_FOUND)
+    target_link_libraries(${PROJECT_NAME} PRIVATE OpenMP::OpenMP_Fortran)
+    target_compile_definitions(${PROJECT_NAME} PRIVATE USEOPENMP=1)
+endif()
+
 set_target_properties(
     ${PROJECT_NAME}
     PROPERTIES

src/fplot_plot_data_box_whisker.f90

@@ -35,6 +35,8 @@ module fplot_plot_data_box_whisker
             !! Fill the boxes?
         real(real32), private :: m_boxOpacity = 1.0
             !! Box opacity [0, 1.0].
+        logical, private :: m_drawBorder = .true.
+            !! Draw the box border?
     contains
         procedure, public :: define_data => pdbw_define_data_xstring
         procedure, public :: get_command_string => pdbw_get_cmd