• R/O
  • SSH

treelm: 提交

Repository of the treelm library. Now found at https://github.com/apes-suite/treelm


Commit MetaInfo

修訂56c1621e65c576039e13943f5582b4aef533b0cc (tree)
時間2014-08-07 20:55:30
作者Jens Zudrop <j.zudrop@grs-...>
CommiterJens Zudrop

Log Message

Removed additional flux buffers in face description.

Change Summary

差異

diff -r f0626e24fe4d -r 56c1621e65c5 source/tem_face_module.f90
--- a/source/tem_face_module.f90 Thu Aug 07 11:57:09 2014 +0200
+++ b/source/tem_face_module.f90 Thu Aug 07 13:55:30 2014 +0200
@@ -888,18 +888,6 @@
888888 !! corresponds to left or right face, have a look at this
889889 !! \ref tem_face_module::tem_dirtoface_map mapping.
890890 type(tem_communication_type) :: sendBuffer_state(2)
891- !> Buffer for flux data which will be received before each compute step
892- !! One buffer for the left faces of each cell and another one
893- !! for the right faces of the cells. To determine which direction
894- !! corresponds to left or right face, have a look at this
895- !! \ref tem_face_module::tem_dirtoface_map mapping.
896- type(tem_communication_type) :: recvBuffer_flux(2)
897- !> Buffer for flux data which will be send before each compute step.
898- !! One buffer for the left faces of each cell and another one
899- !! for the right faces of the cells. To determine which direction
900- !! corresponds to left or right face, have a look at this
901- !! \ref tem_face_module::tem_dirtoface_map mapping.
902- type(tem_communication_type) :: sendBuffer_flux(2)
903891 end type tem_face_descriptor_type
904892
905893 !> datatype for all faces in the mesh per level.
@@ -1036,12 +1024,6 @@
10361024 & commPattern = commPattern, &
10371025 & levelDesc = levelDesc(iDir, iLevel), &
10381026 & buf = faces(iLevel)%faces(iDir)%recvBuffer_state )
1039- ! buffer for the flux
1040- call tem_build_faceRecvBuffers( &
1041- & faces = faces(iLevel)%faces(iDir), &
1042- & commPattern = commPattern, &
1043- & levelDesc = levelDesc(iDir, iLevel), &
1044- & buf = faces(iLevel)%faces(iDir)%recvBuffer_flux )
10451027 end do
10461028 end do
10471029
@@ -1055,12 +1037,6 @@
10551037 & commPattern = commPattern , &
10561038 & levelDesc = levelDesc(iDir, iLevel), &
10571039 & buf = faces(iLevel)%faces(iDir)%sendBuffer_state )
1058- ! buffer for the flux
1059- call tem_build_faceSendBuffers( &
1060- & faces = faces(iLevel)%faces(iDir), &
1061- & commPattern = commPattern , &
1062- & levelDesc = levelDesc(iDir, iLevel), &
1063- & buf = faces(iLevel)%faces(iDir)%sendBuffer_flux )
10641040 end do
10651041 end do
10661042
Show on old repository browser