error_get_message Function

private pure function error_get_message(this) result(message)

Get the error message (without stack trace)

Type Bound

error_t

Arguments

Type IntentOptional Attributes Name
class(error_t), intent(in) :: this

Return Value character(len=:), allocatable


Called by

proc~~error_get_message~~CalledByGraph proc~error_get_message error_t%error_get_message proc~build_molecular_basis build_molecular_basis proc~build_molecular_basis->proc~error_get_message proc~global_coordinator global_coordinator proc~global_coordinator->proc~error_get_message proc~gmbe_pie_coordinator gmbe_pie_coordinator proc~gmbe_pie_coordinator->proc~error_get_message proc~hessian_worker hessian_worker proc~hessian_worker->proc~error_get_message proc~node_coordinator node_coordinator proc~node_coordinator->proc~error_get_message proc~run_fragmented_calculation run_fragmented_calculation proc~run_fragmented_calculation->proc~error_get_message proc~serial_fragment_processor serial_fragment_processor proc~serial_fragment_processor->proc~error_get_message proc~serial_gmbe_pie_processor serial_gmbe_pie_processor proc~serial_gmbe_pie_processor->proc~error_get_message proc~unfragmented_calculation unfragmented_calculation proc~unfragmented_calculation->proc~error_get_message program~main main program~main->proc~error_get_message proc~run_calculation run_calculation program~main->proc~run_calculation proc~run_multi_molecule_calculations run_multi_molecule_calculations program~main->proc~run_multi_molecule_calculations interface~global_coordinator global_coordinator interface~global_coordinator->proc~global_coordinator interface~hessian_worker hessian_worker interface~hessian_worker->proc~hessian_worker interface~node_coordinator node_coordinator interface~node_coordinator->proc~node_coordinator interface~serial_fragment_processor serial_fragment_processor interface~serial_fragment_processor->proc~serial_fragment_processor interface~unfragmented_calculation unfragmented_calculation interface~unfragmented_calculation->proc~unfragmented_calculation proc~gmbe_run_distributed gmbe_context_t%gmbe_run_distributed proc~gmbe_run_distributed->proc~gmbe_pie_coordinator proc~gmbe_run_distributed->interface~node_coordinator proc~gmbe_run_serial gmbe_context_t%gmbe_run_serial proc~gmbe_run_serial->proc~serial_gmbe_pie_processor proc~run_calculation->proc~run_fragmented_calculation proc~run_unfragmented_calculation run_unfragmented_calculation proc~run_calculation->proc~run_unfragmented_calculation proc~compute_energy_and_forces compute_energy_and_forces proc~compute_energy_and_forces->proc~run_calculation proc~distributed_unfragmented_hessian distributed_unfragmented_hessian proc~distributed_unfragmented_hessian->interface~hessian_worker proc~mbe_run_distributed mbe_context_t%mbe_run_distributed proc~mbe_run_distributed->interface~global_coordinator proc~mbe_run_distributed->interface~node_coordinator proc~mbe_run_serial mbe_context_t%mbe_run_serial proc~mbe_run_serial->interface~serial_fragment_processor proc~run_multi_molecule_calculations->proc~run_calculation proc~run_unfragmented_calculation->interface~unfragmented_calculation interface~distributed_unfragmented_hessian distributed_unfragmented_hessian proc~run_unfragmented_calculation->interface~distributed_unfragmented_hessian interface~distributed_unfragmented_hessian->proc~distributed_unfragmented_hessian

Source Code

   pure function error_get_message(this) result(message)
      !! Get the error message (without stack trace)
      class(error_t), intent(in) :: this
      character(len=:), allocatable :: message
      if (allocated(this%message)) then
         message = this%message
      else
         message = ""
      end if
   end function error_get_message