From 413105e4be36f2b1c94b8b814c3184e69a78afe0 Mon Sep 17 00:00:00 2001
From: Christian Klein <chris+git@yokta.de>
Date: Fri, 25 Dec 2020 14:01:17 +0100
Subject: [PATCH] Add Missing Arrow to push ProgCounter to AB

---
 out/css/style.css |  4 ++++
 out/elm.js        | 33 +++++++++++++++++++++++++++++++++
 src/Main.elm      |  5 +++++
 3 files changed, 42 insertions(+)

diff --git a/out/css/style.css b/out/css/style.css
index 58727e6..5796e45 100644
--- a/out/css/style.css
+++ b/out/css/style.css
@@ -346,6 +346,10 @@ th.address {
   transform: rotate(180deg);
 }
 
+.arrow.up.arrow2 {
+  left: 50%;
+}
+
 .arrow.top {
   bottom: auto;
   top: -6rem;
diff --git a/out/elm.js b/out/elm.js
index bb546ba..929764c 100644
--- a/out/elm.js
+++ b/out/elm.js
@@ -6044,6 +6044,39 @@ var $author$project$Main$viewCu = function (model) {
 						A2($elm$html$Html$div, _List_Nil, _List_Nil)
 					])),
 				A2(
+				$elm$html$Html$div,
+				_List_fromArray(
+					[
+						$elm$html$Html$Attributes$class('arrow'),
+						$elm$html$Html$Attributes$class('up'),
+						$elm$html$Html$Attributes$class('top'),
+						$elm$html$Html$Attributes$class('arrow2')
+					]),
+				_List_fromArray(
+					[
+						A2(
+						$elm$html$Html$div,
+						_List_fromArray(
+							[
+								$elm$html$Html$Attributes$class('button')
+							]),
+						_List_fromArray(
+							[
+								A2(
+								$elm$html$Html$a,
+								_List_fromArray(
+									[
+										$elm$html$Html$Events$onClick(
+										$author$project$Main$MsgManualStep($author$project$Main$ActProgrammCounter2AddressBus))
+									]),
+								_List_fromArray(
+									[
+										$elm$html$Html$text('ProgCounter -> AddrB')
+									]))
+							])),
+						A2($elm$html$Html$div, _List_Nil, _List_Nil)
+					])),
+				A2(
 				$elm$html$Html$h1,
 				_List_fromArray(
 					[
diff --git a/src/Main.elm b/src/Main.elm
index 6e8bab8..27cc892 100644
--- a/src/Main.elm
+++ b/src/Main.elm
@@ -385,6 +385,11 @@ viewCu model =
                 [ Html.a [ onClick (MsgManualStep ActInstructionReg2AddressBus)] [ text "InstR -> AddrB" ]]
             , div [] []
             ]
+        , div [ class "arrow", class "up", class "top", class "arrow2"] 
+            [ div [ class "button" ] 
+                [ Html.a [ onClick (MsgManualStep ActProgrammCounter2AddressBus)] [ text "ProgCounter -> AddrB" ]]
+            , div [] []
+            ]
         , h1 [ class "header" ] [ text "Control Unit" ]
         , p []
             [ text