Page 93 - 6383
P. 93

Крім  того,  використання  Solver  дозволяє  об’єднати  в  одному  комплексі
               розроблені  раніше  програмні  модулі  з  автоматизації  реєстрації  результатів
               польових вимірів, створенні бази даних про осідання дефомаційних марок, аналізу і
               прогнозу  результатів,  створенні  звітної,  в  тому  числі  і  графічної  документації.
               Використання Solver дозволиляє, використовуючи код VBA, створити програму в
               вигляді  елемента  набору  AddIns  Excel,  яка  комплексно  автоматизує  як  процес
               опрацювання результатів спостережень, так і, при передачі її на інші комп’ютери,
               процес установки і знищення програми.

                                            Таблиця 20.1 – Перевірка роботи Solver
                                            Результати                              Результати
                                  Назви                  Результати  Приблизні
                                вузлових         з        Solver 1-й   значення       Solver
                                             підручник                              Експеримен
                                 реперів                  крок, мм     висот, мм
                                               а, мм                                   т, мм
                                    1            2            3            4             5
                                   93        189624,9    189624,902     189664      189624,801
                                   12        197939,5    197939,509     197939      197939,460
                                   02        190991,2    190991,244     190991      190991,139
                                   86        186297,6    186297,609     186297      186297,470
                                  [pvv]        314,5        314,47       317,20       314,50

                      Для  перевірки  правильності  роботи  в  Solver  виконують  зрівнювання
               нівелірної мережі з використанням даних, приведених в підручнику [6] ст.278. при
               умові [pvv] = min. Прийнявши виміряні значення перевищень і приблизні значення
               висот  вузлових  точок  такими  ж,  як  і  в  [5]  ([pll]=356,1),  одержали  результати,
               приведені  в  графі  3  таблиці  20.1.  Там  же  в  графі  2  приведені  значення  цих  же
               величин  з  тестового  прикладу  [6].  Як  бачимо,  в  межах  точності  обчислень,
               результати співпадають, що свідчить про правильність роботи програми.
                      Оскільки  при  написанні  програми  використовують  стандартний  набір
               функцій VBA для роботи з Solver, в тому числі і Solver Options, яка автоматично
               встановлює  параметри  рішення,  дослідження  проведять  з  метою  встановлення
               оптимальних величин цих параметрів. Використання різних методів пошуку (метод
               Ньютона  і  сполучених  градієнтів,  прямих  і  центральних  різниць)  дає  ідентичні
               результати при похибці обчислень, яку для прикладу (вихідні дані задавались в мм)
               прийнято рівною 0,001мм. Тому при обчисленнях можна повністю покластись на
               Solver і залишати ті значення параметрів, які вибираються автоматично.
                      Результати  зрівнювання  методом  найменших  квадратів  параметричним
               способом залежать від точності, з якою задані приблизні значення параметрів. Тому
               виконують перевірку залежності результатів урівнювання при використанні Solver
               від  цих  значень.  Для  прикладу  приведено  результати  повторного  зрівнювання
               мережі з [6], з використанням як приблизних значень зрівняних величин значень,
               одержаних на першому кроці зрівнювання (графа 3 табл.1). Результати зрівнювання
               збігаються  з  точністю  до  0,001  мм.  Проте,  якщо  приблизні  висоти,  використали
               значення,  наведені  в  графі  4  [pll]  =  317,2,  то  одержані  з  урівнювання  поправки
               відрізнялись      від    попередніх      до    0,2    мм     див.    графу      5   табл.1     ).






                                                              93
   88   89   90   91   92   93   94   95   96   97   98