Functions/Subroutines
recursive subroutine, public	compute_energy_forces (model_compute_handle, model_compute_arguments_handle, ierr)

recursive subroutine, public	model_destroy_func (model_destroy_handle, ierr)

recursive subroutine, public	model_compute_arguments_create (model_compute_handle, model_compute_arguments_create_handle, ierr)

recursive subroutine, public	model_compute_arguments_destroy (model_compute_handle, model_compute_arguments_destroy_handle, ierr)

Variables
integer(c_int), parameter, public	speccode = 1

real(c_double), parameter, public	model_cutoff = 8.15_cd

Function/Subroutine Documentation

◆ compute_energy_forces()

recursive subroutine, public ex_model_ar_p_mlj_f03::compute_energy_forces	(	type(kim_model_compute_handle_type), intent(in)	model_compute_handle,
		type(kim_model_compute_arguments_handle_type), intent(in)	model_compute_arguments_handle,
		integer(c_int), intent(out)	ierr
	)

recursive subroutine, public ex_model_ar_p_mlj_f03::model_compute_arguments_create	(	type(kim_model_compute_handle_type), intent(in)	model_compute_handle,
		type(kim_model_compute_arguments_create_handle_type), intent(inout)	model_compute_arguments_create_handle,
		integer(c_int), intent(out)	ierr
	)

recursive subroutine, public ex_model_ar_p_mlj_f03::model_compute_arguments_destroy	(	type(kim_model_compute_handle_type), intent(in)	model_compute_handle,
		type(kim_model_compute_arguments_destroy_handle_type), intent(inout)	model_compute_arguments_destroy_handle,
		integer(c_int), intent(out)	ierr
	)

recursive subroutine, public ex_model_ar_p_mlj_f03::model_destroy_func	(	type(kim_model_destroy_handle_type), intent(inout)	model_destroy_handle,
		integer(c_int), intent(out)	ierr
	)

real(c_double), parameter, public ex_model_ar_p_mlj_f03::model_cutoff = 8.15_cd

integer(c_int), parameter, public ex_model_ar_p_mlj_f03::speccode = 1