reprise.f90

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

!------------------------------------------------------------------------------!
! MODULE : REPRISE                        Auteur : J. Gressier
!                                         Date   : Decembre 2002
! Fonction                                Modif  :
!   Definition des unites d'entrees/sorties du programme TYPHON
!   Definition des procedures d'ecritures
!
! Defauts/Limitations/Divers :
!
!------------------------------------------------------------------------------!

module REPRISE

use TYPHMAKE   ! Definition de la precision

implicit none

! -- Variables globales du module -------------------------------------------



! -- DECLARATIONS -----------------------------------------------------------


! -- INTERFACES -------------------------------------------------------------


! -- Fonctions et Operateurs ------------------------------------------------


! -- IMPLEMENTATION ---------------------------------------------------------
!contains


endmodule REPRISE