--- trunk/Sources/phylmd/readsulfate.f	2015/04/29 15:47:56	134
+++ trunk/Sources/phylmd/readsulfate.f	2016/03/22 16:31:39	188
@@ -49,8 +49,7 @@
     ! Local Variables:
 
     INTEGER i, ig, k, it
-    INTEGER j, iday, ny, iyr, iyr1, iyr2
-    parameter (ny=jjm+1)
+    INTEGER j, iday, iyr, iyr1, iyr2
 
     CHARACTER(len=4) cyear