--- trunk/libf/phylmd/readsulfate.f	2011/09/20 09:14:34	51
+++ trunk/libf/phylmd/readsulfate.f	2012/04/20 14:58:43	61
@@ -33,8 +33,6 @@
 c 20/08/01: Correct the error through integer-values in interpolations      
 c 21/08/01: Introduce flag to read in just one decade
 c      
-c Include-files:
-c --------------     
 c 
 c Input:
 c ------
@@ -304,8 +302,6 @@
 c --------------
 c see above 
 c      
-c Include-files:
-c --------------     
 c 
 c Input:
 c ------
@@ -498,7 +494,7 @@
       SUBROUTINE getso4fromfile (cyr, so4)
       use dimens_m      
       use dimphy
-      include "netcdf.inc"
+            use netcdf
       CHARACTER*15 fname
       CHARACTER*4 cyr