call reada(weightcard,"V2SS",v2ss,7.61d0)
call reada(weightcard,"V3SS",v3ss,13.7d0)
call reada(weightcard,"EBR",ebr,-5.50D0)
+ call reada(weightcard,"DTRISS",dtriss,1.0D0)
+ call reada(weightcard,"ATRISS",atriss,0.3D0)
+ call reada(weightcard,"BTRISS",btriss,0.02D0)
+ call reada(weightcard,"CTRISS",ctriss,1.0D0)
dyn_ss=(index(weightcard,'DYN_SS').gt.0)
do i=1,maxres
dyn_ss_mask(i)=.false.