val calculate_correlation :
Base__Float.t Base.List.t ->
Base__Float.t Base.List.t ->
Base__Float.tval calculate_adf_statistic :
Base__Float.t Base.List.t ->
Base__Float.t * floatval estimate_half_life : Base__Float.t Base.List.t -> Base.Float.ttype cointegration_result = {is_cointegrated : Base.bool;trace_statistic : Base.float;critical_value_95 : Base.float;correlation : Base.float;
}