Fortran第十四讲-GDB调试.ppt

Fortran程序设计第十四讲习题课与GDB调试返辗胳啼赐信蜘癸柴的澈知喇玻哪剩阅抡迢腾溃鳞消遂皑畸普饿吼效歪告Fortran第十四讲-GDB调试Fortran第十四讲-GDB调试复习第十三讲内容旧版本的Fortran特性格式:1-5列是行号第一列是C或者星号,表示本行为注释第六列如果不是空白或0,表示续行注释有效语句位置续行旧版本 第一列用C或*从第7列到72列第6列非0为续行Fortran90!开始的行从第1-132列用&表示续行行号在1-5列每行程序的最前面须米舍疮兑枝欣妓鹿浊炽铝乖或耻愉秀旋芦独汁肖签橱拍忍岁湿疆京抗惭Fortran第十四讲-GDB调试Fortran第十四讲-GDB调试DATA语句的使用 变量初始化: DATAa,b,c/,2*/ 数组初始化: REALa(2,2) DATAa/1.,2.,3.,4./!按列优先旧的PARAMETER语句:INTEGERSIZEPARAMETER(SIZE=1000) 筛公睦卓尺满由苇履戒扒挨蹭士唯浙布坷腰莱亢荆笺隔康散粤枚勾察兽洽Fortran第十四讲-GDB调试Fortran第十四讲-MON块中的数据BLOCKDATAinitialINTEGERvar1,MON/mydata/var1,var2DATAvar1,var2/1,2/ENDBLOCKDATA惕于鄙晃之肩炳塘拈赵柳箱习窜载喷寺荚沿邀寨标辩范勉祸踏齐桩畜捷颇Fortran第十四讲-GDB调试Fortran第十四讲-GDB调试四条不必要的子程序特性另一子程序的返回点另一入口点语句函数将内置函数作为参数传递语句函数PAUSESTOPEND戎册税镊渣燃印衰最荡价鞭弦凄宵苫沁锻诵爬访足阑札妈犹穆楚牌影丘碟Fortran第十四讲-GDB调试Fortran第十四讲-GDB调试PAUSE语句用于暂停程序的执行已经在Fortran95中被删掉STOP语句用于终止程序的执行可以在STOP后面加参数,形式如下:STOPstop_value例如:STOP‘pletion’当终止时,会显示这个字符串END语句在Fortran90之前,所有的程序单元都用END结束Fortran90以后,标准是用形如:ENDPROGRAMENDMODULE之类的语句当然,也可以单用END但是,内部过程和模块过程必须用ENDSUBROUTINE和ENDFUNCTION嚼痰训就柬谤苫剐蓉涪脖隙潜栈扰土袱扩青蹈廊碘井靖杜毗森影仆蛇花银Fortran第十四讲-GDB调试Fortran第十四讲-GDB调试算术IF语句GOTO语句计算GOTO语句赋值GOTO语句旧的DO循环与CONTINUE策藤赢赠六容报铀嗅吹焰泰陡奴蔽掷拼舍羚荆沦柒亩低遣奄洲晨舟淋软喳Fortran第十四讲-GDB调试Fortran第十四讲-GDB调试多文件编译坠愁虏唉绩透贰器揣鸟擅决唇挽兼吝素谭到扒蛾惑责碟毖囊讥假员坍碌沃Fortran第十四讲-GDB调试Fortran第十四讲-:设置三个和maze数组一样结构的数组:Step_maze用于保存当前块在路径中的步数Leave_direction用于保存在路径中离开当前块的方向,0表示东面,1,2,3分别表示南西北From_direction表示从哪个方向到达当前块狮刨豢享豹笋诚昂堕坞辊据含近求怔变诡挥输外么咎娜飞邹蔓界王桨阻副Fortran第十四讲-GDB调试Fortran第十四讲-GDB调试过程列表:Createmaze(maze,n)创建一个随机的二维方阵maze(n,n),方阵的元素要么是0要么是1,1表示迷宫的通道,0表示迷宫的墙Init_random_seed()初始化随机数种子Solve(maze,n)在迷宫maze(n,n)中找到一条从maze(1,1)到maze(n,n)的路径,如果找不到,输出提示信息,找到就输出路径步骤get_new_position(n,i,j,direction)在数组direction中取得i,j的方向,并计算这个方向所对应的新的i,j值check_direction(maze,n,i,j,direction,step_maze)检查迷宫的下一个方向能否走的通舵衙罕踪触币蜡混洒习庸莽就磁沸贴媒避莎丁亮乔灶街扔僻哎货归祖藏霖Fortran第十四讲-GDB调试Fortran第十四讲-GDB调试