BS put formulat