File: kim_model_driver_headers_module.f90

package info (click to toggle)
kim-api 2.0~beta2.gita734d1-3
  • links: PTS, VCS
  • area: main
  • in suites: buster
  • size: 3,944 kB
  • sloc: cpp: 22,447; f90: 13,218; ansic: 3,865; sh: 1,960; makefile: 298
file content (160 lines) | stat: -rw-r--r-- 6,157 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
!
! CDDL HEADER START
!
! The contents of this file are subject to the terms of the Common Development
! and Distribution License Version 1.0 (the "License").
!
! You can obtain a copy of the license at
! http://www.opensource.org/licenses/CDDL-1.0.  See the License for the
! specific language governing permissions and limitations under the License.
!
! When distributing Covered Code, include this CDDL HEADER in each file and
! include the License file in a prominent location with the name LICENSE.CDDL.
! If applicable, add the following below this CDDL HEADER, with the fields
! enclosed by brackets "[]" replaced with your own identifying information:
!
! Portions Copyright (c) [yyyy] [name of copyright owner]. All rights reserved.
!
! CDDL HEADER END
!

!
! Copyright (c) 2016--2018, Regents of the University of Minnesota.
! All rights reserved.
!
! Contributors:
!    Ryan S. Elliott
!

!
! Release: This file is part of the kim-api.git repository.
!


module kim_model_driver_headers_module
  use, intrinsic :: iso_c_binding

  use kim_model_driver_create_module, only : &
    kim_model_driver_create_handle_type, &
    kim_model_driver_create_null_handle, &
    operator (.eq.), &
    operator (.ne.), &
    kim_model_driver_create_get_number_of_parameter_files, &
    kim_model_driver_create_get_parameter_file_name, &
    kim_model_driver_create_set_model_numbering, &
    kim_model_driver_create_set_influence_distance_pointer, &
    kim_model_driver_create_set_neighbor_list_pointers, &
    kim_model_driver_create_set_refresh_pointer, &
    kim_model_driver_create_set_destroy_pointer, &
    kim_model_driver_create_set_compute_arguments_create_pointer, &
    kim_model_driver_create_set_compute_arguments_destroy_pointer, &
    kim_model_driver_create_set_compute_pointer, &
    kim_model_driver_create_set_species_code, &
    kim_model_driver_create_set_parameter_pointer, &
    kim_model_driver_create_set_model_buffer_pointer, &
    kim_model_driver_create_set_units, &
    kim_model_driver_create_convert_unit, &
    kim_model_driver_create_log_entry, &
    kmdcle => kim_model_driver_create_log_entry, &
    kim_model_driver_create_string


  use kim_log_verbosity_module, only : &
    kim_log_verbosity_type, &
    kim_log_verbosity_from_string, &
    operator (.lt.), &
    operator (.gt.), &
    operator (.le.), &
    operator (.ge.), &
    operator (.eq.), &
    operator (.ne.), &
    kim_log_verbosity_string, &
    kim_log_verbosity_silent, klvs => kim_log_verbosity_silent, &
    kim_log_verbosity_fatal, klvf => kim_log_verbosity_fatal, &
    kim_log_verbosity_error, klve => kim_log_verbosity_error, &
    kim_log_verbosity_warning, klvw => kim_log_verbosity_warning, &
    kim_log_verbosity_information, klvi => kim_log_verbosity_information, &
    kim_log_verbosity_debug, klvd => kim_log_verbosity_debug, &
    kim_log_verbosity_get_number_of_log_verbosities, &
    kim_log_verbosity_get_log_verbosity, &
    kim_log_file, klf  => kim_log_file, &
    kim_log_message, klm => kim_log_message

  use kim_language_name_module
  use kim_numbering_module
  use kim_species_name_module
  use kim_support_status_module
  use kim_unit_system_module
  use kim_model_compute_arguments_create_module, only : &
    kim_model_compute_arguments_create_handle_type, &
    kim_model_compute_arguments_create_null_handle, &
    operator (.eq.), &
    operator (.ne.), &
    kim_model_compute_arguments_create_set_argument_support_status, &
    kim_model_compute_arguments_create_set_callback_support_status, &
    kim_model_compute_arguments_create_set_model_buffer_pointer, &
    kim_model_compute_arguments_create_log_entry, &
    kmcacle => kim_model_compute_arguments_create_log_entry, &
    kim_model_compute_arguments_create_string

  use kim_compute_argument_name_module
  use kim_data_type_module
  use kim_compute_callback_name_module
  use kim_model_compute_arguments_module, only : &
    kim_model_compute_arguments_handle_type, &
    kim_model_compute_arguments_null_handle, &
    operator (.eq.), &
    operator (.ne.), &
    kim_model_compute_arguments_get_neighbor_list, &
    kim_model_compute_arguments_process_dedr_term, &
    kim_model_compute_arguments_process_d2edr2_term, &
    kim_model_compute_arguments_get_argument_pointer, &
    kim_model_compute_arguments_is_callback_present, &
    kim_model_compute_arguments_set_model_buffer_pointer, &
    kim_model_compute_arguments_get_model_buffer_pointer, &
    kim_model_compute_arguments_log_entry, &
    kmcale => kim_model_compute_arguments_log_entry, &
    kim_model_compute_arguments_string

  use kim_model_compute_arguments_destroy_module, only : &
    kim_model_compute_arguments_destroy_handle_type, &
    kim_model_compute_arguments_destroy_null_handle, &
    operator (.eq.), &
    operator (.ne.), &
    kim_model_compute_arguments_destroy_get_model_buffer_pointer, &
    kim_model_compute_arguments_destroy_log_entry, &
    kmcadle => kim_model_compute_arguments_destroy_log_entry, &
    kim_model_compute_arguments_destroy_string

  use kim_model_compute_module, only : &
    kim_model_compute_handle_type, &
    kim_model_compute_null_handle, &
    operator (.eq.), &
    operator (.ne.), &
    kim_model_compute_get_model_buffer_pointer, &
    kim_model_compute_log_entry, kmcole => kim_model_compute_log_entry, &
    kim_model_compute_string

  use kim_model_refresh_module, only : &
    kim_model_refresh_handle_type, &
    kim_model_refresh_null_handle, &
    operator (.eq.), &
    operator (.ne.), &
    kim_model_refresh_set_influence_distance_pointer, &
    kim_model_refresh_set_neighbor_list_pointers, &
    kim_model_refresh_get_model_buffer_pointer, &
    kim_model_refresh_log_entry, kmrle => kim_model_refresh_log_entry, &
    kim_model_refresh_string

  use kim_model_destroy_module, only : &
    kim_model_destroy_handle_type, &
    kim_model_destroy_null_handle, &
    operator (.eq.), &
    operator (.ne.), &
    kim_model_destroy_get_model_buffer_pointer, &
    kim_model_destroy_log_entry, kmdle => kim_model_destroy_log_entry, &
    kim_model_destroy_string

  implicit none
  public
end module kim_model_driver_headers_module