Changeset 3676 for palm

Timestamp:

Jan 16, 2019 3:07:05 PM (6 years ago)

Author:

knoop

Message:

Added comment with reference to PGI Compiler bug-ticket to the MERGE workaround in flow_statistics

File:

• palm/trunk/SOURCE/flow_statistics.f90 (modified) (1 diff)

palm/trunk/SOURCE/flow_statistics.f90

@@ -1079 +1079 @@
                    ! The original code using MERGE doesn't work with the PGI
                    ! compiler when running on the GPU.
+                   ! This is submitted as a compiler Bug in PGI ticket TPR#26718
                    ! ki = MERGE( -1, 0, l == 0 )
                    ki = -1 + l