GCC Code Coverage Report
Directory: ./ Exec Total Coverage
File: phylmd/iotd_fin.F90 Lines: 0 3 0.0 %
Date: 2023-06-30 12:56:34 Branches: 0 0 - %

Line Branch Exec Source 
1
 

    
      SUBROUTINE iotd_fin

    


    

    
2

    
    

    
      IMPLICIT NONE

    


    

    
3

    
    

    

    


    

    
4

    
    

    
!=======================================================================

    


    

    
5

    
    

    
!

    


    

    
6

    
    

    
!   Auteur:  F. Hourdin

    


    

    
7

    
    

    
!   -------

    


    

    
8

    
    

    
!

    


    

    
9

    
    

    
!   Objet:

    


    

    
10

    
    

    
!   ------

    


    

    
11

    
    

    
!   Light interface for netcdf outputs. can be used outside LMDZ

    


    

    
12

    
    

    
!

    


    

    
13

    
    

    
!=======================================================================

    


    

    
14

    
    

    

    


    

    
15

    
    

    

    


    

    
16

    
    

    
      INCLUDE "netcdf.inc"

    


    

    
17

    
    

    
      INCLUDE "iotd.h"

    


    

    
18

    
    

    
      integer ierr

    


    

    
19

    
    

    

    


    

    
20

    
    

    
!   Arguments:

    


    

    
21

    
    

    
!   ----------

    


    

    
22

    
    

    

    


    

    
23

    
    

    
      ierr=NF_close(nid)

    


    

    
24

    
    

    

    


    

    
25

    
    

    
      END

    


  

  


  

    

    
Generated by: GCOVR (Version 4.2)