program precedenceOp
! this program checks logical operators
implicit none
! variable declaration
integer :: a, b, c, d, e
! assigning values
a = 20
b = 10
c = 15
d = 5
e = (a + b) * c/d ! ( 30 * 15 )/5
print *, "Value of (a + b) * c/d is : ", e
e = ((a + b) * c)/d ! (30 * 15 )/5
print *, "Value of ((a + b) * c)/d is : ", e
e = (a + b) * (c/d); ! (30) * (15/5)
print *, "Value of (a + b) * (c/d) is : ", e
e = a + (b * c)/d; ! 20 + (150/5)
print *, "Value of a + (b * c)/d is : " , e
end program precedenceOp
由于没有Fortran 代码块的输入,因此用PYthon代码块进行简单的说明介绍!
一. 输入(WRITE)和输出(PRINT)命令
PROGRAM ex0401 # !程序开始 ex0401 是自定义的名称
write(*,*) "hello" # !主程序代码
stop # 程序结束(这一行可以忽略)
end # 主程序代码结束
write(*,*) "Hello"
*--第一个✳号代表输出的位置,通常默认为屏幕
*--第二个*号代表不特别输出格式
在写程序时常常会有一些代码块需要经常使用, 我们可以将其封装起来,封装好后的代码块可以统一调用,减少代码的书写量,提高程序的可读性、拓展性等。
1. 子例程 (subroutine)
1.1 语法
封装一个子例程按如下语法封装
subroutine subroutine_name([argument1[, argument2, ..., argumentn]])
argument_type1 :: argument1
argument_type2 :: argument2
https://blog.csdn.net/tyskfs2/article/details/48859857
详细的字典教程:
https://www.yiibai.com/fortran/fortran_data_types.html#article-start
由于是快速入门, 所以就不进行详细的字典级别介绍了, 仅记录常用部分, 充分利用触类旁通的特性
基本程序结构:
program program_name
implicit none
二维ising模型是一种物理模型,描述了一个二维平面上的粒子之间的相互作用。Fortran语言是一种比较古老的编程语言,但其在科学计算领域仍有很广泛的应用。
在编写二维ising模型的Fortran程序时,首先需要定义模型中的参数和变量,如温度、自旋、相互作用能等。然后,需要实现模型的哈密顿量函数,该函数描述了系统的总能量和自旋之间的相互作用。通过计算哈密顿量可以得到系统相对稳定的状态。接着,需要使用Metropolis算法或其他随机算法,对系统进行Monte Carlo模拟,随机改变自旋状态,以达到能量最低状态。最后,通过计算自旋的平均值、磁矩等物理量,来分析模型的性质和行为。
Fortran语言在处理数据时效率较高,可以进行大规模的计算和模拟,使得计算得到的结果更加精确。但其语法较为复杂,需要较长的学习和适应阶段。此外,Fortran语言在处理图形界面方面的功能较差,需要通过其他工具进行结果展示。
综上所述,通过使用Fortran语言编写二维ising模型程序,可以实现对系统相互作用和能量的计算和分析,这对于解释物理现象和探究材料的特性具有重要意义。