作者查詢 / fragmentwing
作者 fragmentwing 在 PTT [ Fortran ] 看板的留言(推文), 共173則
限定看板:Fortran
看板排序:
全部C_Chat41674Gossiping22607HatePolitics13270Military8475C_ChatBM2590StarCraft1754WomenTalk1725Kaohsiung1296joke1065UmaMusume789Aquarium725Marginalman697Boy-Girl635StupidClown567movie511Warfare472nCoV2019437Physics348SENIORHIGH286marvel272Math224Tainan179Paradox174Fortran173Suckcomic172YOLO171AC_In161PokemonGO128DataScience127GUNDAM124Stock123Tech_Job121C_GenreBoard99L_TalkandCha64DummyHistory59historia59MusicGame57Teacher57Steam56marriage50Python46Violation44graduate43Beauty42juniorhigh37Shana34PublicIssue30TypeMoon28LightNovel27SRW26C_BOO25NBA24NTU24specialman23BabyMother22Galaxy19CFantasy18ACGN_stock17L_SecretGard17Salary17MobileComm16Test16Child_Psy15Japan_Travel15MenTalk15IA14medstudent14TigerBlue14Hamster13Windows13AI_Art12Hunter12LoL12PokeMon12NCKU11ONE_PIECE11Statistics11car10PttEarnMoney10TW-history10WOW10AfterPhD9C_and_CPP9PlayStation9Baseball8Chemistry8Electronics8gallantry8KOTDFansClub8Shadowverse8About_Life7Aviation7Hearthstone7home-sale7Militarylife7TaichungBun7DIABLO6Examination6GossipPicket6PublicServan6ScienceNote6StarWars6Touhou6TY_Research6Vocaloid6AntiVirus5biker5ChangHua5FATE_GO5FBG5Hualien5Kyoto_Ani5L_TaiwanPlaz5Little-Games5PCReDive5RumikoTWorld5aqua-shop4ArakawaCow4CrossStrait4dog4Hate4Isayama4KanColle4Lifeismoney4mobilesales4NARUTO4nb-shopping4NEMS4NSwitch4P2PSoftWare4PhD4sex4Soft_Job4StarTrek4studyteacher4wearefriends4Anti-Cancer3battlegirlhs3BB-Love3BlizzHeroes3Chen-Hsing3Conan3Doraemon3fastfood3HK-movie3KoreaStar3NCTU_TALK3Olympics_ISG3PingTung3politics3Ptt-Press3rent-exp3Shu-Lin3ShuangHe3speech3Tokusatsu3TPC_Police3Wanhua3WarCraft3WorldCup3AirForce2Aves2book2C_WorkBoard2Childhood2China-Drama2Christianity2Comic2CVS2DMM_GAMES2e-shopping2gay2GHIBLI2GirlComics2HSNU_8202japanavgirls2Japandrama2JinYong2JOJO2kochikame2L_LifePlan2MGL-history2NCYU_Fst_982NHK2OverWatch2PC_Shopping2PttBug2PuzzleDragon2Railway2Sijhih2SongShan2SurvivalGame2Taoyuan2Vtuber2Women_Picket2worldtrigger2youtuber2YUGIOH2AboutBoards1Acad-Affairs1AllTogether1Anchors1Arknights1asciiart1ask1AzurLane1Badminton1BanG_Dream1BBSmovie1BigBanciao1Buddha1C_Chemistry1C_Question1CareerPlan1cat1ChainChron1Chan_Mou1chicken1Civil1CODE_GEASS1Cruise1cute1DigiCurrency1EAseries1EatToDie1Ecophilia1Elephants1Evangelion1FinalFantasy1FISH-FRIEND1FishShrimp1Food_Safety1FTV1GBF1Gintama1GL1GlassNoKamen1GO_FATE1Google1Gov_owned1H-GAME1hololive1Hsinchu1HsinTien1hypermall1Insurance1Interdiscip1iOS1J-PopStation1kawaii1Keelung1KMT1KMU1KR_Buzz1kugimiya1LAW1Lawyer1LCD1Learn_Buddha1LTK1Malaysia1Master_D1MdnCNhistory1media-chaos1Miaoli1mobile-game1Mongolia1MRT1Nangang1Neihu1NetSecurity1NEURO1NHU_LD921Nurse1Old-Games1Palmar_Drama1part-time1Pingpong1prozac1PttHistory1Rayark1Rockman1RockMetal1RTS1SakuraWars1SAN1Sangokumusou1SCPS85-4131seiyuu1SlamDunk1SMSlife1soho1soul1SouthPark1stationery1SuperHeroes1SYSOP1TakahashiRie1talk1TamShui1TAXI1Tennis1THU_Talk1TKU_EE_92C1TWproducts1WorkinChina1Yunlin1YUYUHAKUSHO1ZeroTsukaima1<< 收起看板(309)
1F推: 老實說我看不太懂你的程式碼11/26 00:55
2F推: 1不過我記得是有很奇耙的技巧11/26 00:57
3F→: 會故意少輸入東西來跑11/26 00:57
4F推: 但問題是 我記得那個案例是用項在順序上跑的差異11/26 01:00
5F→: 來進行操作 而不是針對同一項內的陣列進行操作11/26 01:00
6F→: 還有 你的N怎麼從陣列變成整數了11/26 01:04
7F→: 這不是不會給過嗎?11/26 01:04
8F→: 它不是對到INGT(IST2, 1)這一項嗎?11/26 01:05
9F推: 阿哩 好像找到了 我拍一下11/26 01:11
10F推: http://i.imgur.com/8oUs7kH.jpg11/26 01:12
11F→: http://i.imgur.com/3lTyH84.jpg11/26 01:13
12F→: http://i.imgur.com/6bhNAPF.jpg11/26 01:14
13F→: 好像是這個?雖然書上說很常用,不過我沒用過,這樣11/26 01:15
14F→: 交接起來會有麻煩吧w11/26 01:15
15F→: 我都手動寫程式碼來降維的11/26 01:21
24F推: 收到推11/30 14:44
25F→: 另外我果然還需要精進阿......11/30 14:44
1F推: 沒碰過這問題 不過稍微查了下09/23 21:32
2F→: 跟INCLUDE有關係 可能你的環境沒裝好09/23 21:32
3F→: 或是你的編譯器和你的檔案版本不一09/23 21:34
4F→: 你的版本是不是f77 上網找 f90是D_QDAG09/23 21:36
5F→: 你的版本是不是f77 上網找 f90是D_QDAG09/23 21:36
6F推: dqdag ERRABS和ERRREL這邊是雙精度轉實數誤差?09/23 21:42
7F→: 可是精度誤差 第一原來有編譯器會抓第二這不該讓程09/23 21:45
8F→: 式跑不動啊09/23 21:45
9F推: 由於沒有你的程式碼 我建議把include那行刪掉 但是09/24 11:21
10F→: 你的程式運作的目的應該就是使用include的東西09/24 11:21
11F→: 另一個可能的改法是 根據maxsub相關的敘述 你必須去09/24 11:21
12F→: 更動maxsub的陣列大小 最好是改成動態配置 如果位09/24 11:21
13F→: 於副程式(subroutine )內,就是在宣告時以(:)進09/24 11:21
14F→: 行宣告,問題是include的東西能不能改也是個問題09/24 11:21
15F→: https://docs.roguewave.com/imsl/fortran/6.0/math09/24 11:22
16F→: /default.htm?turl=qdag.htm09/24 11:22
17F→: 根據這個網站內提供的程式碼 error tolerances09/24 11:23
18F→: ERRABS = 0.009/24 11:23
19F→: 這個可能也要改09/24 11:23
6F→: 等等 你改變寫法後 nne有改用allocate 去宣告嗎09/15 14:12
7F→: 因為照你的說法 好像是延用原本的陣列宣告?09/15 14:12
8F→: 但是照理來說 這種方式沒有改用動態陣列 編譯器不會09/15 14:14
9F→: 給過才對09/15 14:14
10F→: 好 回去複習以前寫的 應該是用(:)或是在副程式內自09/15 14:27
11F→: 己宣告parameter也都可 但我不清楚樓主是不是有用後09/15 14:27
12F→: 者的寫法09/15 14:27
23F→: intent90就有 可是那個對於本來的fortran使用方式而09/17 22:41
24F→: 言很難搞09/17 22:41
25F→: 話說原來到2003都跟別人反著來 別人都特別用指標才09/17 22:43
26F→: 傳址 就fortran預設傳址XD 然後搞得Fortran的指標有09/17 22:43
27F→: 點微妙09/17 22:43
3F推: 還沒看仔細 不過牽涉到讀檔09/15 00:14
4F→: 先來猜是因為FORTRAN的換行讀檔問題09/15 00:15
5F推: 目前比較在意的是CLOSE的部分 應該都有寫在迴圈內吧09/15 00:20
6F推: 超怪 NNE是輸入用的 怎麼會被改變09/15 00:32
7F推: 可惡 真的看不出來 只不過既然是第七層09/15 00:42
8F→: 我覺得還有一個可能原因09/15 00:42
9F→: 有書上說FORTRAN最多只能宣到七維的陣列09/15 00:43
10F→: 該不會是因為造成這個限制的原因?09/15 00:43
11F→: 另外那本書上的版本是到f9009/15 00:44
12F→: 在想會不會牽涉到背後的機制了09/15 01:06
13F→: 樓主附的程式碼應該就只有少j那行的do而已09/15 01:06
14F→: 應該不會構成我們解讀上的錯誤才對09/15 01:07
15F→: 阿阿還有close 可是如果是close出問題09/15 01:08
16F→: 不會第七次才出現問題啊09/15 01:08
17F→: 樓主 我問一個很過分的問題09/15 07:24
18F→: 樓主知道在fortran 不管是function 或是subroutine09/15 07:24
19F→: 其變數改變也會改變主程式的變數這件事吧 說到fort09/15 07:24
20F→: ran最異於其他程式語言就是這點了09/15 07:24
21F推: 我覺得樓主很快就會需要建立fortran對c的對照表XD09/15 14:20
22F→: continue goto target 一堆東西都不一樣 尤其指標相09/15 14:20
23F→: 關最誇張 而且FORTRAN 可是從1開始的異世界 其他語09/15 14:20
24F→: 言陣列宣告從第零項居多09/15 14:20
25F→: 當初學fortran時有些概念的問題需要請教 然後教我的09/15 14:22
26F→: 人是學C++的 兩邊對話起來都要稍微翻譯一下成對方的09/15 14:22
27F→: 語言寫法w09/15 14:22
1F推: 有疑惑+1 有的則是沒else卻又不是一行寫完05/02 09:51
2F→: 然後你的問題應該改成if不成立do是否會執行吧05/02 09:53
3F→: 不然就算if跟do的狀況分開,if沒執行do還是會執行啊05/02 09:53
4F→: 另外編譯器好像do if的end常常會當同一種東西05/02 09:53
5F→: 明明就是do沒end卻回報if出問題……05/02 09:54
6F→: 喔喔,原來是因為手機版拆成兩行05/02 09:55
7F→: 這樣我可以回答你05/02 09:55
8F→: 這其實可以寫成05/02 09:56
9F→: if(邏輯成立)執行a05/02 09:56
10F→: 有時候那個then不拔掉編譯還不給過05/02 09:57
11F→: 當if寫成一行時,是可以不用end if的05/02 09:59
12F→: 另外,這樣當然與下一行的do沒關係 這個if只是判斷05/02 09:59
13F→: 要不要讓k輸入999而已05/02 09:59
14F→: kk05/02 09:59
15F推: 補充一點,學C的朋友跟我是我,do這種行代碼寫法根05/02 10:13
16F→: 本是在整人05/02 10:13
17F→: 是“跟我說”……自動選字的鍋05/02 10:14
18F→: 另外fortran的行代碼應用很廣,write read 的format05/02 10:16
19F→: 格式、 do 迴圈和goto都有05/02 10:16
20F→: 其實還挺好奇哪些用同樣行代碼會撞到哪些不會05/02 10:16
21F→: 猜測write和goto不會撞的可能性最高05/02 10:16
22F→: equivalence不熟,dimension只是宣告成矩陣寫法,我05/02 10:21
23F→: 也習慣這樣寫,會比單純各別宣告成例如a(10:10)還要05/02 10:21
24F→: 明顯是矩陣05/02 10:21
25F→: integer,dimension(10:10) :: a,b,c05/02 10:21
26F→: 這樣a,b,c都是10*10的二維矩陣05/02 10:21
27F→: 應該說是陣列05/02 10:22
5F推: 推個 我終於看明白這個的用處了04/18 11:20
6F→: 上上次程式作業別人寫了50行而已 雖說有自找麻煩的04/18 11:20
7F→: 成份在 不過為了做出以不停成長的矩陣來記錄數據的04/18 11:20
8F→: 方法 我總共打了300多行04/18 11:20
1F→: 我目前是猜說一個副程式會一直call別的副程式到最後04/17 15:38
2F→: 的return 可是當call自己時因為此時這個副程式是被c04/17 15:38
3F→: all的 所有他其實會先再讀一行得到return後04/17 15:38
4F→: 先記住自己被call這件事,副程式消滅 call副程式04/17 15:38
5F→: 所以名稱用recursive 的用意是讓這個遞迴程式會在ca04/17 15:39
6F→: ll 自己時,有特別往下讀一行來return04/17 15:39
9F→: 不行喔 我一開始就是call自己後的return省略,導致04/18 10:58
10F→: 矩陣運送莫名爆掉(該遞迴設計上只會依據輸入x,y在04/18 10:58
11F→: 矩陣的某一格填入3,結果發生填到integer上限的狀況04/18 10:58
12F→: 顯示格式我設計(19i2) ,然後就一堆星號)04/18 10:58
13F→: 再比對一次彭國倫的77/90那本上的遞迴if寫法,把ret04/18 10:58
14F→: urn在call自己那行的底下加上去才正常04/18 10:58
15F→: 與其說省略,應該說是沒注意到04/18 10:59
16F→: 矩陣運送>矩陣運算04/18 11:00
17F→: 而且就算是普通的subroutine 最後也還是要放個retur04/18 11:05
18F→: n04/18 11:05
28F→: 特殊需求該不會是矩陣乘法吧04/16 12:23
3F→: 不行欸 上網找解釋是一定要有明確格式才可以用 所以04/15 19:42
4F→: 如果用do或隱式迴圈都不行 除非我有辦法把文字塞入04/15 19:42
5F→: 矩陣用aw輸出 但要是可以根本就不需要no advance 啦04/15 19:43
6F→: 我只能朝modle試試看了04/15 19:45
7F→: module04/15 19:45
8F→: 嘗試後才發現 矩陣可以存文字04/15 20:23
9F→: 總之成功啦 用write(*,10)04/16 12:17
10F→: 10 format(5a2)就可以輸出了04/16 12:17
4F→: FW.D代表以11個字元寬度輸出浮點數(w)04/14 15:01
5F→: 以11個字元寬度輸出小數部分(d)04/14 15:02
6F→: 然後你還要考量到有個小數點04/14 15:02
7F→: 那爆炸是理所當然的啦04/14 15:02
8F→: 你連小數點的空間都沒給他喔04/14 15:03
9F→: 你跑的結果超詭異 REX0707那個結果才正常04/14 15:04
10F→: 該不會是沒放STOP所以一直跑的問題?04/14 15:10
11F→: 雖然rex0707也沒放 可是會不會是編譯器的差異?04/14 15:10
14F→: 我知道 所以我才在猜會不會是編譯器的差異04/14 17:10