borrow.const: Borrowing Constraints
In mirtaher/TwoPeriodSim: Two period model risk sharing using the collective model

This function finds the max and min amount of savings given a specific income shocks parameters and individual family (i) and specific repetition (r). If income sgocks pars are not specified by defualt the values in the param function would be adopted. First, it checks whether the incomes are NAs, whuch in this case just returns two NAs. Otherwise, the minimum savings (max borrowing) in the first period is the minimum realized second period income in simulation in the state of marriage and divorce for each of spouses. The minimum of these three anounts, i.e. min second period income in the state of divorce for husband, wife, and family if tehy decide to stay married, would constitute as the min savings. In addition, an starvation consumption in the second period (which specifies by tol variable) sets aside. The maximum saving is the whole total first period income after setting aside the starvation consumption in the first period.

1 2	borrow.const(i, r, sigma_eta_h = param()$sigma_eta_h, rho = param()$rho, phi = param()$phi)

`i`	The marriage index
`r`	First period repetition. It is not necessary to be greater than one for the first period. It is needed for taking expectaions, which is required in the second period
`sigma_eta_h`	The husband's variance of transitory shock. If not specified the default is the baseline value specified in the param()
`rho`	The contemporaneous correlation coefficient of the husband and wife income shocks. If not specified the default is the baseline value specified in the param()
`phi`	The ratio of the wife's standard deviation of the transitory shock to that of the husband. If not specified the default is the baseline value specified in the param()