1.1 ! root 1: double derf_(x) ! 2: double *x; ! 3: { ! 4: double erf(); ! 5: ! 6: return( erf(*x) ); ! 7: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.