CHARACTER (LEN=80), PARAMETER :: hello_string = 'Hello Earth!'