init_internal_pressure - initialising internal pressure gradient

INTERFACE:

    subroutine init_internal_pressure()
    IMPLICIT NONE
DESCRIPTION:

Here, some necessary memory is allocated (in case of the compiler option STATIC), and information is written to the log-file of the simulation.

!LOCAL VARIABLES integer :: rc