Index: trunk/LMDZ.COMMON/libf/dyn3d_common/geopot.F
===================================================================
--- trunk/LMDZ.COMMON/libf/dyn3d_common/geopot.F	(revision 1702)
+++ trunk/LMDZ.COMMON/libf/dyn3d_common/geopot.F	(revision 1703)
@@ -21,7 +21,4 @@
 c     .. ngrid,teta,pk,pks,phis sont des argum. d'entree pour le s-pg ..
 c              phi               est un  argum. de sortie pour le s-pg .
-c
-c  This computation (with teta = cp T / pk !) is identical to 
-c     delta phi = R/RMD T/p delta p         (r=R/RMD=cpp*kappa)
 c
 c=======================================================================