~javier-lopez/ubuntu/quantal/cdo/sru-1023329

« back to all changes in this revision

Viewing changes to src/field2.c

  • Committer: Bazaar Package Importer
  • Author(s): Alastair McKinstry
  • Date: 2010-09-22 15:58:09 UTC
  • mfrom: (1.2.3 upstream)
  • Revision ID: james.westby@ubuntu.com-20100922155809-u1d3vlmlqj02uxjt
Tags: 1.4.6.dfsg.1-1
New upstream release. 

Show diffs side-by-side

added added

removed removed

Lines of Context:
17
17
 
18
18
#include "cdo.h"
19
19
#include "cdo_int.h"
20
 
#include "cdi.h"
 
20
#include <cdi.h>
21
21
 
22
22
 
23
23
void farfun(field_t *field1, field_t field2, int function)
38
38
 
39
39
void faradd(field_t *field1, field_t field2)
40
40
{
41
 
  static char func[] = "faradd";
 
41
  static const char *func = "faradd";
42
42
  long   i, len;
43
43
  int    grid1    = field1->grid;
44
44
  int    nmiss1   = field1->nmiss;
79
79
 
80
80
void farsum(field_t *field1, field_t field2)
81
81
{
82
 
  static char func[] = "farsum";
 
82
  static const char *func = "farsum";
83
83
  long   i, len;
84
84
  int    grid1    = field1->grid;
85
85
  int    nmiss1   = field1->nmiss;
129
129
 */
130
130
void farsumtr(field_t *occur, field_t field, double refval)
131
131
{
132
 
  static char func[] = "farsumtr";
 
132
  static const char *func = "farsumtr";
133
133
  long   i, len;
134
134
  double omissval = occur->missval;
135
135
  double  *oarray = occur->ptr;
176
176
 
177
177
void farsumq(field_t *field1, field_t field2)
178
178
{
179
 
  static char func[] = "farsumq";
 
179
  static const char *func = "farsumq";
180
180
  long   i, len;
181
181
  int    grid1    = field1->grid;
182
182
  int    nmiss1   = field1->nmiss;
218
218
 
219
219
void farsub(field_t *field1, field_t field2)
220
220
{
221
 
  static char func[] = "farsub";
 
221
  static const char *func = "farsub";
222
222
  long   i, len;
223
223
  int    grid1    = field1->grid;
224
224
  int    nmiss1   = field1->nmiss;
253
253
 
254
254
void farmul(field_t *field1, field_t field2)
255
255
{
256
 
  static char func[] = "farmul";
 
256
  static const char *func = "farmul";
257
257
  long   i, len;
258
258
  int    grid1    = field1->grid;
259
259
  int    nmiss1   = field1->nmiss;
288
288
 
289
289
void fardiv(field_t *field1, field_t field2)
290
290
{
291
 
  static char func[] = "fardiv";
 
291
  static const char *func = "fardiv";
292
292
  long   i, len;
293
293
  int    grid1    = field1->grid;
294
294
  double missval1 = field1->missval;
313
313
 
314
314
void faratan2(field_t *field1, field_t field2)
315
315
{
316
 
  static char func[] = "fardiv";
 
316
  static const char *func = "fardiv";
317
317
  long   i, len;
318
318
  int    grid1    = field1->grid;
319
319
  double missval1 = field1->missval;
338
338
 
339
339
void farmin(field_t *field1, field_t field2)
340
340
{
341
 
  static char func[] = "farmin";
 
341
  static const char *func = "farmin";
342
342
  long   i, len;
343
343
  int    grid1    = field1->grid;
344
344
  int    nmiss1   = field1->nmiss;
377
377
 
378
378
void farmax(field_t *field1, field_t field2)
379
379
{
380
 
  static char func[] = "farmax";
 
380
  static const char *func = "farmax";
381
381
  long   i, len;
382
382
  int    grid1    = field1->grid;
383
383
  int    nmiss1   = field1->nmiss;
416
416
 
417
417
void farvar(field_t *field1, field_t field2, field_t field3)
418
418
{
419
 
  static char func[] = "farvar";
 
419
  static const char *func = "farvar";
420
420
  long   i, len;
421
421
  int    grid1    = field1->grid;
422
422
  int    nmiss1   = field1->nmiss;
465
465
 
466
466
void farstd(field_t *field1, field_t field2, field_t field3)
467
467
{
468
 
  static char func[] = "farstd";
 
468
  static const char *func = "farstd";
469
469
  long   i, len;
470
470
  int    grid1    = field1->grid;
471
471
  double missval1 = field1->missval;
495
495
 
496
496
void farcvar(field_t *field1, field_t field2, double rconst1)
497
497
{
498
 
  static char func[] = "farcvar";
 
498
  static const char *func = "farcvar";
499
499
  long   i, len;
500
500
  int    grid1    = field1->grid;
501
501
  int    nmiss1   = field1->nmiss;
543
543
 
544
544
void farcstd(field_t *field1, field_t field2, double rconst1)
545
545
{
546
 
  static char func[] = "farcstd";
 
546
  static const char *func = "farcstd";
547
547
  long   i, len;
548
548
  int    grid1    = field1->grid;
549
549
  double missval1 = field1->missval;
573
573
 
574
574
void farmoq(field_t *field1, field_t field2)
575
575
{
576
 
  static char func[] = "farmoq";
 
576
  static const char *func = "farmoq";
577
577
  long   i, len;
578
578
  int    grid1    = field1->grid;
579
579
  double missval1 = field1->missval;
624
624
 */  
625
625
void farcount(field_t *field1, field_t field2)
626
626
{
627
 
  static char func[] = "farcount";
 
627
  static const char *func = "farcount";
628
628
  long   i, len;
629
629
  int    grid1    = field1->grid;
630
630
  int    nmiss1   = field1->nmiss;