From 01877fe909c09dfcd56b78d23566f0bf00beec88 Mon Sep 17 00:00:00 2001 From: ignis Date: Thu, 29 Aug 2019 21:01:02 +0900 Subject: [PATCH] rename Compact to m_compact --- code/{Compact.f90 => m_compact.f90} | 4 ++-- code/makefile | 8 ++++---- code/ysolve.f90 | 2 +- 3 files changed, 7 insertions(+), 7 deletions(-) rename code/{Compact.f90 => m_compact.f90} (99%) diff --git a/code/Compact.f90 b/code/m_compact.f90 similarity index 99% rename from code/Compact.f90 rename to code/m_compact.f90 index e75fcf1..231aefd 100644 --- a/code/Compact.f90 +++ b/code/m_compact.f90 @@ -1,4 +1,4 @@ - MODULE Compact + MODULE m_compact IMPLICIT NONE PRIVATE REAL, DIMENSION(:), ALLOCATABLE :: lxf,lxs,wxf,wxs, & @@ -383,4 +383,4 @@ END SUBROUTINE d2fnonp - END MODULE Compact + END MODULE m_compact diff --git a/code/makefile b/code/makefile index 143bdfa..0507951 100644 --- a/code/makefile +++ b/code/makefile @@ -10,8 +10,8 @@ endif compiler = gfortran -ex : test.o ysolve.o Compact.o - ${compiler} -o ex test.o ysolve.o Compact.o +ex : test.o ysolve.o m_compact.o + ${compiler} -o ex test.o ysolve.o m_compact.o test.o : test.f90 ysolve.mod compact.mod ${compiler} -c ${flags} test.f90 @@ -19,8 +19,8 @@ test.o : test.f90 ysolve.mod compact.mod ysolve.o ysolve.mod : ysolve.f90 compact.mod ${compiler} -c ${flags} ysolve.f90 -Compact.o compact.mod : Compact.f90 - ${compiler} -c ${flags} Compact.f90 +m_compact.o compact.mod : m_compact.f90 + ${compiler} -c ${flags} m_compact.f90 test: ex sh test.sh diff --git a/code/ysolve.f90 b/code/ysolve.f90 index 5cf3da0..9626de5 100644 --- a/code/ysolve.f90 +++ b/code/ysolve.f90 @@ -1,5 +1,5 @@ MODULE ysolve - USE Compact + USE m_compact IMPLICIT NONE PRIVATE REAL, PARAMETER :: pi=3.14159265358979323846