Andrew10 Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору vaulin 2n**3/3 - это для полнозаполненных матриц. А для трехдиагональных - как у Вас и получалось, разница по скорости должна быть не более, чем в два раза. Что касается библиотечной функции метода прогонки, то для комплексных неэрмитовых матриц вряд ли Вы ее найдете в известных библиотеках. Поскольку в этом случае устойчивость при использовании метода прогонки не гарантирована, то создатели библиотек предпочитают устойчивость скорости .     Для собственных нужд я бы посоветовал использовать собственную программу, если она протестирована и Вы ей доверяете. Если неустойчивость проявится в какой нибудь задаче, это сразу будет видно. Другой дело, если программа пишется для посторонних людей. Здесь я бы выбрал надежность, а не скорость. Всего записей: 780 | Зарегистр. 26-02-2005 | Отправлено: 09:46 21-10-2008

vaulin Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Andrew10 Спасибо большое за ответ! Есть над чем подумать. Не совсем понял, что Вы понимаете под устойчивостью. Видимо, имеются в виду ситуации, когда знаменатель прогоночных коэффициентов альфа/бетта обращаются в нуль? Но ведь для этого достаточно проверить определенные соотношения между весовыми коэффициентами! Тем более, что это значительно упрощается, когда весовые коэффицинты во всех уравнениях одинокавые (как в случае для схемы Кранка-Николсон). Да даже если не одинаковые, проверку провести недолго. У меня еще вопрос, если не затруднит Что-то не могу наладить фортрановский компилятор для консоли, т.е. не получается работать с командой df (у меня установлен CVF 6.5). Раньше работало, а потом почему-то перестало. Хотя даже систему переустанавливал - не помогает. Например, простенькая программа в файле examples.for: program examples  print*,'Hello!!!' endprogram examples   В командной строке задаю: DF examples.for Выдает следующее: /subsystem:console   /entry:mainCRTStartup   /ignore:505   /debugtype:cv   /debug:minimal   /pdb:none   C:\DOCUME~1\dfor.lib   libc.lib   dfconsol.lib   dfport.lib   kernel32.lib   /out:examples.exe   LINK : warning LNK4001: no object files specified; libraries used LINK : warning LNK4068: /MACHINE not specified; defaulting to IX86 dfor.lib(DFORMAIN.OBJ) : error LNK2001: unresolved external symbol _MAIN__ examples.exe : fatal error LNK1120: 1 unresolved externals   Заранее благодарен! Всего записей: 80 | Зарегистр. 16-10-2008 | Отправлено: 11:13 24-10-2008

vaulin Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору akaGM Спасибо большое за ответ! Цитата: что-то ты только ошибки линкера приводишь, компилятор-то отрабатывает нормально? раньше, как я понимаю, и компилятор ошибку выдавал, якобы не может найти библиотеку   Цитата: C:\DOCUME~1\dfor.lib   а сейчас не выдает!? Может это из-за странного такого пути  C:\DOCUME~1\dfor.lib ? Что за DOCUME~1? Хотя в dfvars.bat всё, вроде бы, нормально прописано: ... set DFDir=C:\Program Files\Microsoft Visual Studio\DF98 set VCDir=C:\Program Files\Microsoft Visual Studio\VC98 ... set INCLUDE=%DFDir%\INCLUDE;%VCDir%\INCLUDE;%INCLUDE% set LIB=%DFDir%\LIB;%VCDir%\LIB;%LIB% ... Цитата: и вообще говоря, лучше не df.exe напрямую звать, а скриптами   типа   mydf.bat: Если не секрет, чем лучше? Вообще, я на прямую df и не использую, я в Far проассоциировал эту команду с расширением *.for, а в ассоциации прописал df !.for и без всяких call ...\dfvars.bat, и всё работало. Как я понимаю, df сам вызывает dfvars.bat. Кстати, попробовал написать скрипт, который Вы посоветовали: Цитата: mydf.bat:     Код:call ГДЕ_ТАМ_ТВОЙ_CVF_УСТАНОВЛЕН\BIN\dfvars.bat   df %1 %2 %3 %4 %5 %6 %7 %8 %9   но результат был тем же самым Еще раз спасибо!     Добавлено: Andrew10 Цитата: для комплексных неэрмитовых матриц ... устойчивость при использовании метода прогонки не гарантирована А можно ссылочку? Всего записей: 80 | Зарегистр. 16-10-2008 | Отправлено: 14:00 24-10-2008

