C_Desc.c 158 Bytes
Newer Older
1
2
3
4
5
6
7
8
9

#include <stdlib.h>
#include <stdio.h>
#include "ISO_Fortran_binding.h"

void C_Desc ( CFI_cdesc_t *A_DV )
  {
  printf("A_DV.rank: %d\n", A_DV->rank );
  }