Index: LMDZ6/trunk/libf/phylmd/evappot.f90
===================================================================
--- LMDZ6/trunk/libf/phylmd/evappot.f90	(revision 5811)
+++ LMDZ6/trunk/libf/phylmd/evappot.f90	(revision 5812)
@@ -1,2 +1,10 @@
+!$gpum horizontal klon
+MODULE evappot_mod
+  PRIVATE
+
+  PUBLIC evappot
+
+  CONTAINS
+
 SUBROUTINE evappot(klon,nbsrf,ftsol,pplay,cdragh,  &
        &    t_seri,q_seri,u_seri,v_seri,evap_pot)
@@ -42,2 +50,4 @@
 
 END SUBROUTINE evappot
+
+END MODULE evappot_mod
Index: LMDZ6/trunk/libf/phylmd/physiq_mod.F90
===================================================================
--- LMDZ6/trunk/libf/phylmd/physiq_mod.F90	(revision 5811)
+++ LMDZ6/trunk/libf/phylmd/physiq_mod.F90	(revision 5812)
@@ -32,4 +32,5 @@
     USE dimphy
     USE etat0_limit_unstruct_mod
+    USE evappot_mod, ONLY: evappot
     USE FLOTT_GWD_rando_m, only: FLOTT_GWD_rando, FLOTT_GWD_rando_first
     USE fonte_neige_mod, ONLY  : fonte_neige_get_vars
Index: LMDZ6/trunk/libf/phylmdiso/physiq_mod.F90
===================================================================
--- LMDZ6/trunk/libf/phylmdiso/physiq_mod.F90	(revision 5811)
+++ LMDZ6/trunk/libf/phylmdiso/physiq_mod.F90	(revision 5812)
@@ -32,4 +32,5 @@
     USE dimphy
     USE etat0_limit_unstruct_mod
+    USE evappot_mod, ONLY: evappot
     USE FLOTT_GWD_rando_m, only: FLOTT_GWD_rando
     USE fonte_neige_mod, ONLY  : fonte_neige_get_vars