Index: trunk/LMDZ.COMMON/libf/dyn3d_common/geopot.F
===================================================================
--- trunk/LMDZ.COMMON/libf/dyn3d_common/geopot.F	(revision 1971)
+++ trunk/LMDZ.COMMON/libf/dyn3d_common/geopot.F	(revision 2048)
@@ -21,4 +21,7 @@
 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=======================================================================