function fder=fder(lamda,dur,censor)

fder=-exp(lamda)*sum(dur);