 +      case(NDK)
 +         lengthPert =  max(100,10*targetNuc%mass)
        end select
- 
+
        !...Defining maximal lenghts of particle vectors: (From Input)
 @@ -539,6 +542,10 @@ contains
- 
+
         call init_transportGivenParticle(realParticles,pertParticles)
- 
+
 +    case (NDK)
 +      call setUpTarget(.false.)
 +

 
 lib%.a: %.o
        -rm $@
diff --git a/code/GiBUU.f90 b/code/GiBUU.f90
index 7e4efbc..2f4e702 100644
--- a/code/GiBUU.f90
+++ b/code/GiBUU.f90
@@ -237,6 +237,7 @@ contains

     use initTransportGivenParticle, only: init_transportGivenParticle
+    use InitNDK, only: InitNDKEvents
     use initExternal, only: initializeExternal, ExternalIsPerturbative

     use nucleus, only: getTarget, getProjectile
@@ -330,6 +331,8 @@ contains
       case (hadron)
