zarray Subroutine

private subroutine zarray()

Uses

zero data arrays

Arguments

None

Source Code

        subroutine zarray
        !! zero data arrays
            use iarray

            !sets all arrays to zer

            phasor = 0._wp
            phasorGLOBAL = 0._wp
            jmean = 0._wp
            jmeanGLOBAL = 0._wp
            absorb = 0.0_wp
            absorbGLOBAL = 0.0_wp

        end subroutine zarray