1* #define FALSE TRUE ...  .FALSE. -> .TRUE.
2#define FALSE TRUE
3      if (.FALSE.) then
4        print *, 'pp036.F pass'
5      else
6        print *, 'pp036.F FAIL: ', .FALSE.
7      end if
8      end
9