Blame view

templates/iroutine.txt 734 Bytes
33b83817   dumoda01   Depot du modele /...
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
!
! GOTM Internal Subroutine template.
!
! kbk - v1.0 - 991029.
!-----------------------------------------------------------------------
!BOP
!
! !IROUTINE: 
!
! !INTERFACE:
   SUBROUTINE 
!
! !DESCRIPTION:
   Please fill out here what happens in this routine - Latex accepted.
!
! !USES:
   List any modules used by this routine.
   IMPLICIT NONE
!
! !INPUT PARAMETERS:
   INTEGER, INTENT(IN)
!
! !INPUT/OUTPUT PARAMETERS:
   INTEGER, INTENT(INOUT)
!
! !OUTPUT PARAMETERS:
   INTEGER, INTENT(OUT)
!
! !REVISION HISTORY:
!  Author(s):
!  01Jan2000: Ver. ?.?.? (
!
! !LOCAL VARIABLES:
!
!EOP
!-----------------------------------------------------------------------
!BOC


   RETURN
   END SUBROUTINE

!EOC

!Copyright (C) 2000 - NAME