Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы программирования на FORTRAN (ФОРТРАН)

Модерирует : ShIvADeSt

 Версия для печати • ПодписатьсяДобавить в закладки
Страницы: 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

Открыть новую тему     Написать ответ в эту тему

akaGM

Platinum Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Обсуждаются все вопросы, связанные с программированием на ФОРТРАН, как общего так и конкретного характера.
Постарайтесь дать как можно больше информации о возникшей проблеме -- это в конце концов в ваших же интересах чтобы вам помогли...

прежде чем просить помощи в задании
платное решение задач

ресурсы этого топика
ссылка на подборку ресурсов, собранных посетителями этого форума
 
то, чем мы решили поделиться
ссылка на страничку программ etc собственного изготовления, которыми любезно делятся наши форумчане


если вам вдруг не отвечают или ответ вас не устраивает
и вообще полезно прочитать всем спрашивающим
 
просьба к пишущим и отвечающим все большие листинги оформлять тегом more
и отключать графические смайлики при размещении фортран-кода

Всего записей: 24107 | Зарегистр. 06-12-2002 | Отправлено: 18:11 14-01-2007 | Исправлено: akaGM, 09:47 01-03-2020
FuzzyLogic



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
peppersley

Цитата:
СДелал так_ пишет просто лала и все.  

У вас:  open(unit=100,file='lala')
У меня:  open(unit=100,file=lala)
найдите два различия

Всего записей: 1920 | Зарегистр. 27-07-2002 | Отправлено: 09:27 06-06-2012
akaGM

Platinum Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
FuzzyLogic
либо я чего-то не понимаю, либо он уже всё поправил, либо одно из двух :)
 
peppersley
 

Цитата:
Сделал так
да плохо ты сделал...
 
тебе ж показали не только как правильно, но и как красиво...
на фиг такие длинные инструкции, пиши сначала в строку всё что надо, потом передавай её в open()
что красивее (а главное _понятнее_) выглядит, твоя строка или
 
open(12, FILE=filename, STATUS='NEW', SHARE='DENYRW', Form='FORMATTED')
 
и оставить "лалу" "лалой" тоже очень круто, но только в качестве благодарности...
 

Всего записей: 24107 | Зарегистр. 06-12-2002 | Отправлено: 12:51 06-06-2012 | Исправлено: akaGM, 12:59 06-06-2012
FuzzyLogic



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
akaGM

Цитата:
либо я чего-то не понимаю, либо он уже всё поправил, либо одно из двух  

Ну если пишет файлы с именем lala, то там явно просто кавычки лишние, это конечно только предположение но имхо вполне адекватное
 

Цитата:
и оставить "лалу" "лалой" тоже очень круто, но только в качестве благодарности...  

Дурная привычка, во всяких одноразовых мелких бяках которыми пользоваться не буду люблю подобные имена, поэтому есть целая куча файлов с именами zzz1.f, zzz2.f,.... в которых сплошные lalala и jujuju  

Всего записей: 1920 | Зарегистр. 27-07-2002 | Отправлено: 16:52 06-06-2012 | Исправлено: FuzzyLogic, 16:54 06-06-2012
akaGM

Platinum Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
FuzzyLogic
да понял я...
это он тихо поправил, правка часом позже твоего поста...
а про "лалу" не к тебе, а к нему претензия, чтобы на "самокомментированную" filename заменил...

Всего записей: 24107 | Зарегистр. 06-12-2002 | Отправлено: 17:33 06-06-2012
akaGM

Platinum Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
DPlot
практически полностью освоен (даже под дельфи, пишу разработчикам)...
для нас интересно следующее:
библиотека dplotlib.dll, кот. лежит в фортрановской директории, сильно кастрирована :)
для Интел Фортрана лучше пользоваться dplotlib.dll из директории msvc

Всего записей: 24107 | Зарегистр. 06-12-2002 | Отправлено: 11:58 08-06-2012 | Исправлено: akaGM, 15:05 08-06-2012
XPEHOMETP

Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Кастрация dplotlib.dll очевидна, и не подвергается сомнению. Там просто у разработчиков просматривается деление поддерживаемых языков на первый и второй сорт. С первым сортом мы выложим все доступные исходники, со всеми возможными вариантами, а во вторым - сами ни фига делать не будем, выложим то, что юзеры пришлют. В обмен за легальную лицензию на DPlot. Юзеры были не особо активны, хотя и постарались. Я отдаю им должное, они свою лицензию получили не за дарма. Но с этим потом работать - не фонтан. Я вот до сих пор использую в предельно минимизированной версии, почти тик в тик с образцом. Хотя понимаю, что это - проценты от возможного. Просто не доходят руки все освоить и довести до ума.