vaulin Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору akaGM Цитата: это дос-имя директории   C:\Documents and Settings\твой_юзер_name\.и так далее.\dfor.lib   посмотри где она там лежит?   Похоже, в ней всё и дело, потому что эта библиотека лижит у меня всего в двух местах:   C:\Documents and Settings\dfor.lib и C:\Program Files\Microsoft Visual Studio\DF98\LIB\dfor.lib (сижу под "Администратор"). А где прописывается эта самая Цитата: это дос-имя директории   ? в dfvars.bat этого нет ... в переменных среды тоже нет   Цитата: у меня много компиляторов на диске, ну ооочень много... одних фортранов штук...   щас... (IF, LF, g95, gfortran) -- во! аж 4 штуки...   и каждому этому гаду нужны свои установки и пасы, вот я их динамически в батчи и выставляю...   прикольно, а каким образом динамически прописываете? Цитата: нормально-то нормально, а они у тебя есть вообще?   98-ю кто ставил, сам компак или кто?   ну да, есть, на своем месте. DF98 ставил сам Compaq Цитата: берёшь и копируешь dfvars.bat в super_test.bat.   и в конец копии вставляешь строку   df.exe example.for   запускаешь этот super_test.bat и...   смотришь на результат...   проделал всё, что Вы посоветовали, но ... результат тот же самый   Andrew10 Цитата: Неустойчивость возникает, если ведущие коэффициенты малы, что приводит к появлению больших коэффициентов в матрицах L и U, на которые разлагается исходная матрица в методе исключения Гаусса... А, Вы про метод Гаусса говорили, я подумал, что про прогонку. Ну с метод Гаусса то понятно, что там за неустойчивость. Дело в том, что я имею дело с трехдиагональными неэрмитовыми матрицами (схема Кранка-Николсон численного решения параболического уравнения) и там устойчивость гарантируется при соблюдении условия |c(j)|<=|a(j)|+|b(j)|, где a(j)y(j-1)-c(j)y(j)+b(j)y(j+1)=f(j) - система ур-ий. Но за ссылочки всё равно спасибо! не будут лишними. Цитата: Посоветовал бы установить CVF6.6C оппа!? у меня имеется только "CV Fortran upgrade from v6.5 to v6.6.exe" и "CVF-66-66B.exe"; и где такое можно взять, если не секрет? Цитата: Я для работы из командной строки запускаю из программного меню Fortran Command Prompt честно говоря, с этим не знаком, но весьма любопытно.   Еще раз большое спасибо за ответы!     Всего записей: 80 | Зарегистр. 16-10-2008 | Отправлено: 08:15 27-10-2008

vaulin Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Andrew10 Цитата: Это и есть диагональное преобладание. Только вроде знак неравенства должен быть другой (>=)?   понятно. да, знак там, действительно, другой. Спасибо за Upgrade, скачал, но установлю позже, т.к. программа на счете.   Добавлено: Цитата: Я для работы из командной строки запускаю из программного меню Fortran Command Prompt, при этом открывается окно консоли, в которой все пути и переменные среды установлены. В этом окне запускаю Far и работаю сделал, как Вы посоветовали и ... та же самая история, один в один ... не помогло     Добавлено: А вот если оформить файл examples.for  в виде проекта, то все нормально работает!? ... только это уже не командная строка Всего записей: 80 | Зарегистр. 16-10-2008 | Отправлено: 11:41 27-10-2008

