- Many fixes to the triple axis stuff

* update after a1-a6 drive
  * intrduction of targets
- POLDI writing
- Moved HKL calculation 4 TRICS to fourlib

t_update.f

@@ -89,7 +89,7 @@ C
 C-----------------------------------------------------------------------
 C
 	IERI=0
-	IERU=1
+	IERU=1 + 8
 	CALL EX_UP(DDM,DEI,DAKI,DA2,DF,IERI)
 	IF (IERI.EQ.0) THEN
 	  EI=DEI
@@ -98,9 +98,10 @@ C
 	ELSE
 	  IMOD=3
 	  CALL ERRESO(IMOD,IERI)
+          IERU = IERI + 8
 	ENDIF
 	IERI=0
-	IERU=1
+	IERU=1 + 8
 	CALL EX_UP(DDA,DEF,DAKF,DA6,DF,IERI)
 	IF (IERI.EQ.0) THEN
 	  EF=DEF
@@ -116,6 +117,7 @@ C
 	  ELSE
 	    IMOD=3
 	    CALL ERRESO(IMOD,IERI)
+	    IERU = 8 + IERI
 	  ENDIF
 	ENDIF
 	IF (ISA.EQ.0) THEN
@@ -127,7 +129,7 @@ C
 	ENDIF
 	IF (IERU.EQ.0) EN=DEI-DEF
 	IERI=0
-	IERU=1
+	IERU=1 + 4
 	CALL SAM_UP(DBQHKL,DQM,DQS,DPHI,DAKI,DAKF,DA3,DA4,IERI)
 	IF (IERI.EQ.0) THEN
 	  DO ID=1,3
@@ -139,6 +141,7 @@ C
 	ELSE
 	  IMOD=2
 	  CALL ERRESO(IMOD,IERI)
+          IERU = IERI + 4
 	ENDIF
 C
 	IERI=0