Skip to content

Commit b17d19c

Browse files
committed
segywrite
1 parent 75e02b5 commit b17d19c

File tree

2 files changed

+18
-19
lines changed

2 files changed

+18
-19
lines changed

system/seismic/Msegywrite.c

Lines changed: 5 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -38,11 +38,10 @@ int main(int argc, char *argv[])
3838
char *headname=NULL, *filename=NULL, *trace=NULL, count[4], *prog=NULL;
3939
const char *myheader[] = {" This dataset was created",
4040
" with the Madagascar package",
41-
" http://www.ahay.org/"};
41+
" https://www.ahay.org/"};
4242
sf_file in=NULL, hdr=NULL;
4343
size_t nsegy;
44-
unsigned int i;
45-
int format=1, ns, nk, itr, ntr, *itrace=NULL;
44+
int format=1, i, ns, nk, itr, ntr, *itrace=NULL;
4645
FILE *head=NULL, *file=NULL;
4746
float *ftrace=NULL, dt, t0;
4847

@@ -77,7 +76,7 @@ int main(int argc, char *argv[])
7776
} else {
7877
suxdr = true;
7978
}
80-
79+
8180
if (NULL == (filename = sf_getstring("tape"))) {
8281
/* output data */
8382
file = stdout;
@@ -97,8 +96,8 @@ int main(int argc, char *argv[])
9796
} else {
9897
for (i=0; i < SF_EBCBYTES/80; i++) {
9998
snprintf(count,4,"C%-2d",i+1);
100-
snprintf(ahead+i*80,82,"%s %-76s\n",count,
101-
(i < 3)? myheader[i]:"");
99+
snprintf(ahead+i*80,80,"%s %-75s\n",count,
100+
(i < 3)? myheader[i]:"");
102101
}
103102
if (verbose) sf_warning("ASCII header created on the fly");
104103
}

user/chengjb/Mtti2devectorlrsvdkspace_double_stiffness.cc

Lines changed: 13 additions & 13 deletions
Original file line numberDiff line numberDiff line change
@@ -670,19 +670,19 @@ int main(int argc, char* argv[])
670670
char dataxnumber[20],dataznumber[20];
671671
char datasxnumber[20],datapznumber[20];
672672
char datapxnumber[20],datasznumber[20];
673-
memset(dataxnumber,0,10);
674-
memset(dataznumber,0,10);
675-
memset(datapxnumber,0,10);
676-
memset(datasxnumber,0,10);
677-
memset(datapznumber,0,10);
678-
memset(datasznumber,0,10);
679-
680-
snprintf(dataznumber,10,"dataz%d",it/1);
681-
snprintf(dataxnumber,10,"datax%d",it/1);
682-
snprintf(datapxnumber,10,"datapx%d",it/1);
683-
snprintf(datasxnumber,10,"datasx%d",it/1);
684-
snprintf(datapznumber,10,"datapz%d",it/1);
685-
snprintf(datasznumber,10,"datasz%d",it/1);
673+
memset(dataxnumber,0,20);
674+
memset(dataznumber,0,20);
675+
memset(datapxnumber,0,20);
676+
memset(datasxnumber,0,20);
677+
memset(datapznumber,0,20);
678+
memset(datasznumber,0,20);
679+
680+
snprintf(dataznumber,20,"dataz%d",it/1);
681+
snprintf(dataxnumber,20,"datax%d",it/1);
682+
snprintf(datapxnumber,20,"datapx%d",it/1);
683+
snprintf(datasxnumber,20,"datasx%d",it/1);
684+
snprintf(datapznumber,20,"datapz%d",it/1);
685+
snprintf(datasznumber,20,"datasz%d",it/1);
686686

687687
fp1 = fopen(dataxnumber,"wb");
688688
fp2 = fopen(dataznumber,"wb");

0 commit comments

Comments
 (0)