Introduce dummy commons

diff --git a/HIJING/dummyhijing.F b/HIJING/dummyhijing.F
index 96057970303ec25e6766064752d2e607efca6ff5..451628bd5cd9a64656eb7aff0ca10bdf6bdfe816 100644 (file)
--- a/HIJING/dummyhijing.F
+++ b/HIJING/dummyhijing.F
@@ -1,4 +1,10 @@
       subroutine hijing
+      common /histrng/a
+      common /himain1/b
+      common /hiparnt/c
+      common /himain2/d
+      common /hijjet1/e
+      common /hijjet2/f
       end
 
       subroutine hijset
@@ -13,23 +19,9 @@
       subroutine rluset_hijing
       end
 
-      subroutine hijjet1
-      end
-
       subroutine hijjet2
       end
 
-      subroutine histrng
-      end
-
       subroutine himain
       end
 
-      subroutine himain1
-      end
-
-      subroutine himain2
-      end
-
-      subroutine hiparnt
-      end