kim-api  2.3.0+v2.3.0.GNU.GNU.
An Application Programming Interface (API) for the Knowledgebase of Interatomic Models (KIM).
kim_supported_extensions_module.f90
Go to the documentation of this file.
1 !
2 ! KIM-API: An API for interatomic models
3 ! Copyright (c) 2013--2022, Regents of the University of Minnesota.
4 ! All rights reserved.
5 !
6 ! Contributors:
7 ! Ryan S. Elliott
8 !
9 ! SPDX-License-Identifier: LGPL-2.1-or-later
10 !
11 ! This library is free software; you can redistribute it and/or
12 ! modify it under the terms of the GNU Lesser General Public
13 ! License as published by the Free Software Foundation; either
14 ! version 2.1 of the License, or (at your option) any later version.
15 !
16 ! This library is distributed in the hope that it will be useful,
17 ! but WITHOUT ANY WARRANTY; without even the implied warranty of
18 ! MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
19 ! Lesser General Public License for more details.
20 !
21 ! You should have received a copy of the GNU Lesser General Public License
22 ! along with this library; if not, write to the Free Software Foundation,
23 ! Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
24 !
25 
26 !
27 ! Release: This file is part of the kim-api-2.3.0 package.
28 !
29 
36  use, intrinsic :: iso_c_binding
37  implicit none
38  private
39 
40  public &
41  ! Derived types
42  kim_supported_extensions_type, &
43  ! Constants
47 
48  character(len=*, kind=c_char), parameter &
49  :: kim_supported_extensions_id = "KIM_SupportedExtensions"
50  integer(c_int), parameter :: kim_max_extension_id_length = 128
51  integer(c_int), parameter :: kim_max_number_of_extensions = 64
52 
58  type, bind(c) :: kim_supported_extensions_type
65  integer(c_int) number_of_supported_extensions
66 
73  character(c_char) supported_extension_id(kim_max_extension_id_length, &
75 
82  integer(c_int) supported_extension_required(kim_max_number_of_extensions)
83  end type kim_supported_extensions_type
integer(c_int), parameter, public kim_max_extension_id_length
character(len= *, kind=c_char), parameter, public kim_supported_extensions_id
The only standard extension defined by the KIM API.
integer(c_int), parameter, public kim_max_number_of_extensions