MEDnFam.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 med_int
00027 MEDnFam(med_idt fid,char *maa)
00028 {
00029 med_idt datagroup,famid;
00030 med_err ret;
00031 char chemin[MED_TAILLE_MAA+MED_TAILLE_FAS+MED_TAILLE_FAS_ENTITE+2*MED_TAILLE_NOM+1];
00032 char stockage[MED_TAILLE_MAA+MED_TAILLE_FAS+MED_TAILLE_FAS_ENTITE+2*MED_TAILLE_NOM+1];
00033 med_int n;
00034 int n_tmp;
00035 int num;
00036 char famille[MED_TAILLE_NOM+1];
00037 int nfamnoe,nfammai;
00038
00039
00040
00041
00042
00043 _MEDmodeErreurVerrouiller();
00044 if (MEDcheckVersion(fid) < 0) return -1;
00045
00046
00047 strcpy(chemin,MED_MAA);
00048 strcat(chemin,maa);
00049 strcat(chemin,MED_FAS);
00050
00051 n_tmp = 0;
00052 _MEDnObjets(fid,chemin,&n_tmp);
00053 n = (med_int ) n_tmp;
00054
00055
00056 strcpy(stockage,chemin);
00057 strcat(stockage,MED_FAS_NOEUD);
00058 n_tmp = 0;
00059 if ((ret =_MEDnObjets(fid,stockage,&n_tmp)) == 0) {
00060 n --;
00061 n += (med_int ) n_tmp;
00062 }
00063
00064
00065 strcpy(stockage,chemin);
00066 strcat(stockage,MED_FAS_ELEME);
00067 n_tmp = 0;
00068 if ((ret =_MEDnObjets(fid,stockage,&n_tmp)) == 0) {
00069 n --;
00070 n += (med_int ) n_tmp;
00071 }
00072
00073 return (med_int) n;
00074 }
00075