vaulin Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Andrew10 Спасибо большое, что не полинились проделать это! Цитата: Создайте каталог для временных файлов просто в корне, например c:\tmp,  установите (в окне Fortran Command Prompt ДО запуска Far-а, если он запускается)   >set TMP=c:\tmp   Far запускается нормально из Prompt. Сделал как Вы посоветовали: в Prompt до запуска Far выполнил set TMP=c:\tmp, проверил set TMP, установилась, запустил Far и в нем df ...; вот результат ) : Compaq Visual Fortran Optimizing Compiler Version 6.5 Copyright 2000 Compaq Computer Corp. All rights reserved.   example.for Microsoft (R) Incremental Linker Version 6.00.8447 Copyright (C) Microsoft Corp 1992-1998. All rights reserved.   /subsystem:console   /entry:mainCRTStartup   /ignore:505   /debugtype:cv   /debug:minimal   /pdb:none   obj2462.tmp   dfor.lib   libc.lib   dfconsol.lib   dfport.lib   kernel32.lib   /out:example.exe   LINK : fatal error LNK1104: cannot open file "TEMPFILE"   akaGM   Цитата: не понятно каким боком Компак задействовал директорию С:\DOCUME~1\...   поместив туда свою системную dfor.lib?   ведь она общая, а не твоя локальная...   может действительно надо просто его аккуратно перепоставить... да кто бы знал. Переставлял, и не раз. Может, действительно, при установке я где-то забываю указть кириллицу или что-то в этом роде, не знаю ... Цитата: думаю, чтоvaulin сам скопировал туда dfor.lib после первой неудачной попытки запуска df возможно, точно не помню, хотя ... да, точно, сейчас убрал оттуда dfor.lib и он выдал ошибку, кот. выдавал давным давно сразу после установки /subsystem:console   /entry:mainCRTStartup   /ignore:505   /debugtype:cv   /debug:minimal   /pdb:none   C:\DOCUME~1\dfor.lib   libc.lib   dfconsol.lib   dfport.lib   kernel32.lib   /out:example.exe   LINK : fatal error LNK1181: cannot open input file "C:\DOCUME~1\dfor.lib"   ерунда какая-то   Добавлено: Andrew10 * полЕнились   Добавлено: Хм, ... поменял в Пуск->Настройка ... ->Переменные среды пользователя Администратор с "c:\Docum...\Админ..." на "c:\WINNT\Temp" (без кириллицы) под Fortran Command Promt всё заработало! Пишешь df example.for и всё работает! а вот в Windows по-прежнему не работает   Добавлено: Ура!!! Andrew10 и akaGM всё, сделал! Действительно, Andrew10, Вы были правы, дело оказалось в том, что переменная TMP содержала кириллицу. Когда менял эти переменные в Windows через Настройки - Панель управления - ..., то, по какой-то причине, они не обновлялись. Пришлось вручную прописать в командной строке: set TMP=c:\WINNT\TEMP. Видимо, команда df хранит эти системные переменные где-то в оперативке, или кэше, наверное ... не знаю ... в общем они не обновлялись, пока не прописал вручную. Слава Богу! Большое Вам спасибо за помощь и содействие! да благословит вас Господь! Всего записей: 80 | Зарегистр. 16-10-2008 | Отправлено: 07:41 29-10-2008

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы программирования на FORTRAN (ФОРТРАН)

Переход по форумам  Закладки   » Компьютеры Цифровое изображение Программы Microsoft Windows UNIX Другие OS Hardware В помощь сисадмину Прикладное программирование Игры Форумные игры   » Интернет Web-программирование В помощь вебмастеру Графика Хостинг Зацените-ка!   » Тематические Ikonboard v.2 Ikonboard v.3 Invision Board Другие форумы PHP-Nuke и другие порталы Мобила   » Общие Спорт Флейм Темы по региональным встречам Музыка и Кино Юмор Литература и Живопись   » Ru.Board Новости Помощь по форуму   » Андеграунд eBookz Варезник Раздачи и акции Мобильный варезник Андеграунд Игры и фильмы   » Специальные Тестирование