--- trunk/libf/phylmd/phystokenc.f	2010/04/01 09:07:28	30
+++ trunk/libf/phylmd/phystokenc.f	2010/04/01 14:59:19	31
@@ -116,19 +116,10 @@
 c======================================================================
 
       ok_sync = .true.
-	print*,'Dans phystokenc.F'
-      print*,'iadvtr= ',iadvtr
-      print*,'istphy= ',istphy
-      print*,'istdyn= ',istdyn
 
       IF (iadvtr.eq.0) THEN
-	
 	CALL initphysto('phystoke',
      . rlon,rlat,dtime, dtime*istphy,dtime*istphy,nqmx,physid)
-  	
-	write(*,*) 'apres initphysto ds phystokenc' 
-
-	
       ENDIF
 c
       ndex2d = 0