subroutine hijing
+ common /histrng/a
+ common /himain1/b
+ common /hiparnt/c
+ common /himain2/d
+ common /hijjet1/e
+ common /hijjet2/f
end
+
+ subroutine hijset
+ end
+
+ subroutine profile
+ end
+
+ subroutine rluget_hijing
+ end
+
+ subroutine rluset_hijing
+ end
+
+ subroutine himain
+ end
+