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