equal
deleted
inserted
replaced
1 #!/usr/bin/perl |
1 #!/usr/bin/perl |
2 #====================================================================== |
2 #====================================================================== |
3 # L A D C P _ W _ O C E A N |
3 # L A D C P _ W _ O C E A N |
4 # doc: Fri Dec 17 18:11:13 2010 |
4 # doc: Fri Dec 17 18:11:13 2010 |
5 # dlm: Wed Mar 9 17:18:37 2016 |
5 # dlm: Sun Mar 13 10:48:17 2016 |
6 # (c) 2010 A.M. Thurnherr |
6 # (c) 2010 A.M. Thurnherr |
7 # uE-Info: 225 46 NIL 0 0 72 0 2 4 NIL ofnI |
7 # uE-Info: 226 76 NIL 0 0 72 0 2 4 NIL ofnI |
8 #====================================================================== |
8 #====================================================================== |
9 |
9 |
10 # TODO: |
10 # TODO: |
11 # ! plots: |
11 # ! plots: |
12 # - make blue labels consistent |
12 # - make blue labels consistent |
221 # - BUG: -ve depth error message referred to obsolete -d |
221 # - BUG: -ve depth error message referred to obsolete -d |
222 # - BUG: dn field name did not use zero filling for year number |
222 # - BUG: dn field name did not use zero filling for year number |
223 # Mar 8, 2016: - removed L0 water-depth-difference warning |
223 # Mar 8, 2016: - removed L0 water-depth-difference warning |
224 # - added test for 1500m/s sound speed |
224 # - added test for 1500m/s sound speed |
225 # Mar 9, 2016: - added hab field to .wprof output |
225 # Mar 9, 2016: - added hab field to .wprof output |
|
226 # Mar 13, 2016: - cleaned up warnings created before LADCP_file is defined |
226 # HISTORY END |
227 # HISTORY END |
227 |
228 |
228 # CTD REQUIREMENTS |
229 # CTD REQUIREMENTS |
229 # - elapsed elapsed seconds; see note below |
230 # - elapsed elapsed seconds; see note below |
230 # - depth |
231 # - depth |
429 print(LOGF "\n"); |
430 print(LOGF "\n"); |
430 } |
431 } |
431 return if ($opt_v == 0); |
432 return if ($opt_v == 0); |
432 |
433 |
433 if ($opt_v == 1) { |
434 if ($opt_v == 1) { |
434 print(STDERR "$LADCP_file: WARNING (L$lvl): "); |
435 print(STDERR "$LADCP_file: ") if defined($LADCP_file); |
|
436 print(STDERR "WARNING (L$lvl): "); |
435 printf(STDERR @msg); |
437 printf(STDERR @msg); |
436 } else { |
438 } else { |
437 print(STDERR "\n-------------\nWARNING (L$lvl): "); |
439 print(STDERR "\n-------------\nWARNING (L$lvl): "); |
438 printf(STDERR @msg); |
440 printf(STDERR @msg); |
439 print(STDERR "-------------\n\n") |
441 print(STDERR "-------------\n\n") |