$
;U10K3=[C26W=1]
C26I(2)=I1A0*I1A1*I1A2*I1A11*/U200K0*/U200K2
P27=[C26W=1]
P26=[C26W=0]
DOF:P27
W100N0=14
ENDF
DOF:P26
U4A0=/[C26W=0]
U4A1=/[C26W=0]
U4A2=/[C26W=0]
W100N0=1
ENDF
                                     ;PULT
;DOF:[W100N0=14]
;W13N0=0
;W13N1=0
;W13N2=0
;W13N3=0
;W14N0=0
;W14N1=0
;W14N2=0
;W14N3=0
;ENDF
;
;X-I1A7
;Y-I1A8
;Z-I1A9
;;A-I1A10
;VOL-I1A11+I1A1
;-I1A12
;
;0-I1A3
;1-I1A4
;10-I1A5
;100-I1A6
;1-I1A0  1-U4A0
;2-I1A1  2-U4A1
;3-I1A2  3-U4A2
;
P24=I8K24+I8K25+I8K26+I8K29+I8K30+I8K31
DOF PULT:[W100N0=14]
W15K0=0CDH
U15K16=I1A7
U15K17=I1A8
U15K18=I1A9
;U15K19=I1A10
;
;VOL-I1A11+I1A1
P23=I1A11*I1A1*/I1A0*/I1A2
C22I(2)=P23
U221K1=[C22W=1]
U221K2=[C22W=0]
W17K0=MUX(8,9),(U221K1,U221K2)
U10K23=P23
U10K18=P23
U10K19=P23
U4A1=[W9K0=111]
DOF:I1A7+I1A8+I1A9
W15K3=MUX(1,5,10,100),(I1A3,I1A4,I1A5,I1A6)
ENDF
P25=I1A12*I1A1*/I1A0*/I1A2
C25I(8)=P25
U221K8=[C25W=0]
U221K9=[C25W=1]
U221K10=[C25W=2]
U221K11=[C25W=3]
U221K12=[C25W=4]
U221K13=[C25W=5]
U221K14=[C25W=6]
U221K15=[C25W=7]
DOF:P25
W15K1=MUX(1,2,4,8,16,32,64,128),(U221K8,U221K9,U221K10,U221K11,U221K12,U221K13,U221K14,U221K15)
ENDF
;
U15K31=I1A0
;
U221K24=I1A0*I0K16
U221K25=I1A2*I0K16
U221K26=I1A0*I0K17
U221K27=I1A2*I0K17
U221K28=I1A0*I0K18
U221K29=I1A2*I0K18
U10K4=(I1A0+I1A2)*(I1A7+I1A8+I1A9)
;"-"
U4A0=I1A0*I0K7*/U4A2
;"+"
U4A2=I1A2*I0K7*/U4A0
; JOG
;C23I(2)=I1A1*I1A11
;U221K3=[C23W=1]
DOF:I1A12
W16K2=MUX(1,2,4,8),(I1A3,I1A4,I1A5,I1A6)
ENDF
ENDF PULT
;