Всего записей: 2485 | Зарегистр. 21-06-2005 | Отправлено: 17:47 08-06-2012
akaGM

Platinum Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
я тоже хочу получить лицензию за сопряжение с дельфями,
а фортран отдам просто так, то есть даром :)

Всего записей: 24107 | Зарегистр. 06-12-2002 | Отправлено: 09:33 09-06-2012
sergsh_sergsh

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Есть задача открыть TIFF  из фортрана. ( gfortran  или ifort  или Portland )
Но нет пока решения ...
Может быть кто подскажет - как можно открыть TIFF   из фортрана ?
Может быть есть спец библиотеки для чтения файлов изображений ?
Буду очень благодарен за любые ссылки

Всего записей: 31 | Зарегистр. 09-01-2012 | Отправлено: 12:59 10-06-2012
karakurt2



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
sergsh_sergsh
libtiff?

Всего записей: 733 | Зарегистр. 06-12-2003 | Отправлено: 16:05 10-06-2012
sergsh_sergsh

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Спасибо !  
 
Библиотеку вреде установил.  
А может быть вы могли бы привести простой пример ее использования на фортране, типа открыть TIFF  и считать его весь в массив  ? ( с строкой компиляции в Linux ... ? )

Всего записей: 31 | Зарегистр. 09-01-2012 | Отправлено: 22:36 10-06-2012 | Исправлено: sergsh_sergsh, 00:17 11-06-2012
karakurt2



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Там в дистрибутиве нет простых примеров, чтобы мне было не лень переводить на Фортран. В качестве отправной точки возьмите содежание вот этого сообщения.

Всего записей: 733 | Зарегистр. 06-12-2003 | Отправлено: 01:13 11-06-2012
XPEHOMETP

Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Открывать всякие графические файлы в Фортране - большая морока.
 
Мелкомягкие, отказавшись от Фортрана, оказали ему плохую услугу: с любой визуализацией грабли! А ведь еще в ДОСовские времена дядя Билл с сотоварищами пытались сваять некие библиотеки, чтобы можно было Фортран использовать ну почти как Паскаль, с более-менее полноценной графикой. То ли продукт получился слишком глючным (хотя наверняка не без того), то ли еще что. Может, Мелкомягкие слишком активно кинулись в новой версии Фортрана все то же самое делать через WinAPI. Все с теми же глюками, плюс добавленные новые. А потом, вместо того чтобы кропотливо работать над ошибками, дядя Билли просто продал свой фортранный бизнес. Если уж создатель операционки не довел дело со зрительным представлением до разума, то что ожидать от его последователей!
 
Никакая визуализация в Фортране ни коим образом не регламентирована. Всякий производитель дует в свою дуду, как может. В силу этого никакая стандартизация здесь просто не реальна. Стандартизация не возникает на пустом месте, она должна взять и закрепить некую сложившуюся практику в программировании. В данном случае, она (стандартизация) будет вынуждена взять сторону некого пропиетарного варианта в отличие от других столь же пропиетарных вариантов. Производители которых, ежели они вдруг станут лузерами, людей, одобривших такой вариант стандарта, просто затаскают в суд. И снимут с них пенензы по полной. В силу того что GNU абсолютно не заинтересована в разработке отдельной визуализации по Фортрану (там Фортран - просто некоторое дополнение к GCC), независимой некоммерческой реализации нет и, похоже, уже не будет. Которую можно было бы взять за некий стандарт, не поддержанный коммерчески, в силу чего никакой суд не сочтет принятие такого стандарта нечестной конкурентной борьбой.
 
Мелкомягкие имели шанс продавить свой подход к визуализации хотя бы как преимущественный под Windows, чисто по практике. И то - полустандарт. Если бы довели его до ума.  
 
ЗЫ: Некогда (лет 8 назад, наверно), прочел в интернете, что американские законодатели хотели сделать Visual Basic стандартом для научных расчетов вместо Фортрана. Долго смеялся. С одной стороны - кому надо? С другой - понятно, чьи там уши растут, просто наглая протекция и лоббирование. С визуализацией в Фортране - все наоборот. Вроде, и всем надо, но не ушастых вариантов что-то нет. Может, просто вообще никаких разумных вариантов нет.

Всего записей: 2485 | Зарегистр. 21-06-2005 | Отправлено: 16:26 11-06-2012 | Исправлено: XPEHOMETP, 16:41 11-06-2012
terminat0r



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
sergsh_sergsh
а что дальше предполагается делать с рисунком в фортране?
я бы не заморачивался на вашем месте с фортраном генерируя интерфейсы к функциям с libtiff.h а нaписал бы на C  необходимую функцию которая считывает файл в массив а уже потом используя interoperability с С передал бы этот массив в фортран.

