File: maple.cdb

package info (click to toggle)
cadabra 1.46-6
  • links: PTS, VCS
  • area: main
  • in suites: bookworm
  • size: 5,244 kB
  • sloc: cpp: 33,188; ansic: 2,724; makefile: 329; yacc: 180; sh: 157; python: 45; lex: 38; lisp: 19
file content (15 lines) | stat: -rw-r--r-- 287 bytes parent folder | download | duplicates (6) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
# Testing the interface to maple
#
@reset.
obj1:= simplify( sin(x)**2 + cos(x)**2 );
@maple(%);
tst1:= 1 - @(obj1);
@collect_terms!(%);
@assert(tst1);

@reset.
obj2:= integrate( \sin(x)**2, x );
@maple(%);
tst2:= 1/2 x - 1/2 \sin(x) \cos(x) - @(obj2);
@collect_terms!(%);
@assert(tst2);