check_status Subroutine

public subroutine check_status(status, error_message)

If status /= 0 abort printing error_message and status

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: status
character(len=*), intent(in) :: error_message

Calls

proc~~check_status~~CallsGraph proc~check_status check_status interface~to_str to_str proc~check_status->interface~to_str proc~str_from_int str_from_int interface~to_str->proc~str_from_int proc~str_from_real str_from_real interface~to_str->proc~str_from_real

Called by

proc~~check_status~~CalledByGraph proc~check_status check_status proc~coo_to_csr coo_to_csr proc~coo_to_csr->proc~check_status proc~krn_coo_to_csr krn_t%krn_coo_to_csr proc~krn_coo_to_csr->proc~coo_to_csr program~reims_p reims_p program~reims_p->proc~krn_coo_to_csr