C_ommp_set_outputfile Subroutine

public subroutine C_ommp_set_outputfile(fname) bind(c, name="0")

Arguments

Type IntentOptional Attributes Name
character(kind=c_char), intent(in) :: fname(OMMP_STR_CHAR_MAX)

Calls

proc~~c_ommp_set_outputfile~~CallsGraph proc~c_ommp_set_outputfile C_ommp_set_outputfile proc~c2f_string c2f_string proc~c_ommp_set_outputfile->proc~c2f_string proc~set_iof_mmpol set_iof_mmpol proc~c_ommp_set_outputfile->proc~set_iof_mmpol proc~ommp_message ommp_message proc~set_iof_mmpol->proc~ommp_message proc~fatal_error fatal_error proc~set_iof_mmpol->proc~fatal_error 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

C_ommp_set_outputfile

Source Code

        subroutine C_ommp_set_outputfile(fname) &
                bind(c, name='ommp_set_outputfile')
            implicit none
            
            character(kind=c_char), intent(in) :: fname(OMMP_STR_CHAR_MAX)
            character(len=OMMP_STR_CHAR_MAX) :: ffname
            
            call c2f_string(fname, ffname)
            call ommp_set_outputfile(ffname)

        end subroutine C_ommp_set_outputfile