Index: LMDZ4/branches/V3_test/libf/phylmd/oasis.psmile
===================================================================
--- LMDZ4/branches/V3_test/libf/phylmd/oasis.psmile	(revision 745)
+++ LMDZ4/branches/V3_test/libf/phylmd/oasis.psmile	(revision 746)
@@ -94,12 +94,15 @@
 ! Here we go: psmile initialisation
 !
-!ym   call prism_init_comp_proto (comp_id, clmodnam, ierror)
-!ym
-!ym   IF (ierror .ne. PRISM_Ok) THEN
-!ym      abort_message=' Probleme init dans prism_init_comp '
-!ym      call abort_gcm(modname,abort_message,1)
-!ym   ELSE
-!ym      WRITE(nuout,*) 'inicma : init psmile ok '
-!ym   ENDIF
+    IF (monocupu) THEN
+      call prism_init_comp_proto (comp_id, clmodnam, ierror)
+
+      IF (ierror .ne. PRISM_Ok) THEN
+         abort_message=' Probleme init dans prism_init_comp '
+         call abort_gcm(modname,abort_message,1)
+      ELSE
+         WRITE(nuout,*) 'inicma : init psmile ok '
+      ENDIF
+    ENDIF
+
       call prism_get_localcomm_proto (il_commlocal, ierror)
 !