only locally used

This commit is contained in:
Martin Diehl 2019-12-09 06:24:37 +01:00
parent eef6ae5733
commit 5abe27ab60
2 changed files with 4 additions and 4 deletions

View File

@ -21,10 +21,10 @@ module source_damage_anisoBrittle
source_damage_anisoBrittle_offset, & !< which source is my current source mechanism? source_damage_anisoBrittle_offset, & !< which source is my current source mechanism?
source_damage_anisoBrittle_instance !< instance of source mechanism source_damage_anisoBrittle_instance !< instance of source mechanism
integer, dimension(:,:), allocatable, target, public :: & integer, dimension(:,:), allocatable :: &
source_damage_anisoBrittle_sizePostResult !< size of each post result output source_damage_anisoBrittle_sizePostResult !< size of each post result output
character(len=64), dimension(:,:), allocatable, target, public :: & character(len=64), dimension(:,:), allocatable :: &
source_damage_anisoBrittle_output !< name of each post result output source_damage_anisoBrittle_output !< name of each post result output
integer, dimension(:,:), allocatable :: & integer, dimension(:,:), allocatable :: &

View File

@ -18,9 +18,9 @@ module source_damage_isoBrittle
integer, dimension(:), allocatable, public, protected :: & integer, dimension(:), allocatable, public, protected :: &
source_damage_isoBrittle_offset, & source_damage_isoBrittle_offset, &
source_damage_isoBrittle_instance source_damage_isoBrittle_instance
integer, dimension(:,:), allocatable, target, public :: & integer, dimension(:,:), allocatable :: &
source_damage_isoBrittle_sizePostResult source_damage_isoBrittle_sizePostResult
character(len=64), dimension(:,:), allocatable, target, public :: & character(len=64), dimension(:,:), allocatable :: &
source_damage_isoBrittle_output source_damage_isoBrittle_output
enum, bind(c) enum, bind(c)