--- trunk/libf/phylmd/readsulfate.f	2012/01/30 14:37:26	60
+++ trunk/libf/phylmd/readsulfate.f	2012/04/20 14:58:43	61
@@ -494,7 +494,7 @@
       SUBROUTINE getso4fromfile (cyr, so4)
       use dimens_m      
       use dimphy
-      include "netcdf.inc"
+            use netcdf
       CHARACTER*15 fname
       CHARACTER*4 cyr