deallocate data arrays
subroutine dealloc_array() !! deallocate data arrays use iarray deallocate(jmean) deallocate(jmeanGLOBAL) deallocate(absorb) deallocate(absorbGLOBAL) deallocate(phasor) deallocate(phasorGLOBAL) end subroutine dealloc_array