MEDnPasdetemps.c
Aller à la documentation de ce fichier.00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019 #include <med.h>
00020 #include <med_config.h>
00021 #include <med_outils.h>
00022
00023 #include <string.h>
00024 #include <stdlib.h>
00025
00026
00027
00028
00029
00030 med_int
00031 MEDnPasdetemps(med_idt fid,char *cha,med_entite_maillage type_ent,
00032 med_geometrie_element type_geo)
00033
00034 {
00035 med_err ret;
00036 int n1;
00037 char nomdatagroup1[MED_TAILLE_NOM+1];
00038 char tmp1 [MED_TAILLE_NOM_ENTITE+1];
00039 char chemin [MED_TAILLE_CHA+(MED_TAILLE_NOM+1)+MED_TAILLE_NOM+1];
00040
00041
00042
00043
00044 _MEDmodeErreurVerrouiller();
00045 if (MEDcheckVersion(fid) < 0) return -1;
00046
00047
00048
00049
00050
00051 strcpy(chemin,MED_CHA);
00052 strcat(chemin,cha);
00053 strcat(chemin,"/");
00054
00055 if ((ret = _MEDnomEntite(nomdatagroup1,type_ent)) < 0)
00056 return -1;
00057 if ((type_ent != MED_NOEUD))
00058 {
00059 if ((ret = _MEDnomGeometrie30(tmp1,type_geo)) < 0)
00060 return -1;
00061 strcat(nomdatagroup1,".");
00062 strcat(nomdatagroup1,tmp1);
00063 }
00064 strcat(chemin,nomdatagroup1);
00065
00066 n1 =0;
00067 _MEDnObjets(fid,chemin,&n1);
00068
00069 return (med_int) n1;
00070
00071 }