+ call reada(weightcard,'WVDWPP_NUCL',wvdwpp_nucl,1.0D0)
+ call reada(weightcard,'WELPP',welpp,1.0d0)
+ call reada(weightcard,'WVDWPSB',wvdwpsb,1.0d0)
+ call reada(weightcard,'WELPSB',welpsb,1.0D0)
+ call reada(weightcard,'WVDWSB',wvdwsb,1.0d0)
+ call reada(weightcard,'WELSB',welsb,1.0D0)
+ call reada(weightcard,'WBOND_NUCL',wbond_nucl,1.0D0)
+ call reada(weightcard,'WANG_NUCL',wang_nucl,1.0D0)
+ call reada(weightcard,'WSBLOC',wsbloc,1.0D0)
+ call reada(weightcard,'WTOR_NUCL',wtor_nucl,1.0D0)
+ call reada(weightcard,'WTORD_NUCL',wtor_d_nucl,1.0D0)
+ call reada(weightcard,'WCORR_NUCL',wcorr_nucl,1.0D0)
+ call reada(weightcard,'WCORR3_NUCL',wcorr3_nucl,1.0D0)