This is the simplest form of directing unformatted data to the standard output channel, for example,
PROGRAM Owt
IMPLICIT NONE
CHARACTER(LEN=*), PARAMETER :: &
long_name = "Llanfair...gogogoch"
REAL :: x, y, z
LOGICAL :: lacigol
x = 1; y = 2; z = 3
lacigol = (y .eq. x)
PRINT*, long_name
PRINT*, "Spock says ""illogical&
&Captain"" "
PRINT*, "X = ",x," Y = ",y," Z = ",z
PRINT*, "Logical val: ",lacigol
END PROGRAM Owt
produces on the screen,
Llanfair...gogogoch Spock says "illogical Captain" X = 1.000 Y = 2.000 Z = 3.000 Logical val: F
For more information, click here