Changeset 33b509 in git for Singular/LIB/realrad.lib


Ignore:
Timestamp:
Apr 19, 2013, 2:38:03 PM (10 years ago)
Author:
Hans Schoenemann <hannes@…>
Branches:
(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'cbf866d4f8c3861325311c042cb2033c053453b2')
Children:
22e3134afb81884aef15d1f3b49ff6ef6322659e
Parents:
cff10c64147241f376fb39f6cafde4855e321f2c
Message:
fix: readlrad.lib without timeStd (does not work yet for extensios)
File:
1 edited

Legend:

Unmodified
Added
Removed
  • Singular/LIB/realrad.lib

    rcff10c r33b509  
    109109  }
    110110  id=intersect(reddim[1..(siz+1)]);
    111   id=timeStd(id,301);//simplify the output
     111  //id=timeStd(id,301);//simplify the output
     112  id=interred(id); // timeStd does not work yet
    112113  setring r;
    113114  id=imap(ri,id);
     
    160161 setring r;
    161162 i=imap(neu,i);
    162  i=timeStd(i,301);
     163 //i=timeStd(i,301);
     164 i=interred(i); // timeStd does not work yet
    163165 return(i);
    164166}
     
    244246   j=intersect(j,boeser);
    245247 }
    246  j=timeStd(j,301);
     248 //j=timeStd(j,301);
     249 j=interred(j); // timeStd does not work yet
    247250 setring r_alt;
    248251 j=fetch(r_neu,j);
     
    380383     //going back
    381384     buffer[l]=psi(trans);
    382      buffer[l]=timeStd(buffer[l],301);//timelimit for std computation
     385     //buffer[l]=timeStd(buffer[l],301);//timelimit for std computation
     386     buffer[l]=interred(buffer[l]);//timeStd does not work yet
    383387   }
    384388 }
     
    427431     }
    428432     i=intersect(pr[1..m]);
    429      i=timeStd(i,301);
     433     //i=timeStd(i,301);
     434     i=interred(i);//timeStd does not work yet
    430435     list realmin=minreal+list(i);
    431436     return(realmin);
Note: See TracChangeset for help on using the changeset viewer.