    integer, parameter :: transportGivenParticle = 200
    integer, parameter :: hadron                 = 300
 +  integer, parameter :: NDK                 = 400
- 
+
  end module eventtypes
-diff --git a/code/init/NDKProdInfo.f90 b/code/init/NDKProdInfo.f90
+diff a/code/init/NDKProdInfo.f90 b/code/init/NDKProdInfo.f90
 new file mode 100644
-index 0000000..3e166df
 --- /dev/null
 +++ b/code/init/NDKProdInfo.f90
 @@ -0,0 +1,144 @@

+  end subroutine NDKProdInfo_Get
+
+end module NDKProdInfo
diff --git a/code/init/initNDK.f90 b/code/init/initNDK.f90
new file mode 100644
index 0000000..ad3b0df
--- /dev/null
+++ b/code/init/initNDK.f90
@@ -0,0 +1,231 @@

 
 lib%.a: %.o
        -rm $@
diff a/code/GiBUU.f90 b/code/GiBUU.f90
--- a/code/GiBUU.f90
+++ b/code/GiBUU.f90
@@ -237,6 +237,7 @@ contains
