摘要：PROGRAM parallel_01 USE omp_lib IMPLICIT NONE INTEGER :: i,j INTEGER(4) :: time_begin, time_end, time_rate REAL, DIMENSION(1:50,1:50) :: f, g REAL :: k WRITE(*,*) '开始进行... 阅读全文

摘要：在delphi和intel fortran下实证过。 阅读全文

摘要：http://fcode.cn/guide-58-1.html 阅读全文

摘要：此函数库提供了 Visual Fortran 上获取硬盘ID，CPU编号，windows安装时间及文件头部校验的四个函数。可用于简单的程序加密。（但切勿用于商业性很强的地方） 近期，不少朋友向笔者询问 Fortran 如何获得网卡地址，硬盘ID，CPU编号等。对此，笔者给出一个自己书写的简单的函数库 阅读全文

摘要：以前写了个获取硬盘序列号的fortran程序，但未经实证 program FortranDemo Use Kernel32 Implicit None Interface SUBROUTINE GetDiskSerialNumber1(drive, pout, ... 阅读全文

摘要：前言 C#发展到现在，已是一门相当完善的语言，他基于C语言风格，演化于C++。并依靠强大的.NET底层框架。C#可以用来快速构建桌面及Web应用。然而在我们的实际工作中，尽管C#已经非常完善，但还是不能完成我们所有的工作。在很多工程计算中，C#语言的计算速度，精度，以及执行效率相对来说都达不到项目的 阅读全文

摘要：本代码实现在WGS84系统的大地坐标（BLH）和空间直角坐标（XYZ）的互相转换，符合标准语法，可直接使用如下代码，输出为：WGS84: -2175790.73969891 4461032.11207734 3992337.79032463 BLH: 38.9999999999998 116.000... 阅读全文

摘要：一些朋友总是咨询关于二进制文件的读写和转化。这里就我自己的理解说一说。一).一般问题 二进制文件与我们通常使用的文本文件储存方式有根本的不同。这样的不同很难用言语表达，自己亲自看一看，理解起来会容易得多。因此，我推荐学习二进制文件读写的朋友安装一款十六进制编辑器。这样的编辑器有很多，在我们的 C... 阅读全文

摘要：一.Fortran 字符串与C字符串的区别Fortran的字符串处理能力其实很弱，关于字符串的语法还很落后。它与C字符串最大的区别就是：Fortran字符串是固定长度的，没有 \0结束符。另外，Fortran也不区分字符和字符串。即 'abc'与 "abc"是没有差别的。二.Fortran字符串的定... 阅读全文

摘要：先贴一段别人总结好的：格式化输出的控制字符非常的丰富，但常用的并不多，一般说来:" I 、F、E、A、X "是最常使用的几个格式，最好把它们都记下来。Iw[.m]以w个字符的宽度来输出整数，至少输出m个数字。如：write(*,"(I5)") 100 输出：_ _100 ; 前面两空格Fw.d以w个... 阅读全文

摘要：一.winteracter是什么？为什么要用VS代替wide？winteracter 是一款强大的 Fortran 图形界面函数库，可方便的用 Fortran 生成GUI界面，对话框，菜单，绘图等操作。支持 windows/Linux/Mac 上的绝大多数编译器。具体可参考本站文章介绍>>>其自带 ... 阅读全文

摘要：http://pan.fcode.cn/ 阅读全文

摘要：program main !sms网格转换成mike21网格 DIMENSION X(60000),Y(60000),H(60000),NDNN(110000,3),ncbd(10000) dimension NBS(50),NOBD(5000,50),NSED(5000,50),id0(80000),nbi(50) dimension x0(50000),y0(50000),h0(50000) character*2 a*2,b*2,gnn*3,demo*500 open(3,file='./2013.8.30(after).grd',status='o... 阅读全文

摘要：subroutine basis_function_b_val ( tdata, tval, yval )!!*******************************************************************************!!! BASIS_FUNCTION_B_VAL evaluates the B spline basis function.!!! Discussion:!! The B spline basis function is a piecewise cubic which! has the properties tha... 阅读全文

摘要：如下：Real time_begin , time_end1 , time_end2Integer i , jcall CPU_TIME(time_begin)write(*,*) time_begindo j = 1 , 30 Do i = 1 , 300000000End Do call CPU_TIME(time_end1) write(*,*) j , time_end1 , time_end1 - time_beginend docall CPU_TIME(time_end2)write(*,*) 't' , time_end2 , time_end2 - time_ 阅读全文

摘要：OpenMP for Fortran OpenMP Directive Syntax of OpenMP compiler directive for Fortran: !$OMP DirectiveName Optional_CLAUSES... ... ... Program statements between the !$OMP lines ... are executed in parallel by all threads ... !$OMP END DirectiveName Program statements between the 2 re... 阅读全文

摘要：Beginning OpenMPOpenMP provides a straight-forward interface to write software that can use multiple cores of a computer. Using OpenMP you can write code that uses all of the cores in a multicore computer, and that will run faster as more cores become available.OpenMP is a well-established, standard 阅读全文

摘要：以下例子来自https://computing.llnl.gov/tutorials/openMP/exercise.html网站一、打印线程（Hello world）C******************************************************************************C FILE: omp_hello.fC DESCRIPTION:C OpenMP Example - Hello World - Fortran VersionC In this simple example, the master thread forks a ... 阅读全文

摘要：什么是OpenMP?“OpenMP (Open Multi-Processing) is an application programming interface (API) that supports multi-platform shared memory multiprocessing programming in C, C++ and Fortran on many architectures, including Unix and Microsoft Windows platforms. It consists of a set of compiler directives, lib 阅读全文

摘要：比如程序：program main implicit none write(*,*) "AAAAAAAAAAAAAAAAAAAAAAAA" stop end虽然可以看见DOS窗口显示AAAAAAAAAAAAAAAAAAAAAAAA，不过是一闪而过，请问怎样解决呢？解答：stop的上一行加pause。 比如程序：program main implicit none write(*,*) "AAAAAAAAAAAAAAAAAAAAAAAA" pausestop end 阅读全文