Skip to content

Commit

Permalink
This commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.
Merge remote-tracking branch 'origin/master' into fix-docker
Browse files Browse the repository at this point in the history
robkooper committed Apr 4, 2024

Verified

This commit was created on GitHub.com and signed with GitHub’s verified signature. The key has expired.
2 parents ec99fa6 + 8d4c3af commit aef8777
Showing 1 changed file with 7 additions and 7 deletions.
14 changes: 7 additions & 7 deletions ED/src/memory/ed_mem_alloc.f90
Original file line number Diff line number Diff line change
@@ -72,15 +72,15 @@ subroutine ed_memory_allocation(proc_type)
call ed_nullify_work(work_e(ng))
call ed_alloc_work(work_e(ng),nmxp(ng),nmyp(ng),maxsite)
end do

!---------------------------------------------------------------------------------------!
! Allocate the top most hierachical memory structures for the ED2 LSM. We changed the !
! the way the standalone deals with different regions ans sites of interest. Now it !
! allocates each region and each poi in a different grid. This is done to ease the way !
! the parallel code is implemented, to take full advantage of MPI. By doing this, we !
! can split the polygons among the different nodes for the regional run, and split the !
! patches and cohorts in different nodes in the POI grids --- the latter is yet to be !
! implemented. !
! allocates each region and each point in a different grid. This is done to ease the !
! way the parallel code is implemented, to take full advantage of MPI. By doing this, !
! we can split the polygons among the different nodes for the regional run, and split !
! the patches and cohorts in different nodes in the POI grids --- the latter is yet to !
! be implemented. !
!---------------------------------------------------------------------------------------!
write (unit=*,fmt='(a,i5,a)') ' + Polygon array allocation, node ',mynum,';'

@@ -90,7 +90,7 @@ subroutine ed_memory_allocation(proc_type)
call allocate_edtype(edgrid_g(ng),gdpy(mynum,ng))
end do

write (unit=*,fmt='(a,i5,a)') ' + Memory successfully allocated on none ',mynum,';'
write (unit=*,fmt='(a,i5,a)') ' + Memory successfully allocated on node ',mynum,';'
return
end subroutine ed_memory_allocation
!---------------------------------------------------------------------------------------!

0 comments on commit aef8777

Please sign in to comment.