- added needed modules.. should fix non-working ODE mappings

git-svn-id: https://ppm.inf.ethz.ch/svn/ppmnumerics/branches/ngtopo/libppmnumerics@748 7c7fe9aa-52eb-4d9e-b0a8-ba7d787348e9

src/ppm_ode_map_pop.f

@@ -90,8 +90,8 @@
       ! Parallel Particle Mesh Library (PPM)
       ! ETH Zurich
       ! CH-8092 Zurich, Switzerland
-
       !-------------------------------------------------------------------------
+
 #if   __KIND == __SINGLE_PRECISION
       SUBROUTINE ppm_ode_map_pop_s(odeid,bfr,lda,Npart,mpart,info)
 #elif __KIND == __DOUBLE_PRECISION
@@ -108,6 +108,7 @@
         USE ppm_module_data
         USE ppm_module_substart
         USE ppm_module_substop
+        USE ppm_module_map
         USE ppm_module_error
         USE ppm_module_alloc
         IMPLICIT NONE

src/ppm_ode_map_push.f

@@ -71,8 +71,8 @@
       ! Parallel Particle Mesh Library (PPM)
       ! ETH Zurich
       ! CH-8092 Zurich, Switzerland
-
       !-------------------------------------------------------------------------
+
 #if   __KIND == __SINGLE_PRECISION
       SUBROUTINE ppm_ode_map_push_s(odeid,bfr,lda,Npart,mpart,info)
 #elif __KIND == __DOUBLE_PRECISION
@@ -89,6 +89,7 @@
         USE ppm_module_data
         USE ppm_module_substart
         USE ppm_module_substop
+        USE ppm_module_map
         USE ppm_module_error
         USE ppm_module_alloc
         IMPLICIT NONE

src/ppm_ode_step.f

@@ -126,8 +126,8 @@
       ! Parallel Particle Mesh Library (PPM)
       ! ETH Zurich
       ! CH-8092 Zurich, Switzerland
-
       !-------------------------------------------------------------------------
+
 #if   __MODE == __SCA
 #if   __KIND == __SINGLE_PRECISION
       SUBROUTINE ppm_ode_step_ss(odeid,xp,up,dup,lda,Npart,bfr,istage,time,&