Index: LMDZ6/trunk/libf/phylmd/cdrag_mod.f90
===================================================================
--- LMDZ6/trunk/libf/phylmd/cdrag_mod.f90	(revision 5979)
+++ LMDZ6/trunk/libf/phylmd/cdrag_mod.f90	(revision 5980)
@@ -208,5 +208,5 @@
   CHARACTER(len=80) :: abort_message
   CHARACTER(len=20) :: modname = 'pbl_surface_newfrac'                                                                     ! convert scalar to 1D for call
-
+  INTEGER :: fake ! for gpum 
   fake=lunout
 
