Index: /LMDZ6/branches/Optimisation_LMDZ/libf/phy_common/profiling_physic.F90
===================================================================
--- /LMDZ6/branches/Optimisation_LMDZ/libf/phy_common/profiling_physic.F90	(revision 3745)
+++ /LMDZ6/branches/Optimisation_LMDZ/libf/phy_common/profiling_physic.F90	(revision 3746)
@@ -206,4 +206,5 @@
   END SUBROUTINE print_profile
 
+#ifdef CPP_OMP
   subroutine checked_omp_barrier(message)
     use omp_lib, only : omp_get_team_size
@@ -220,5 +221,10 @@
        call abort_physic(modname, "Timer barrier",1)
      end if
-   end subroutine checked_omp_barrier
+  end subroutine checked_omp_barrier
+#else
+  subroutine checked_omp_barrier(message)
+    character(*), intent(in) :: message
+  end subroutine checked_omp_barrier
+#endif
     
 END MODULE profiling_physic_mod