C_ommp_print_summary Subroutine

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

Print a summary of the system input on standard output.

Arguments

Type IntentOptional Attributes Name
type(c_ptr), value :: s_prt

Calls

proc~~c_ommp_print_summary~~CallsGraph proc~c_ommp_print_summary C_ommp_print_summary ommp_print_summary ommp_print_summary proc~c_ommp_print_summary->ommp_print_summary

Contents

Source Code

C_ommp_print_summary

Source Code

        subroutine C_ommp_print_summary(s_prt) bind(c, name='ommp_print_summary')
            !! Print a summary of the system input on standard output.
            implicit none
            
            type(c_ptr), value :: s_prt
            type(ommp_system), pointer :: s
           
            call c_f_pointer(s_prt, s)
            call ommp_print_summary(s)

        end subroutine C_ommp_print_summary