摘要：
不能简单的用：print *, 'a'而应该加上:CALL MPI_BARRIER(MPI_COMM, ierr);print *, 'a' 阅读全文
摘要：
从光标位置开始，处理单词后半部分capitalize-word (M-c) -- 首字母改为大写upcase-word (M-u) -- 全部改为大写downcase-word (M-l) -- 全部改为小写从光标位置开始，处理单词前半部分negtive-argument; capitalize-word (M-- M-c)negtive-argument; upcase-word (M-- M-u)negtive-argument; downcase-word (M-- M-l)改变选定区域的大小写downcase-region (C-x C-l) -- 选定区域全部改为小写upcase-. 阅读全文
摘要：
有时候表达式或者语句太长，有时候为了美观，需要将一行代码写在几行，这时候就需要换行（续行）符号，...,，空格+三个点+逗号，注意别丢了空格，还有就是英文状态下输入。eg:a=b1+c1+ ..., b2+c2; 阅读全文
摘要：
program test real, dimension(5) :: x integer :: n x = (/1., 2., 4., 3., 1./) n = maxloc(x) + 1 print *, nenda.f90(5): error #6366: The shapes of the array expressions do not conform. [N] n = maxloc(x) + 1----^compilation aborted for a.f90 (code 1)因为，maxloc的输出值是数组即使p是一个一维数组即使maxloc(p)输出只有一个值但是... 阅读全文
摘要：
./CMakeLists.txt:cmake_minimum_required (VERSION 2.6)project (inversion Fortran)set(CMAKE_Fortran_COMPILER "mpif90")set(CMAKE_AR xiar) # for -iposet(CMAKE_LINKER xild) # for -ipomessage(STATUS "xiar: " ${CMAKE_AR})message(STATUS "xild: " ${CMAKE_LINKER})set(CMAKE_LIBRAR 阅读全文
摘要：
（1）对于字符串变量，每次调用时都要重新初始化，否则保留上一次的结果。subroutine sub1 character(len=80) :: str1 str1 = 'abc' ! necessary .... if (condition) str1 = 'cba' ... if(str1(1:3)=='cba') ... ...endprogram main ... do i=1, n ... call sub1 ... end doend如果没有那步初始化，而... 阅读全文
摘要：
CMakeLists.txtcmake_minimum_required (VERSION 2.6)project (steihaug Fortran)set(CMAKE_Fortran_COMPILER "ifort")set(exe_name a)set(mklib /opt/intel/mkl/lib/intel64)set(mklin /opt/intel/mkl/include/intel64/lp64)include_directories(${mklin})link_directories(${mklib})set(flags "-O3 -xSSE3 阅读全文