set_info Subroutine

private pure elemental subroutine set_info(this, package, family, name, gradient, palette, author, license, url, colorbar, levels)

Set information about the colormap

Type Bound

table

Arguments

Type IntentOptional Attributes Name
class(table), intent(inout) :: this
character(len=*), intent(in) :: package
character(len=*), intent(in) :: family
character(len=*), intent(in) :: name
character(len=*), intent(in) :: gradient
character(len=*), intent(in) :: palette
character(len=*), intent(in) :: author
character(len=*), intent(in) :: license
character(len=*), intent(in) :: url
character(len=*), intent(in) :: colorbar
integer, intent(in) :: levels

Called by

proc~~set_info~~CalledByGraph proc~set_info table%set_info proc~set_all Colormaps_info%set_all proc~set_all->proc~set_info proc~check Colormap%check proc~check->proc~set_all program~colormaps_list colormaps_list program~colormaps_list->proc~set_all program~write_info write_info program~write_info->proc~set_all proc~create Colormap%create proc~create->proc~check proc~create_bezier Colormap%create_bezier proc~create_bezier->proc~check proc~create_lagrange Colormap%create_lagrange proc~create_lagrange->proc~check proc~load Colormap%load proc~load->proc~check proc~set Colormap%set proc~set->proc~check proc~set->proc~create proc~extract Colormap%extract proc~extract->proc~create program~create create program~create->proc~create_bezier program~create->proc~create_lagrange program~demo demo program~demo->proc~create program~demo->proc~load program~demo->proc~set program~demo_reverse demo_reverse program~demo_reverse->proc~create program~demo_reverse->proc~load program~demo_reverse->proc~set program~example1 example1 program~example1->proc~load program~extract extract program~extract->proc~set program~extract->proc~extract program~modify modify program~modify->proc~set

Source Code

   pure elemental subroutine set_info(this, package, family, name, gradient, palette, author, license, url, colorbar, levels)
      class(table), intent(inout) :: this
      character(*), intent(in) :: package, family, name, gradient, palette, author, license, url, colorbar
      integer, intent(in) :: levels
      allocate(this%package, source=trim(package))
      allocate(this%family, source=trim(family))
      allocate(this%name, source=trim(name))
      allocate(this%gradient, source=trim(gradient))
      allocate(this%palette, source=trim(palette))
      allocate(this%author, source=trim(author))
      allocate(this%license, source=trim(license))
      allocate(this%url, source=trim(url))
      allocate(this%colorbar, source=trim(colorbar))
      this%levels = levels
   end subroutine set_info