--- trunk/libf/phylmd/Orography/gwstress.f90	2011/01/06 17:52:19	38
+++ trunk/phylmd/Orography/gwstress.f	2014/09/04 10:40:24	105
@@ -78,13 +78,8 @@
 !*         1.    initialization
 !                --------------
 
-100   CONTINUE
-
 !*         3.1     gravity wave stress.
 
-300   CONTINUE
-
-
       DO 301 jl = 1, klon
         IF (ktest(jl)==1) THEN