1 2 MODULE module_comm_dm 3 4 USE module_domain 5 USE module_configure 6 IMPLICIT NONE 7 8 PRIVATE module_comm_dm_dummy 9 10 CONTAINS 11 12 ! Avoid complaints about empty CONTAINS from some compilers. 13 SUBROUTINE module_comm_dm_dummy 14 RETURN 15 END SUBROUTINE module_comm_dm_dummy 16 17 ! Registry-generated communication subroutines. 18 #ifdef DM_PARALLEL 19 #include "REGISTRY_COMM_DM_subs.inc" 20 #endif 21 22 END MODULE module_comm_dm 23