character(len=*) , parameter :: a = "abc"character(len=*) , parameter :: b = "def"character(len=*) , parameter :: c = "xy" // a // "mn" // b