气象程序设计及绘图期末复习.pptVIP

期 末 复 习 气象程序设计及绘图 学习目标 通过学习，了解FORTRAN语言的特点，基本成份及使用方法，具有阅读程序、编制程序、调试程序的基本能力。在此基础上，根据气象数据处理与分析的特点，切实地掌握用GrADS软件对数据进行图形化显示的基本方法，初步具备编程绘图的能力。 《气象程序设计及绘图》专业基础课 程序设计 FORTRAN语言 GrADS 绘 图 气象数据资料 分析 基本程序结构 program main implicit none integer real character complex logical FORTRAN程序设计 主程序开始 不采用I-N规则 变量（包括数组）申明 及初始化 基本程序结构 program main implicit none integer:: real:: character:: complex:: logical:: FORTRAN程序设计 主程序开始 不采用I-N规则 变量（包括数组）申明 及初始化 注意：character类型的使用方法 赋值语句 data 变量列表/初值列表/ read *,……… open(文件号，file=‘路径及文件名’) read(文件号，格式）。。。。 顺序结构 选择结构 循环结构 获取数据 程序算法 单分支 IF(条件) THEN IF块 END IF 双分支 IF（条件）THEN IF块 ELSE ELSE块 END IF 多分支 IF（条件1）THEN 块1 ELSE IF（条件2）THEN 块2 ELSE IF（条件3）THEN 块3 . . ELSE IF（条件n）THEN 块n [ELSE 块n+1] END IF 逻辑if语句 IF（条件） 语句 SELECT CASE （选择表达式） CASE（控制表达式1） 块1 CASE（控制表达式2） 块2 . . CASE（控制表达式n） 块n [CASE DEFAULT 默认块] END SELECT 可以相互嵌套 DO 循环变量 = E1，E2，E3 循环体 END DO R = MAX ( INT ( ( E2 - E1 + E3 ) / E3 )，0 ) DO WHILE (逻辑表达式) 循环体 END DO 可以相互嵌套 print *，输出列表 write(*,*) 输出列表 open(文件号，file=‘路径及文件名’) write(文件号，格式）。。。。 输出数据 注意：带格式的输入输出方式 二进制数据： open(文件号，file=‘路径及文件名’，form=‘binary’) read（文件号，格式）。。。。。 write(文件号，格式）。。。。 End [program main] 主程序结束 程序入口 需要被调用 子程序包括：函数子程序(function) 子例行程序(subroutine) 子程序又分为：外部子程序和内部子程序 外部函数子程序 由一个实现某种特定功能的子程序组成，调用程序单元调用它得到一个函数值 定义形式： [类型说明] FUNCTION 函数名([虚参1,虚参2,…]) 说明语句 执行语句 。。。 END [FUNCTION [函数名]] 表示函数子程序定义开始 表示函数子程序定义结束 外部子例行程序 子例行程序不仅可求一个值，还可求多个值或不求值而执行某种操作，因此具有更广泛的用途 定义形式： SUBROUTINE 子例行程序名([虚参1,虚参2,…]) 说明语句 执行语句 … END [SUBROUTINE [子例行程序名]] 表示子例行程序定义开始 表示子例行程序定义结束 调试FORTRAN程序 语法错误（syntax error）。如拼写错或标点符号错，在编译时被编译器检测出来； 运行错误（run-time error）。当程序执行时企图做非法运算操作，则发生运行错误（例如，除以0）。这些错误导致程序执行时异常中断。 逻辑错误（logical error）。程序能够正常编译和运行，但结果是错误的。 例题： 利用1951-2010年1月蒙古高压强度指数（data/h-p.dat）(备注：需要标准化以后使用)和1951-2010年1月中国160站气温资料(data/t1601.dat)（备注：实际存放