# | Line 132 | Line 132 | my $cmd = "cnt $ndiv $ny $nx | rcalc -of -e '$tcal' " | |
---|---|---|
132 | "| rtcontrib -h -ff -n $nproc -c $nsamp -e '$kcal' -b kbin -bn $ndiv " . | |
133 | "-m $modnm -w -ab 5 -ad 700 -lw 3e-6 $octree " . | |
134 | "| rcalc -e '$tcal' " . | |
135 | < | "-e 'mod(n,d):n-floor(n/d)*d' -e 'Kbin=mod(recno-1,$ndiv)' " . |
135 | > | "-e 'mod(n,d):n-floor(n/d)*d' -e 'Kbin=mod(recno-.999,$ndiv)' " . |
136 | q{-if3 -e '$1=(0.265*$1+0.670*$2+0.065*$3)/KprojOmega'}; | |
137 | my @darr = `$cmd`; | |
138 | die "Failure running: $cmd\n" if ( $? ); |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |