• R/O
  • SSH
  • HTTPS

p-svm: Commit


Commit MetaInfo

Revision36 (tree)
Zeit2014-02-06 18:14:27
Autorkanai7310

Log Message

(empty log message)

Ändern Zusammenfassung

Diff

--- src/IO.c (revision 35)
+++ src/IO.c (revision 36)
@@ -386,8 +386,53 @@
386386 }
387387 }
388388 }
389-
390389 }
390+ else {
391+ for (i=0;i<(*NN);i++) {
392+ if (a[i] >= *eps) {
393+ fprintf(fp,"%.15E / %.6f / ",a[i],y[i]);
394+ if (*NS >= 1) {
395+ if (fmt[0] == 0) {
396+ for (j=0;j<MM[0];j++) {
397+ fprintf(fp,"%.15E ",x1[j+MM[0]*i]);
398+ }
399+ }
400+ else if (fmt[0] == 1) {
401+ for (j=0;j<nd1[i];j++) {
402+ fprintf(fp,"%d:%-.15E ",pt1[j+MM[0]*i],x1[j+MM[0]*i]);
403+ }
404+ }
405+ }
406+ if (*NS >= 2) {
407+ fprintf(fp," / ");
408+ if (fmt[1] == 0) {
409+ for (j=0;j<MM[1];j++) {
410+ fprintf(fp,"%.15E ",x2[j+MM[1]*i]);
411+ }
412+ }
413+ else if (fmt[1] == 1) {
414+ for (j=0;j<nd2[i];j++) {
415+ fprintf(fp,"%d:%-.15E ",pt2[j+MM[1]*i],x2[j+MM[1]*i]);
416+ }
417+ }
418+ }
419+ if (*NS >= 3) {
420+ fprintf(fp," / ");
421+ if (fmt[2] == 0) {
422+ for (j=0;j<MM[2];j++) {
423+ fprintf(fp,"%.15E ",x3[j+MM[2]*i]);
424+ }
425+ }
426+ else if (fmt[2] == 1) {
427+ for (j=0;j<nd3[i];j++) {
428+ fprintf(fp,"%d:%-.15E ",pt3[j+MM[2]*i],x3[j+MM[2]*i]);
429+ }
430+ }
431+ }
432+ fprintf(fp,"\n");
433+ }
434+ }
435+ }
391436
392437 fclose(fp);
393438 }
Show on old repository browser