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

Timestamp:

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

Author:

eckhard

Message:

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

File:

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

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

@@ -26 +26 @@
 ! -----------------
 ! $Id$
+! Prefixed all INIFOR modules with inifor_
+! 
+! 
+! 3614 2018-12-10 07:05:46Z raasch
 ! abort renamed inifor_abort to avoid intrinsic problem in Fortran
 ! 
@@ -58 +62 @@
 !> feedback to the terminal and a log file.
 !------------------------------------------------------------------------------!
- MODULE control
-
-    USE defs,                                                                  &
+ MODULE inifor_control
+
+    USE inifor_defs,                                                           &
         ONLY:  LNAME, dp, VERSION, COPYRIGHT
 
-    USE util,                                                                  &
+    USE inifor_util,                                                           &
         ONLY:  real_to_str, real_to_str_f
 
@@ -258 +262 @@
     END SUBROUTINE run_control
 
- END MODULE
-
+ END MODULE inifor_control
+