COMP keyword on BEGIN and FETCH directives


1  COMP= ( + ., (  expression1
2.1 .EQ.
2.1 .NE.
2.1 .GE.
2.1 .GT.
2.1 .LE.
2.1 .LT.
1 (
1 + ., expression2
1 ) ) )