rpm_seek.f90

来自「国外大名顶顶的“台风”并行计算流体力学CFD软件的早期版本的源代码」· F90 代码 · 共 5 行

!------------------------------------------------------------------------------!
! procedure : seekrpmblock                Auteur : J. Gressier
!                                         Date   : Avril 2002
! Fonction                                Modif  :
!   Recherche le pointeur d'un block donn