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

Small changes while testing 0D case

Browse source
This commit is contained in:
Jorge Gonzalez 2026-02-27 22:21:37 +01:00
commit aad8675214
2 changed files with 6 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

10
src/modules/init/moduleInput.f90
View file

@ -1012,9 +1012,6 @@ MODULE moduleInput
if (found) then
allocate(physicalSurfaces(1:nPhysicalSurfaces))
else
call criticalError('No physical surfaces found in the input file', 'readPhysicalSurfaces')
end if
do ps = 1, nPhysicalSurfaces
@ -1339,8 +1336,11 @@ MODULE moduleInput
end do
! Builds the K matrix for the Particles mesh
call mesh%constructGlobalK()
if (mesh%dimen > 0) then
! Builds the K matrix for the Particles mesh
call mesh%constructGlobalK()
end if
END SUBROUTINE readGeometry