MED fichier: Fichier source de medflibrary.f

MED fichier

medflibrary.f
Aller à la documentation de ce fichier.
1 C* This file is part of MED.
2 C*
3 C* COPYRIGHT (C) 1999 - 2021 EDF R&D, CEA/DEN
4 C* MED is free software: you can redistribute it and/or modify
5 C* it under the terms of the GNU Lesser General Public License as published by
6 C* the Free Software Foundation, either version 3 of the License, or
7 C* (at your option) any later version.
8 C*
9 C* MED is distributed in the hope that it will be useful,
10 C* but WITHOUT ANY WARRANTY; without even the implied warranty of
11 C* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 C* GNU Lesser General Public License for more details.
13 C*
14 C* You should have received a copy of the GNU Lesser General Public License
15 C* along with MED. If not, see <http://www.gnu.org/licenses/>.
16 C*
17
18 subroutine mlbclo(cret)
19 c DEC$ ATTRIBUTES DLLEXPORT :: mlbclo
20 c
21 implicit none
22 save
23 c
24 integer cret
25 integer mlbfclo
26 c
27 cret = mlbfclo()
28 c
29 return
30 end
31
32
33
34 subroutine mlbnuv(major,minor,rel,cret)
35 c DEC$ ATTRIBUTES DLLEXPORT :: mlbnuv
36 c
37 implicit none
38 save
39 c
40 integer major, minor, rel
41 integer cret
42 integer mlbfnuv
43 c
44 cret = mlbfnuv(major,minor,rel)
45 c
46 return
47 end
48
49
50 subroutine mlbstv(version,cret)
51 c DEC$ ATTRIBUTES DLLEXPORT :: mlbstv
52 c
53 implicit none
54 save
55 c
56 character*(*) version
57 integer cret
58 integer mlbfstv
59 c
60 cret = mlbfstv(version,len(version))
61 c
62 return
63 end
64
65
66
67 subroutine mlbhnv(major,minor,rel,cret)
68 c DEC$ ATTRIBUTES DLLEXPORT :: mlbhnv
69 c
70 implicit none
71 save
72 c
73 integer major, minor, rel
74 integer cret
75 integer mlbfhnv
76 c
77 cret = mlbfhnv(major,minor,rel)
78 c
79 return
80 end
81
82
83 subroutine mlbhsv(version,cret)
84 c DEC$ ATTRIBUTES DLLEXPORT :: mlbhsv
85 c
86 implicit none
87 save
88 c
89 character*(*) version
90 integer cret
91 integer mlbfhsv
92 c
93 cret = mlbfhsv(version,len(version))
94 c
95 return
96 end
mlbnuv
subroutine mlbnuv(major, minor, rel, cret)
Renvoie les 3 numéros de version de la librairie MED.
Definition: medflibrary.f:35
mlbhsv
subroutine mlbhsv(version, cret)
Renvoie le numéro de version de la librairie HDF utilisée par la bibliothèque MED dans une chaîne de ...
Definition: medflibrary.f:84
mlbclo
subroutine mlbclo(cret)
Cette routine force l'écriture des données sur disque, nettoie la mémoire et ferme tous les fichiers ...
Definition: medflibrary.f:19
mlbstv
subroutine mlbstv(version, cret)
Renvoie le numéro de version de la librairie MED dans une chaîne de caractères.
Definition: medflibrary.f:51
mlbhnv
subroutine mlbhnv(major, minor, rel, cret)
Renvoie les 3 numéros de version de la librairie HDF5 utilisée par MED.
Definition: medflibrary.f:68