You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
39 lines
2.0 KiB
Plaintext
39 lines
2.0 KiB
Plaintext
integer, parameter :: psb_nohalo_=0, psb_halo_=4
|
|
integer, parameter :: psb_none_=0,psb_sum_=1
|
|
integer, parameter :: psb_avg_=2,psb_square_root_=3
|
|
integer, parameter :: psb_swap_send_=1,psb_swap_recv_=2
|
|
integer, parameter :: psb_swap_sync_=4,psb_swap_mpi_=8
|
|
integer, parameter :: psb_deadlock_check_=0
|
|
integer, parameter :: psb_local_mtrx_check_=1
|
|
integer, parameter :: psb_local_comm_check_=2
|
|
integer, parameter :: psb_consistency_check_=3
|
|
integer, parameter :: psb_global_check_=4
|
|
integer, parameter :: psb_order_communication_=5
|
|
integer, parameter :: psb_change_represent_=6
|
|
integer, parameter :: psb_loc_to_glob_check_=7
|
|
integer, parameter :: psb_convert_halo_=1
|
|
integer, parameter :: psb_convert_ovrlap_=2
|
|
integer, parameter :: psb_act_ret_=0
|
|
integer, parameter :: psb_act_abort_=1, no_err_=0
|
|
integer, parameter :: psb_dec_type_=1,psb_m_=2,psb_n_=3
|
|
integer, parameter :: psb_n_row_=4,psb_n_col_=5,psb_ctxt_=6
|
|
integer, parameter :: psb_loc_to_glob_=7
|
|
integer, parameter :: psb_mpi_c_=9,psb_mdata_size_=10
|
|
integer, parameter :: psb_desc_asb_=3099
|
|
integer, parameter :: psb_desc_bld_=psb_desc_asb_+1
|
|
integer, parameter :: psb_desc_upd_=psb_desc_bld_+1
|
|
integer, parameter :: psb_desc_upd_asb_=psb_desc_upd_+1
|
|
integer, parameter :: psb_upd_glb_=998,psb_upd_loc_=997
|
|
integer, parameter :: psb_proc_id_=0,psb_n_elem_recv_=1
|
|
integer, parameter :: psb_elem_recv_=2,psb_n_elem_send_=2
|
|
integer, parameter :: psb_elem_send_=3,psb_n_ovrlp_elem_=1
|
|
integer, parameter :: psb_ovrlp_elem_to_=2,psb_ovrlp_elem_=0
|
|
integer, parameter :: psb_nnz_=1, psb_n_dom_ovr_=1
|
|
integer, parameter :: psb_no_comm_=-1, psb_nzsizereq_=3
|
|
integer, parameter :: ione=1, done=1.d0,izero=0, dzero=0.d0
|
|
integer, parameter :: itwo=2, ithree=3,root=0, act_abort=1
|
|
integer, parameter :: psb_nztotreq_=1,psb_nzrowreq_=2
|
|
character, parameter :: psb_all_='A',psb_topdef_=' '
|
|
|
|
|