TRANSPOSE 矩陣轉置 Tutorial for Lahey Fortran ; Lahey軟體教學範例

TRANSPOSE 矩陣轉置 program Program implicit none ! Place variable declarations here integer:: a(2,3)=reshape((/1,2,3,4,5,6/),shape(a)) write(*,'(2i3)') a ! writes 1 2 ! 3 4 ! 5 6 write(*,*) shape(a) ! writes 2 3 write(*,'(3i3)') transpose(a) ! writes 1 3 5 ! 2 4 6 write(*,*) shape(transpose(a)) ! writes 3 2 ! Place executable statements here end program Program High-performance Fortran compilers. Command, 操作指令示範; Application,應用示範; Introduction,簡介; Lahey Computer Systems, Inc. 原廠之官方網站: www.lahey.com Now Speak in Traditional Chinese by Pid Gau The best softwares reseller in Taiwan SoftHome International ; Software for Science 13F, NO. 55, SEC.1, CHIEN KUO N-ROAD, TAIPEI, 10491,TAIWAN ROC info@softhome.com.tw Tel: 886-2-25078298 Fax: 886-2-25078303 If you have good video examples and this software, and want to put into our channel. Please just send to us. We will translate into Chinese. Above video was demo by Our Engineer ; Mr. Pid Gau If you have any comment, Please just send email to our company If you want to sell your sofwares into Taiwan. Please contact with us. Lahey 本公司之專屬網站 http://lahey.softhome.com.tw/?page_id=80&product_id=35 本公司為 Lahey/Fujitsu Fortran 廠之授權經銷商 全傑科技股份有限公司 科學軟體世界 臺北市中山區建國北路一段五十五號十三樓 中華民國 臺灣 電話Tel: 02-25078298 傳真Fax: 02-25078303 以上操作由本公司之高金海先生說明示範,若有錯誤疏失,歡迎來電指正本軟體 如果您也有操作範例想放到本頻道,歡迎與我們聯絡,並將影片傳送過來 若您有需要購買本軟體 , 歡迎洽詢本公司 本軟體另有以下之服務 ;歡迎洽詢 1.教育訓練 2.技術服務 3.教學範例 4.動畫影片 本公司保證所銷售之軟體 皆為原版合法軟體 您可以傳一份,您想要分析的資料,給我們幫您試做看看 您可以到原廠網站下載試用版 http://www.lahey.com/downloads.htm You can view all video from our channel. 您可以連結以下網址,來預覽所有YouTube的教學影片 https://www.youtube.com/channel/UCOATM13sHkSoz0eK8Z0V9Zg 頻道簡介 ------------------------------------------ SoftHome International ; Software for Science 13F, NO. 55, SEC.1, CHIEN KUO N-ROAD, TAIPEI, 10491,TAIWAN ROC info@softhome.com.tw Tel: 886-2-25078298 Fax: 886-2-25078303 The best softwares reseller in Taiwan If you want to sell your sofwares into Taiwan. Please contact with us. Above video was demo by Our Engineer Mr. Pid Gau ソフトホームインターナショナル 科学のためのソフトウェア 台湾の最高のソフトウェア代理店 あなたのソファを台湾に売りたい場合。 私達に連絡してください。 上のビデオは私たちのエンジニアMr. Pid Gauによるデモでした SoftHome International; Software für die Wissenschaft Der beste Softwarehändler in Taiwan Wenn Sie Ihre Sofware nach Taiwan verkaufen wollen. Bitte kontaktieren Sie uns. Oben Video war Demo von unserem Ingenieur Mr. Pid Gau SoftHome International; Logiciel pour la science Le meilleur revendeur de logiciels à Taiwan Si vous voulez vendre vos logiciels à Taiwan. S'il vous plaît contacter avec nous. La vidéo ci-dessus était une démo de notre ingénieur M. Pid Gau SoftHome International; 과학 소프트웨어 대만 최고의 소프트웨어 대리점 당신이 당신의 소파를 대만에 팔고 싶다면. 우리와 연락하십시 影片內容附加 ----------------------------------------------------------------------------- ソフトホームインターナショナル 科学のためのソフトウェア 住所：13F、NO。 55、SEC.1、CHIEN KUO N-ROAD、TAIPEI、10491、TAIWAN ROC Email：info@softhome.com.tw Tel：886-2-25078298 Fax：886-2-25078303 台湾の最高のソフトウェア代理店 あなたのソファを台湾に売りたい場合。 私達に連絡してください。 上のビデオは私たちのエンジニアMr. Pid Gauによるデモでした SoftHome International; 과학 소프트웨어 주소 : 13F, NO. 55, SEC.1, CHIEN KUO N-ROAD, TAIPEI, 10491, TAIWAN ROC 이메일 : info@softhome.com.tw 전화 : 886-2-25078298 팩스 : 886-2-25078303 대만 최고의 소프트웨어 대리점 당신이 당신의 소파를 대만에 팔고 싶다면. 우리와 연락하십시오. 위 비디오는 엔지니어 인 Mr. Pid Gau의 데모입니다. SoftHome International; Software für die Wissenschaft Adresse: 13F, NEIN. 55, SEC.1, CHIEN KUO N-Straße, TAIPEI, 10491, TAIWAN ROC E-Mail: info@softhome.com.tw Tel: 886-2-25078298 Fax: 886-2-25078303 Der beste Softwarehändler in Taiwan Wenn Sie Ihre Sofware nach Taiwan verkaufen wollen. Bitte kontaktieren Sie uns. Oben Video war Demo von unserem Ingenieur Mr. Pid Gau SoftHome International; Logiciel pour la science Adresse: 13F, NO. 55, SEC.1, CHIEN KUO N-ROAD, TAIPEI, 10491, TAIWAN ROC Email: info@softhome.com.tw Tel: 886-2-25078298 Fax: 886-2-25078303 Le meilleur revendeur de logiciels à Taiwan Si vous voulez vendre vos logiciels à Taiwan. S'il vous plaît contacter avec nous. La vidéo ci-dessus était une démo de notre ingénieur M. Pid Gau SoftHome International; Программное обеспечение для науки Адрес: 13F, NO. 55, SEC.1, CHIEN KUO N-ROAD, TAIPEI, 10491, TAIWAN ROC Электронная почта: info@softhome.com.tw Тел.: 886-2-25078298 Факс: 886-2-25078303 Лучший реселлер программного обеспечения на Тайване Если вы хотите продать свои телефоны на Тайвань. Пожалуйста, свяжитесь с нами. Над видео была демонстрация нашего инженера г-на Пида Гау SoftHome International; Programvara för vetenskap Adress: 13F, NO. 55, SEC.1, CHIEN KUO N-ROAD, TAIPEI, 10491, TAIWAN ROC E-post: info@softhome.com.tw Tel: 886-2-25078298 Fax: 886-2-25078303 Den bästa mjukvaruförsäljaren i Taiwan Om du vill sälja dina sofwares till Taiwan. Vänligen kontakta oss. Ovanstående video var demo av vår ingenjör, Herr Pid Gau