Всего записей: 2084 | Зарегистр. 31-03-2002 | Отправлено: 18:28 11-06-2012
Vostrikovskiy

BANNED
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
При использовании -double_size:128 скорость счета падает в среднем на порядок. Кто-нибудь знаком с эффективными алгоритмами расчета с четверной точностью?

Всего записей: 403 | Зарегистр. 19-11-2008 | Отправлено: 16:22 12-06-2012
terminat0r



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Vostrikovskiy

Цитата:
При использовании -double_size:128 скорость счета падает в среднем на порядок. Кто-нибудь знаком с эффективными алгоритмами расчета с четверной точностью?

Что значит эффективный алгоритм? Вы собрались писать свою библиотеку? Тогда начинать смотреть надо с gmp/mpir или QD/MPFUN90/DDFUN90
 
Когда-то тут была бурная дискуссия по этой теме. Помню сошлись на том, что без CPU железки поддерживающей 128 бит операции, считать с такой точностью очень утомительно.

Всего записей: 2084 | Зарегистр. 31-03-2002 | Отправлено: 17:29 12-06-2012 | Исправлено: terminat0r, 17:38 12-06-2012
Vostrikovskiy

BANNED
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
terminat0r
 

Цитата:
Что значит эффективный алгоритм?

 
 Более быстрый. А дискуссию 2004 года я читал. Да, 128 бит на уровне железа поддерживает ITANIUM.  
 Мне для численного вычисления гессиана с нужной мне точностью 2-ой точности не хватает. За ссылки спасибо: вроде gmp только целочисленную арифметику поддерживает.

Всего записей: 403 | Зарегистр. 19-11-2008 | Отправлено: 19:52 12-06-2012
akaGM

Platinum Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Vostrikovskiy
может, если не хватает ~10^-16, надо подумать о перенормировке?
 
sergsh_sergsh
тебе что надо-то на выходе получить? ХУ в тифе для статьи?
 
XPEHOMETP

Цитата:
Мелкомягкие, отказавшись от Фортрана, оказали ему плохую услугу:

ну не знаю, не знаю...
как говорится, что не делается, делается к лучшему...
слава богу, ни в одном языке нет "стандартных средств визулизации", вообще всю переферию надо отключить, ещё не хватало чтобы (пусть даже в виндовом фортране) появились "стандартных средства" работы с каким-нибудь хрен-боксом...
а кому надо...
вот интелы, КвикВин до сих пор поддерживают, да и работа с ВинАПИ совершенно по накатанной идёт

Всего записей: 24107 | Зарегистр. 06-12-2002 | Отправлено: 11:48 13-06-2012 | Исправлено: akaGM, 11:54 13-06-2012
Vostrikovskiy

BANNED
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
akaGM

Цитата:
может, если не хватает ~10^-16, надо подумать о перенормировке?

Что Вы имеете в виду? С понятием перенормировки я знаком как физик-теоретик, но как эту теорию приложить к вычислению матрицы частных производных второго порядка по двум переменным (в том числе и смешанных производных) путем численного дифференцирования функции, для которой не существует аналитического представления, ума не приложу. Может Вы говорите о масштабировании переменных? В моем случае это мало помогает.

Всего записей: 403 | Зарегистр. 19-11-2008 | Отправлено: 15:32 13-06-2012
akaGM

Platinum Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Vostrikovskiy
ну в частности да...
что у тебя за гессиан, целевая функция / на два параметра задачи?
параметр длина можно измерять в микронах, а можно и в парсеках...
если задача плохо обусловленная или параметризация не совсем того, то увеличинение точности не поможет, физ.-мат модель надо пересматривать...
и вообще существует масса безгессиановых и безградиентных методов...
 
 

Цитата:
Может Вы говорите о масштабировании переменных? В моем случае это мало помогает.

и об этом тоже...
у меня решалась отимизационная задача методом ЛМ (короче, NL2SOL) в параллелепипеде, и фиг чего... перешёл в куб -- и всё ок

Всего записей: 24107 | Зарегистр. 06-12-2002 | Отправлено: 15:47 13-06-2012 | Исправлено: akaGM, 15:48 13-06-2012
terminat0r



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Vostrikovskiy
Ну если вам понравилось то вот еще
http://myweb.lmu.edu/dmsmith/FMLIB.html
http://jblevins.org/mirror/amiller/#quad

Всего записей: 2084 | Зарегистр. 31-03-2002 | Отправлено: 17:06 13-06-2012
Открыть новую тему     Написать ответ в эту тему

Страницы: 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 (ФОРТРАН)


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru