Compute abspar43=xabspa21.
Compute abspar46=xabspa22.
Compute abspar49=xabspa23.
Compute abspar52=xabspa24.
Compute abspar55=xabspa25.
Compute abspar58=xabspa26.
Compute abspar61=xabspa27.
Compute abspar64=xabspa28.
Compute abspar67=xabspa29.
Compute abspar70=xabspa30.
Compute abspar73=xabspa31.
Compute abspar76=xabspa32.
Compute abspar79=xabspa33.
Compute abspar82=xabspa34.
Compute abspar85=xabspa35.
Compute abspar88=xabspa36.
Compute abspar91=xabspa37.
Compute abspar94=xabspa38.
Compute abspar97=xabspa39.
Compute abspa100=xabspa40.
Compute absparb =xabspb1.
Compute absparb2=xabspb2.
Compute absparb3=xabspb3.
Compute absparb4=xabspb4.
Compute absparb5=xabspb5.
Compute absparb6=xabspb6.
Compute absparb7=xabspb7.
Compute absparb8=xabspb8.
Compute absparb9=xabspb9.
Compute abspar11=xabspb10.
Compute abspar14=xabspb11.
Compute abspar17=xabspb12.
Compute abspar20=xabspb13.
Compute abspar23=xabspb14.
Compute abspar26=xabspb15.
Compute abspar29=xabspb16.
Compute abspar32=xabspb17.
Compute abspar35=xabspb18.
Compute abspar38=xabspb19.
Compute abspar41=xabspb20.
Compute abspar44=xabspb21.
Compute abspar47=xabspb22.
Compute abspar50=xabspb23.
Compute abspar53=xabspb24.
Compute abspar56=xabspb25.
Compute abspar59=xabspb26.
Compute abspar62=xabspb27.
Compute abspar65=xabspb28.
Compute abspar68=xabspb29.
Compute abspar71=xabspb30.
Compute abspar74=xabspb31.
Compute abspar77=xabspb32.
Compute abspar80=xabspb33.
Compute abspar83=xabspb34.
Compute abspar86=xabspb35.
Compute abspar89=xabspb36.
Compute abspar92=xabspb37.
Compute abspar95=xabspb38.