| 查看: 2238 | 回复: 7 | |||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | |||
[求助]
fortran数组输出，行与列请教
|
|||
|
do j1=1,n do j2=1,n write(2,*)j1,j2,real(H0(j1,j2) enddo enddo 数组H0(N,N),这样输出的话，j1是行指标，j2是列指标吗？我想按照行输出，先输出第1行第j2列，然后依次输出。 |
回复此楼» 猜你喜欢
梦想
已经有8人回复
-
有多少人是今天查系统知道结果的？
已经有19人回复
-
面上合作单位盖章
已经有9人回复
-
面上函评意见出来了，像什么等级？
已经有17人回复
-
为什么国自然不能直接公布
已经有5人回复
-
学科评审组评审是指会评吗？
已经有4人回复
-
为什么资助数各大高校都创新高，自己申请怎么就这么难
已经有14人回复
-
小白求助 投论文要求的highlights应该如何写
已经有4人回复
-
麻烦专家们看看评委们的意见（F口面上）
已经有12人回复
-
怎么看青基中了没有啊
已经有6人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- fortran中数组的值发生变化
已经有3人回复
- fortran输出求助
已经有6人回复
- 求助：关于fortran建数组问题，谢谢！
已经有4人回复
- Fortran中数组的使用
已经有4人回复
- 请教 fortran 运行错误的原因
已经有13人回复
- Fortran的subroutine和function有什么区别，是在于输入输出的特点吗？
已经有13人回复
- 请教Fortran下如何给二维或三维数组赋初值，谢谢
已经有3人回复
- 请教一个fortran小程序编译出错的问题，谢谢
已经有9人回复
- Fortran中关于数组的变化
已经有5人回复
- 请教一下Visual fortran的project的head files 和 resources files的用处，谢谢
已经有5人回复
- Fortran的格式化输入输出问题
已经有14人回复
- fortran整数输出格式的问题
已经有8人回复
- 请教关于in cell形式向original形式坐标转化的fortran算法
已经有3人回复
- fortran两个问题，文件中的空格，屏幕同一行覆盖输出
已经有23人回复
- 【求助】FORTRAN写文件时每行开头都多了一个空格？
已经有6人回复
- 请教fortran导txt数据进origin问题
已经有1人回复
- 【求助】求指点，在Fortran里面，怎样实现“数组维度可调”的数组?
已经有5人回复
- 【求助】matlab读取fortran输出的txt文件【已解决】
已经有3人回复
|
我有个程序，里面要用到调用矩阵求逆的子函数， call ZGETRF( N, N, TA, N, IPIV, INFO ) call ZGETRI( N, TA, N, IPIV, WORK, N, INFO ) linux下，装的interfortran， /opt/intel/mkl/lib/intel64 这是intel64所在的目录，如果我想调用这两个库函数，该在后面加哪个命令呢？我打开这个目录看了，里面有好多，不知道该用哪个啊，是不是如果知道用哪个的话这样就可以了啊？ gfortran 222bylag.f –L/opt/intel/mkl/lib/intel64 -llibmkl_avx.so....... libmkl_avx2.so libmkl_intel_lp64.so libmkl_avx.so libmkl_intel_sp2dp.a libmkl_blacs_ilp64.a libmkl_intel_sp2dp.so libmkl_blacs_intelmpi_ilp64.a libmkl_intel_thread.a libmkl_blacs_intelmpi_ilp64.so libmkl_intel_thread.so libmkl_blacs_intelmpi_lp64.a libmkl_lapack95_ilp64.a libmkl_blacs_intelmpi_lp64.so libmkl_lapack95_lp64.a libmkl_blacs_lp64.a libmkl_mc3.so libmkl_blacs_openmpi_ilp64.a libmkl_mc.so libmkl_blacs_openmpi_lp64.a libmkl_p4n.so libmkl_blacs_sgimpt_ilp64.a libmkl_pgi_thread.a libmkl_blacs_sgimpt_lp64.a libmkl_pgi_thread.so libmkl_blas95_ilp64.a libmkl_rt.so libmkl_blas95_lp64.a libmkl_scalapack_ilp64.a libmkl_cdft_core.a libmkl_scalapack_ilp64.so libmkl_cdft_core.so libmkl_scalapack_lp64.a libmkl_core.a libmkl_scalapack_lp64.so libmkl_core.so libmkl_sequential.a libmkl_def.so libmkl_sequential.so libmkl_gf_ilp64.a libmkl_vml_avx2.so libmkl_gf_ilp64.so libmkl_vml_avx.so libmkl_gf_lp64.a libmkl_vml_cmpt.so libmkl_gf_lp64.so libmkl_vml_def.so libmkl_gnu_thread.a libmkl_vml_mc2.so libmkl_gnu_thread.so libmkl_vml_mc3.so libmkl_intel_ilp64.a libmkl_vml_mc.so libmkl_intel_ilp64.so libmkl_vml_p4n.so libmkl_intel_lp64.a locale |
6楼2012-12-27 21:09:39
jingjingdou
银虫 (小有名气)
- 应助: 5 (幼儿园)
- 金币: 571.5
- 红花: 3
- 帖子: 243
- 在线: 39.7小时
- 虫号: 2189750
- 注册: 2012-12-16
- 性别: MM
- 专业: 结构工程
【答案】应助回帖
★ ★ ★
感谢参与，应助指数 +1
田山东: 金币+2, ★★★很有帮助 2012-12-27 15:10:02
xzhdty: 金币+1, 谢谢参与 2012-12-27 21:17:16
感谢参与，应助指数 +1
田山东: 金币+2, ★★★很有帮助 2012-12-27 15:10:02
xzhdty: 金币+1, 谢谢参与 2012-12-27 21:17:16
|
这是do的嵌套循环，首先执行的是小循环，即： do j2=1,n write(2,*)j1,j2,real(H0(j1,j2) enddo 此次循环执行完毕在执行外部循环，即： do j1=1,n ………………………… enddo 数组H0(N,N)的输出即先输出第一行的所有元素（H0(1，j2)j2=1,…n），之后第二行（H0(2，j2),j2=1,…n)，直至第n行所有元素。 楼主的程序是按照您所说的顺序输出的。 只是这个“real(H0(j1,j2) ”是不是少了个括号，还是另有其他含义？  |
2楼2012-12-27 14:21:34
3楼2012-12-27 15:11:38
4楼2012-12-27 15:14:49
10