/* Trend detection */

->
Arg File_name : String

- ReadCSV >Array< File_name ( 'R Cols :
                                        R = <
                                              Date : Cols.1
                                              Open : Cols.2, High  : Cols.3
                                              Low  : Cols.4, Close : Cols.5
                                            >
                            )

Do i = 1 to 2
 What_to_inspect = DT_DAY_OF_MONTH [ i = 1 ] | DT_DAY_OF_WEEK
 Days_around = 2 [ i = 1 ] | 1

 - Calculate >Distances< Array What_to_inspect Days_around,
   Sort >Report< Distances SORT_ASC ( 'Order_by Key Value : Order_by = Key ),
   Print Report (DayWithMaxTrendWaveDifference Report)
;

/
