Index: trunk/LMDZ.GENERIC/libf/phygeneric/slab_heat_transp_mod.F90
===================================================================
--- trunk/LMDZ.GENERIC/libf/phygeneric/slab_heat_transp_mod.F90	(revision 4056)
+++ trunk/LMDZ.GENERIC/libf/phygeneric/slab_heat_transp_mod.F90	(revision 4062)
@@ -140,6 +140,10 @@
   SUBROUTINE ini_slab_transp(zmasq)
 
-!    USE ioipsl_getin_p_mod, only: getin_p
+! Since routine is called by master only, it should use getin, not getin_p
+#ifdef CPP_IOIPSL
     USE IOIPSL, ONLY : getin 
+#else
+    USE ioipsl_getincom, ONLY: getin
+#endif
     USE comcstfi_mod, ONLY: omeg, rad
     IMPLICIT NONE