Changeset 3618 for palm/trunk/UTIL/inifor/src/inifor_io.f90

Timestamp:

Dec 10, 2018 1:25:22 PM (6 years ago)

Author:

eckhard

Message:

inifor: Prefixed all INIFOR modules with inifor_ and removed unused variables

File:

• palm/trunk/UTIL/inifor/src/inifor_io.f90 (modified) (3 diffs)

palm/trunk/UTIL/inifor/src/inifor_io.f90

@@ -26 +26 @@
 ! -----------------
 ! $Id$
+! Prefixed all INIFOR modules with inifor_
+! 
+! 
+! 3615 2018-12-10 07:21:03Z raasch
 ! bugfix: abort replaced by inifor_abort
 ! 
@@ -87 +91 @@
 !> INIFOR.
 !------------------------------------------------------------------------------!
- MODULE io
-
-    USE control
-    USE defs,                                                                  &
+ MODULE inifor_io
+
+    USE inifor_control
+    USE inifor_defs,                                                           &
         ONLY:  DATE, SNAME, PATH, PI, dp, hp, TO_RADIANS, TO_DEGREES, VERSION
+    USE inifor_types
+    USE inifor_util,                                                           &
+        ONLY:  reverse, str, real_to_str
     USE netcdf
-    USE types
-    USE util,                                                                  &
-        ONLY:  reverse, str, real_to_str
 
     IMPLICIT NONE
@@ -1222 +1226 @@
     END SUBROUTINE check
 
- END MODULE io
+ END MODULE inifor_io