declare string:    "character"//"(len=:)"//""//", allocatable"
declare component: character(len=:), allocatable
declare result:    character(len=:)
declare dummy:     character(len=*)

a == b:            a == b
a NE b:            a /= b
a <= b:            a <= b
a >= b:            a >= b
a <  b:            a < b
a >  b:            a > b

FREE(x):           deallocate(x)
COPY(dst,src):     dst=src
MOVE(dst,src):     call move_alloc(from=src,to=dst)
