Juan 07/04/2022:ZSOLVER/p_abs.f90, Bit Rep Bug , missing BR_POW

src/ZSOLVER/p_abs.f90

@@ -357,8 +357,12 @@ IF ( CEQNSYS=='DUR' .OR. CEQNSYS=='MAE' ) THEN
         DO JJ = IJB,IJE
            !dir$ concurrent
            DO JI = IIB,IIE
-              ZMASSGUESS_2D(JI,JJ)  = ZMASSGUESS_2D(JI,JJ) +                               &
+              ZMASSGUESS_2D(JI,JJ)  = ZMASSGUESS_2D(JI,JJ) +               &
+#ifndef MNH_BITREP                   
                    (PEXNREF(JI,JJ,JK)+PPHIT(JI,JJ,JK))**ZCVD_O_RD          &
+#else
+                   BR_POW((PEXNREF(JI,JJ,JK)+PPHIT(JI,JJ,JK)),ZCVD_O_RD) &
+#endif
                    * ZWORK(JI,JJ,JK) / PTHETAV(JI,JJ,JK)
            END DO
         END DO