海洋环流模式LICOM的GPU实现与优化

张留莹,王鹏飞,张峰,刘海龙,林鹏飞,王涛,韦俊林,田少博,姜金荣,迟学斌

The Implementation and Optimization of LICOM on GPUs

Zhang Liuying,Wang Pengfei,Zhang Feng,Liu Hailong,Lin Pengfei,Wang Tao,Wei Junlin,Tian Shaobo,Jiang Jinrong,Chi Xuebin

表1 Fortran版本的程序片段

Table 1 Fortran version of vinteg function

Example: vinteg.F90 25 DO IBLOCK = 1, NBLOCKS_CLINIC 26 DO K = 1, KM 27 DO J = 1, JMT 28 DO I = 1, IMT 29 WK2(I,J,IBLOCK) += DZP(K) * OHBU(I,J,IBLOCK) * WK3(I,J,K,IBLOCK) * VIV(I,J,K,IBLOCK) 30 END DO 31 END DO 32 END DO 33 END DO