fdoc

subroutinewrite_textprivate

subroutine write_text(text)

Write text to standard output.

Arguments

NameTypeIntentAttributesDescription
textcharacter(len=*)in

the text

Source

Show the code
subroutine write_text(text)
    character(len=*), intent(in) :: text    !! the text
    write (output_unit, '(a)', advance='no') text
end subroutine write_text

Graphs

Called by