Temporary workaround for a nvfortran compiler bug

vmagnin · May 9, 2024 · b7e6154 · b7e6154
1 parent 756be0f
commit b7e6154
Show file tree

Hide file tree

Showing 4 changed files with 7 additions and 7 deletions.
diff --git a/src/colormap_class.f90 b/src/colormap_class.f90
@@ -21,7 +21,7 @@
 ! SOFTWARE.
 !-------------------------------------------------------------------------------
 ! Contributed by vmagnin: 2023-09-26
-! Last modification: gha3mi 2024-02-16, vmagnin 2024-05-08
+! Last modification: gha3mi 2024-02-16, vmagnin 2024-05-09
 !-------------------------------------------------------------------------------
 
 
@@ -37,7 +37,7 @@ module forcolormap
  public :: wp
 
  ! List of built-in colormaps:
- character(*), dimension(*), public, parameter :: colormaps_list = &
+ character(*), dimension(6+222+4), public, parameter :: colormaps_list = &
  [character(colormap_name_length) :: &
  miscellaneous_colormaps_list,&
  scientific_colour_maps_list,&

diff --git a/src/matplotlib_colormaps.f90 b/src/matplotlib_colormaps.f90
@@ -27,15 +27,15 @@
 ! SOFTWARE.
 !-------------------------------------------------------------------------------
 ! Contributed by gha3mi: 2023-10-30
-! Last modification: gha3mi 2023-10-30
+! Last modification: gha3mi 2023-10-30, vmagnin 2024-05-09
 !-------------------------------------------------------------------------------
 
 module matplotlib_colormaps
  use colormap_parameters, only: colormap_name_length
  implicit none
  private
 
- character(*), dimension(*), parameter, public :: matplotlib_colormaps_list = &
+ character(*), dimension(4), parameter, public :: matplotlib_colormaps_list = &
  [character(colormap_name_length) :: &
  "magma", "inferno","plasma", "viridis"]
 

diff --git a/src/miscellaneous_colormaps.f90 b/src/miscellaneous_colormaps.f90
@@ -21,7 +21,7 @@
 ! SOFTWARE.
 !-------------------------------------------------------------------------------
 ! Contributed by vmagnin: 2023-09-26
-! Last modifications: gha3mi 2024-01-06, vmagnin 2024-02-16
+! Last modifications: gha3mi 2024-01-06, vmagnin 2024-05-09
 !-------------------------------------------------------------------------------
 
 module miscellaneous_colormaps
@@ -32,7 +32,7 @@ module miscellaneous_colormaps
  public :: fire_colormap, rainbow_colormap, &
  inv_rainbow_colormap, zebra_colormap, cubehelix_colormap
 
- character(*), dimension(*), parameter, public :: miscellaneous_colormaps_list = &
+ character(*), dimension(6), parameter, public :: miscellaneous_colormaps_list = &
  [character(colormap_name_length) :: &
  "fire", "rainbow", "inv_rainbow", "zebra", "cubehelix", &
  "black_body"]

diff --git a/src/scientific_colour_maps.f90 b/src/scientific_colour_maps.f90
@@ -27,7 +27,7 @@ module scientific_colour_maps
  implicit none
  private
 
- character(*), dimension(*), parameter, public :: scientific_colour_maps_list = &
+ character(*), dimension(222), parameter, public :: scientific_colour_maps_list = &
  [character(colormap_name_length) :: &
  "acton", "acton10", "acton100", "acton25", "acton50", "actonS", &
  "bam", "bam10", "bam100", "bam25", "bam50", "bamako", &