new_line(x): New Line Character¶

New line character.

Declaration¶

retval = new_line(x)
function new_line(c)

The input parameter x must be of type character. It can be a scalar or an array.

The return value is a character of length one with the new line character appended of the same kind as of x.

new_line(x) returns the new line character. The return value is the ASCII newline character.

Supported input parameter types is character.

function new_line(c) result(r)
character(len=1), intent(in) :: c
character(len=1) :: r
end function

program intrinsics_new_line
    implicit none
	print *, 'This is record 1.'//new_line('A')//'This is record 2.'
end program

Resultado:

This is record 1.A
This is record 2.

Nenhum.