From fdbe6c683b6eba955fd063dc6e42202f7fbe4e02 Mon Sep 17 00:00:00 2001 From: JGonzalez Date: Wed, 1 Apr 2026 16:23:53 +0200 Subject: [PATCH] Bit more of cleaning --- .../mesh/inout/gmsh2/moduleMeshOutputGmsh2.f90 | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/src/modules/mesh/inout/gmsh2/moduleMeshOutputGmsh2.f90 b/src/modules/mesh/inout/gmsh2/moduleMeshOutputGmsh2.f90 index 0ca61ad..acd4189 100644 --- a/src/modules/mesh/inout/gmsh2/moduleMeshOutputGmsh2.f90 +++ b/src/modules/mesh/inout/gmsh2/moduleMeshOutputGmsh2.f90 @@ -1,4 +1,5 @@ MODULE moduleMeshOutputGmsh2 + use moduleOutput, only: prefix, informFileCreation, formatFileName, generateFilePath CONTAINS !Header for mesh format @@ -16,7 +17,7 @@ MODULE moduleMeshOutputGmsh2 !Node data subroutines !Header SUBROUTINE writeGmsh2HeaderNodeData(fileID, title, iteration, time, dimensions, nNodes) - use moduleOutput + use moduleOutput, only: fmtInt, fmtReal IMPLICIT NONE INTEGER, INTENT(in):: fileID @@ -50,7 +51,7 @@ MODULE moduleMeshOutputGmsh2 !Element data subroutines !Header SUBROUTINE writeGmsh2HeaderElementData(fileID, title, iteration, time, dimensions, nVols) - use moduleOutput + use moduleOutput, only: fmtInt, fmtReal IMPLICIT NONE INTEGER, INTENT(in):: fileID @@ -86,7 +87,7 @@ MODULE moduleMeshOutputGmsh2 USE moduleMesh USE moduleRefParam USE moduleSpecies - USE moduleOutput + use moduleOutput, only: outputFormat, calculateOutput, fmtReal USE moduleCaseParam, ONLY: timeStep IMPLICIT NONE @@ -141,7 +142,7 @@ MODULE moduleMeshOutputGmsh2 USE moduleRefParam USE moduleCaseParam USE moduleCollisions - USE moduleOutput + use moduleOutput, only: collOutput, fmtInt IMPLICIT NONE CLASS(meshGeneric), INTENT(in):: self @@ -199,7 +200,7 @@ MODULE moduleMeshOutputGmsh2 USE moduleMesh USE moduleRefParam USE moduleCaseParam - USE moduleOutput + use moduleOutput, only: emOutput IMPLICIT NONE CLASS(meshParticles), INTENT(in):: self @@ -248,7 +249,6 @@ MODULE moduleMeshOutputGmsh2 USE moduleMesh USE moduleRefParam USE moduleSpecies - USE moduleOutput USE moduleAverage IMPLICIT NONE