contrib/natgrid/Src/natgridmodule.c
void print_float(int size, char *title, float *data)
{

  int n;               /* data counter */
  int line;            /* counter to insert a line after each six numbers */
  float *d;            /* pointer to increment through data */

  d = data;
  line = 0;

  printf("\n%s\n", title);

  for(n=0; n<size; n++) {
    printf("%10.3e", *d);
    d++;
    line++;

    if(line == 8) {          /* add newline after writing 8 numbers */
      printf("\n");
      line = 0;
    }
  }
}
/********************************************************************************
* Function:  print _float.c
*
*  Procedure: Uses 10.3e format to write 6 numbers per line
*  Purpose:   write ascii data for one horizontal field or one cross section
*
*  Passed:    Data, pointer to start of data
********************************************************************************/
print _float.c
Procedure: Uses 10.3e format to write 6 numbers per line
Purpose:   write ascii data for one horizontal field or one cross section

Data, pointer to start of data
print _float . c Procedure : Uses 10 . 3e format to write 6 numbers per line Purpose : write ascii data for one horizontal field or one cross section Data pointer to start of data
void print_float(int size, char *title, float *data)
{
  int n;               
  int line;            
  float *d;            
  d = data;
  line = 0;
  printf("\n%s\n", title);
  for(n=0; n<size; n++) {
    printf("%10.3e", *d);
    d++;
    line++;
    if(line == 8) {          
      printf("\n");
      line = 0;
    }
  }
}
void print_float ( int size , char * title , float * data ) { int n ; int line ; float * d ; d = data ; line = 0 ; printf ( " \n \n " , title ) ; for ( n = 0 ; n < size ; n ++ ) { printf ( " " , * d ) ; d ++ ; line ++ ; if ( line == 8 ) { printf ( " \n " ) ; line = 0 ; } } }
Function:  print _float.c
Procedure: Uses 10.3e format to write 6 numbers per line
Purpose:   write ascii data for one horizontal field or one cross section
Function : print _float . c Procedure : Uses 10 . 3e format to write 6 numbers per line Purpose : write ascii data for one horizontal field or one cross section
/* data counter */ /* counter to insert a line after each six numbers */ /* pointer to increment through data */ /* add newline after writing 8 numbers */