JGonzalez/fpakc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Almost compiling. Issue was in generating objects for submodules

Browse source
This commit is contained in:
Jorge Gonzalez 2026-02-24 20:18:06 +01:00
commit 6b4d4fbcc3
3 changed files with 9 additions and 15 deletions
Download patch file Download diff file Expand all files Collapse all files

1
src/makefile
View file

@ -1,4 +1,5 @@
OBJECTS = $(OBJDIR)/moduleMesh.o $(OBJDIR)/moduleMeshCommon.o $(OBJDIR)/moduleCompTime.o \ OBJECTS = $(OBJDIR)/moduleMesh.o $(OBJDIR)/moduleMeshCommon.o $(OBJDIR)/moduleCompTime.o \
$(OBJDIR)/moduleMesh@elements.o $(OBJDIR)/moduleMesh@boundaryEM.o $(OBJDIR)/moduleMesh@boundaryParticle.o $(OBJDIR)/moduleMesh@surfaces.o \
$(OBJDIR)/moduleSpecies.o $(OBJDIR)/moduleInject.o $(OBJDIR)/moduleInput.o \ $(OBJDIR)/moduleSpecies.o $(OBJDIR)/moduleInject.o $(OBJDIR)/moduleInput.o \
$(OBJDIR)/moduleErrors.o $(OBJDIR)/moduleList.o $(OBJDIR)/moduleOutput.o \ $(OBJDIR)/moduleErrors.o $(OBJDIR)/moduleList.o $(OBJDIR)/moduleOutput.o \
$(OBJDIR)/moduleCaseParam.o $(OBJDIR)/moduleRefParam.o \ $(OBJDIR)/moduleCaseParam.o $(OBJDIR)/moduleRefParam.o \

8
src/modules/mesh/makefile
View file

@ -20,10 +20,10 @@ all: moduleMesh.o inout.o 3DCart.o 2DCyl.o 2DCart.o 1DRad.o 1DCart.o 0D.o
moduleMesh.o: moduleMeshCommon.o moduleMesh.f90 moduleMesh.o: moduleMeshCommon.o moduleMesh.f90
$(FC) $(FCFLAGS) -c $(subst .o,.f90,$@) -o $(OBJDIR)/$@ $(FC) $(FCFLAGS) -c $(subst .o,.f90,$@) -o $(OBJDIR)/$@
$(FC) $(FCFLAGS) -c moduleMesh@elements.f90 -o $(OBJDIR)/$@ $(FC) $(FCFLAGS) -c moduleMesh@elements.f90 -o $(OBJDIR)/moduleMesh@elements.o
$(FC) $(FCFLAGS) -c moduleMesh@boundaryParticle.f90 -o $(OBJDIR)/$@ $(FC) $(FCFLAGS) -c moduleMesh@boundaryParticle.f90 -o $(OBJDIR)/moduleMesh@boundaryParticle.o
$(FC) $(FCFLAGS) -c moduleMesh@boundaryEM.f90 -o $(OBJDIR)/$@ $(FC) $(FCFLAGS) -c moduleMesh@boundaryEM.f90 -o $(OBJDIR)/moduleMesh@boundaryEM.o
$(FC) $(FCFLAGS) -c moduleMesh@surfaces.f90 -o $(OBJDIR)/$@ $(FC) $(FCFLAGS) -c moduleMesh@surfaces.f90 -o $(OBJDIR)/moduleMesh@surfaces.o
inout.o: 3DCart.o 2DCyl.o 2DCart.o 1DRad.o 1DCart.o 0D.o inout.o: 3DCart.o 2DCyl.o 2DCart.o 1DRad.o 1DCart.o 0D.o
$(MAKE) -C inout all $(MAKE) -C inout all

7
src/modules/mesh/moduleMesh.f90
View file

@ -11,7 +11,6 @@ MODULE moduleMesh
TYPE, PUBLIC, ABSTRACT:: meshElement TYPE, PUBLIC, ABSTRACT:: meshElement
!Index !Index
INTEGER:: n = 0 INTEGER:: n = 0
CONTAINS
END TYPE meshElement END TYPE meshElement
@ -571,8 +570,6 @@ MODULE moduleMesh
!Collision (MCC) mesh !Collision (MCC) mesh
TYPE, EXTENDS(meshGeneric):: meshCollisions TYPE, EXTENDS(meshGeneric):: meshCollisions
CONTAINS
!GENERIC PROCEDURES
END TYPE meshCollisions END TYPE meshCollisions
@ -836,13 +833,11 @@ MODULE moduleMesh
TYPE:: boundaryParticleCont TYPE:: boundaryParticleCont
CLASS(boundaryParticleGeneric), ALLOCATABLE:: obj CLASS(boundaryParticleGeneric), ALLOCATABLE:: obj
CONTAINS
END TYPE boundaryParticleCont END TYPE boundaryParticleCont
type:: boundaryParticlePointer type:: boundaryParticlePointer
class(boundaryParticleGeneric), pointer:: obj class(boundaryParticleGeneric), pointer:: obj
contains
end type boundaryParticlePointer end type boundaryParticlePointer
@ -908,7 +903,6 @@ MODULE moduleMesh
! Extended types ! Extended types
TYPE, EXTENDS(boundaryEMGeneric):: boundaryEMDirichlet TYPE, EXTENDS(boundaryEMGeneric):: boundaryEMDirichlet
REAL(8):: potential REAL(8):: potential
CONTAINS CONTAINS
! boundaryEMGeneric DEFERRED PROCEDURES ! boundaryEMGeneric DEFERRED PROCEDURES
PROCEDURE, PASS:: apply => applyDirichlet PROCEDURE, PASS:: apply => applyDirichlet
@ -918,7 +912,6 @@ MODULE moduleMesh
TYPE, EXTENDS(boundaryEMGeneric):: boundaryEMDirichletTime TYPE, EXTENDS(boundaryEMGeneric):: boundaryEMDirichletTime
real(8):: potential real(8):: potential
type(table1D):: temporalProfile type(table1D):: temporalProfile
contains contains
! boundaryEMGeneric DEFERRED PROCEDURES ! boundaryEMGeneric DEFERRED PROCEDURES
procedure, pass:: apply => applyDirichletTime procedure, pass:: apply => applyDirichletTime