There is only one intrinsic character operator -- most of the manipulation is done using intrinsic functions.
The concatenation operator, //, is used to join two strings.
CHARACTER(LEN=4), PARAMETER :: name = "Coal" CHARACTER(LEN=10) :: song = "Firey "//name PRINT*, "Rowche "//"Rumble" PRINT*, song(1:1)//name(2:4)
would produce
Rowche Rumble Foal
For more information, click here