223031012
/
DAMASK_EICMD
mirror of https://github.com/achalhp/DAMASK_EICMD.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

introduced two small bugs

This commit is contained in:
Martin Diehl 2015-04-11 09:25:15 +00:00
parent 470fc2dce3
commit b4456e76b3
2 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
code/mesh.f90
View File

@ -567,7 +567,7 @@ subroutine mesh_init(ip,el)
gridMPI = gridGlobal gridMPI = gridGlobal
alloc_local = fftw_mpi_local_size_3d(gridMPI(3), gridMPI(2), gridMPI(1)/2 +1, & alloc_local = fftw_mpi_local_size_3d(gridMPI(3), gridMPI(2), gridMPI(1)/2 +1, &
MPI_COMM_WORLD, local_K, local_K_offset) MPI_COMM_WORLD, local_K, local_K_offset)
gridLocal = [gridGlobal(1:2) int(local_K,pInt)] gridLocal = [gridGlobal(1:2),int(local_K,pInt)]
gridOffset = int(local_K_offset,pInt) gridOffset = int(local_K_offset,pInt)
geomSizeGlobal = mesh_spectral_getSize(fileUnit) geomSizeGlobal = mesh_spectral_getSize(fileUnit)

1
code/plastic_nonlocal.f90
View File

@ -287,6 +287,7 @@ use mesh, only: mesh_NcpElems, &
mesh_maxNips, & mesh_maxNips, &
mesh_maxNipNeighbors mesh_maxNipNeighbors
use material, only: phase_plasticity, & use material, only: phase_plasticity, &
homogenization_maxNgrains, &
phase_plasticityInstance, & phase_plasticityInstance, &
phase_Noutput, & phase_Noutput, &
PLASTICITY_NONLOCAL_label, & PLASTICITY_NONLOCAL_label, &