comin_plugin_types.F90

Go to the documentation of this file.

 
!
!  @authors 06/2023 :: ICON Community Interface  <comin@icon-model.org>
!
!  SPDX-License-Identifier: BSD-3-Clause
!
!  See LICENSES for license information.
!  Where software is supplied by third parties, it is indicated in the
!  headers of the routines.
!
MODULE comin_plugin_types
 
  IMPLICIT NONE
 
  PRIVATE
 
  PUBLIC :: t_comin_plugin_description
  PUBLIC :: t_comin_plugin_info
 
#include "comin_global.inc"
 
  TYPE :: t_comin_plugin_description
    ! name of the plugin - currently only used for messages
    CHARACTER(LEN=COMIN_MAX_LEN_PLUGIN_NAME) :: name = ""
 
    ! full name of plugin shared library (including `.so` file
    ! extension) or "icon" for static linking.
    CHARACTER(LEN=COMIN_MAX_LEN_PLUGIN_LIBRARY) :: plugin_library = ""
 
    ! name of primary constructor.
    CHARACTER(LEN=COMIN_MAX_LEN_PRIMARY_CONSTRUCTOR)  :: primary_constructor  = "comin_main"
 
    ! options string: offers the possibility to pass a character
    ! string (e.g. a python script filename) to the plugin.
    CHARACTER(LEN=COMIN_MAX_LEN_OPTIONS)  :: options  = ""
 
    ! name of MPI communicator. left as an empty string if the
    ! application does not require a communicator for this plugin.
    CHARACTER(LEN=COMIN_MAX_LEN_COMM)  :: comm        = ""
 
    LOGICAL                      :: log_debug   = .false.
    LOGICAL                      :: log_info    = .true.
    LOGICAL                      :: log_warning = .true.
 
  END TYPE t_comin_plugin_description
 
  TYPE :: t_comin_plugin_info
    INTEGER                       :: id
    CHARACTER(LEN=:), ALLOCATABLE :: name
    CHARACTER(LEN=:), ALLOCATABLE :: options
    CHARACTER(LEN=:), ALLOCATABLE :: comm
    LOGICAL                       :: errors_return = .false.
    LOGICAL                       :: log_debug   = .false.
    LOGICAL                       :: log_info    = .true.
    LOGICAL                       :: log_warning = .true.
  END TYPE t_comin_plugin_info
 
END MODULE comin_plugin_types