- rborncat(i,j),rborncat(j,i),(wqdipcat(k,i,j),k=1,2), &
- alphapolcat(i,j),alphapolcat(j,i), &
- (alphisocat(k,i,j),k=1,4),sigiso1cat(i,j),sigiso2cat(i,j),epsintabcat(i,j),debaykapcat(i,j)
+ rborncat(i,j),rborncat(j,i),(wqdipcat(k,i,j),k=1,2), & ! 4
+ alphapolcat(i,j),alphapolcat(j,i), & ! 2
+ (alphisocat(k,i,j),k=1,4),sigiso1cat(i,j),sigiso2cat(i,j),epsintabcat(i,j),debaykapcat(i,j) ! 8
+! print *,epscat(i,j),sigmacat(i,j),chicat(i,j),chicat(j,i),chippcat(i,j),chippcat(j,i)
+! print *, (alphasurcat(k,i,j),k=1,4),sigmap1cat(i,j),sigmap2cat(i,j)
+! print *, chiscat(i,j),chiscat(j,i)
+! print *,nstatecat(i,j),(wstatecat(k,i,j),k=1,4)
+! print *, dheadcat(1,1,i,j),dheadcat(1,2,i,j),dheadcat(2,1,i,j),dheadcat(2,2,i,j)
+! print *, dtailcat(1,i,j),dtailcat(2,i,j)
+! print *, epsheadcat(i,j),sig0headcat(i,j)
+! print *, rborncat(i,j),rborncat(j,i),(wqdipcat(k,i,j),k=1,2)
+! print *, alphapolcat(i,j),alphapolcat(j,i)
+! print *, (alphisocat(k,i,j),k=1,4),sigiso1cat(i,j),sigiso2cat(i,j),epsintabcat(i,j),debaykapcat(i,j)