C_ommp_print_summary_to_file Subroutine

public subroutine C_ommp_print_summary_to_file(s_prt, filename) bind(c, name="0")

Print a summary of the system input on file.

Arguments

Type IntentOptional Attributes Name
type(c_ptr), value :: s_prt
character(kind=c_char), intent(in) :: filename(OMMP_STR_CHAR_MAX)

File where the summary will be printed


Calls

proc~~c_ommp_print_summary_to_file~~CallsGraph proc~c_ommp_print_summary_to_file C_ommp_print_summary_to_file proc~c2f_string c2f_string proc~c_ommp_print_summary_to_file->proc~c2f_string proc~mmpol_ommp_print_summary mmpol_ommp_print_summary proc~c_ommp_print_summary_to_file->proc~mmpol_ommp_print_summary interface~mallocate mallocate proc~mmpol_ommp_print_summary->interface~mallocate proc~sort_ivec sort_ivec proc~mmpol_ommp_print_summary->proc~sort_ivec interface~print_matrix print_matrix proc~mmpol_ommp_print_summary->interface~print_matrix proc~print_int_vec print_int_vec proc~mmpol_ommp_print_summary->proc~print_int_vec interface~mfree mfree proc~mmpol_ommp_print_summary->interface~mfree proc~r_alloc1 r_alloc1 interface~mallocate->proc~r_alloc1 proc~i_alloc2 i_alloc2 interface~mallocate->proc~i_alloc2 proc~i_alloc1 i_alloc1 interface~mallocate->proc~i_alloc1 proc~r_alloc3 r_alloc3 interface~mallocate->proc~r_alloc3 proc~r_alloc2 r_alloc2 interface~mallocate->proc~r_alloc2 proc~i_alloc3 i_alloc3 interface~mallocate->proc~i_alloc3 proc~l_alloc1 l_alloc1 interface~mallocate->proc~l_alloc1 proc~l_alloc2 l_alloc2 interface~mallocate->proc~l_alloc2 proc~sort_ivec->interface~mallocate proc~sort_ivec->interface~mfree proc~d1_print_matrix d1_print_matrix interface~print_matrix->proc~d1_print_matrix proc~d2_print_matrix d2_print_matrix interface~print_matrix->proc~d2_print_matrix proc~r_free1 r_free1 interface~mfree->proc~r_free1 proc~i_free3 i_free3 interface~mfree->proc~i_free3 proc~l_free2 l_free2 interface~mfree->proc~l_free2 proc~l_free1 l_free1 interface~mfree->proc~l_free1 proc~i_free1 i_free1 interface~mfree->proc~i_free1 proc~i_free2 i_free2 interface~mfree->proc~i_free2 proc~r_free3 r_free3 interface~mfree->proc~r_free3 proc~r_free2 r_free2 interface~mfree->proc~r_free2 proc~chk_free chk_free proc~r_free1->proc~chk_free proc~i_free3->proc~chk_free proc~l_free2->proc~chk_free proc~l_free1->proc~chk_free proc~chk_alloc chk_alloc proc~r_alloc1->proc~chk_alloc proc~memory_init memory_init proc~r_alloc1->proc~memory_init proc~i_alloc2->proc~chk_alloc proc~i_alloc2->proc~memory_init proc~i_alloc1->proc~chk_alloc proc~i_alloc1->proc~memory_init proc~r_alloc3->proc~chk_alloc proc~r_alloc3->proc~memory_init proc~r_alloc2->proc~chk_alloc proc~r_alloc2->proc~memory_init proc~i_alloc3->proc~chk_alloc proc~i_alloc3->proc~memory_init proc~l_alloc1->proc~chk_alloc proc~l_alloc1->proc~memory_init proc~l_alloc2->proc~chk_alloc proc~l_alloc2->proc~memory_init proc~d1_print_matrix->proc~d2_print_matrix proc~i_free1->proc~chk_free proc~i_free2->proc~chk_free proc~r_free3->proc~chk_free proc~r_free2->proc~chk_free proc~fatal_error fatal_error proc~chk_free->proc~fatal_error proc~chk_alloc->proc~fatal_error proc~ommp_message ommp_message proc~fatal_error->proc~ommp_message proc~close_output close_output proc~fatal_error->proc~close_output proc~close_output->proc~ommp_message

Contents


Source Code

        subroutine C_ommp_print_summary_to_file(s_prt, filename) &
                bind(c, name='ommp_print_summary_to_file')
            !! Print a summary of the system input on file.
            implicit none
            
            type(c_ptr), value :: s_prt
            type(ommp_system), pointer :: s
            character(kind=c_char), intent(in) :: filename(OMMP_STR_CHAR_MAX)
            !! File where the summary will be printed
            character(len=OMMP_STR_CHAR_MAX) :: output_file
            
            call c_f_pointer(s_prt, s)
            call c2f_string(filename, output_file)
            call ommp_print_summary_to_file(s, output_file)

        end subroutine C_ommp_print_summary_to_file