Changeset 4932


Ignore:
Timestamp:
07/19/12 12:23:49 (6 years ago)
Author:
paulf
Message:

added in setResponseInMeters() function to transfer.c for rdseed -pf output

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/src/libsrc/util/transfer.c

    r4930 r4932  
    2323 
    2424#define MAXLINE 80 
     25#define NANOMETERS_PER_METER 1.0e09 
    2526static int Debug = 0; 
     27 
     28static int InputMetersInsteadOfNanometers = 0;  /* if you cannot figure this one out from the name, stop reading code */ 
    2629 
    2730/* Internal Function Prototypes */ 
     
    182185        } 
    183186        status |= 1;  /* Found the constant or gain */ 
     187        if (InputMetersInsteadOfNanometers)  
     188        { 
     189          pRS->dGain = pRS->dGain/NANOMETERS_PER_METER; 
     190        } 
    184191      } 
    185192      else if ( strcmp(word, "ZEROS") == 0) 
     
    918925  return; 
    919926} 
     927 
     928void setResponseInMeters( int flag )  
     929{ 
     930  InputMetersInsteadOfNanometers = flag; 
     931  return; 
     932} 
Note: See TracChangeset for help on using the changeset viewer.