1use lib '../lib'; 2use strict; 3use Test::More tests => 7; 4 5my $TJSIM = "../../tjsim"; 6my $PATH = "--path hilbert/"; 7my $MODULE = "hilbert"; 8my $code; 9my $ans; 10 11################ 12############################################ 13############################################ 14$code = <<'CODE'; 15test 1. 16 17CODE 18$ans = <<'ANS'; 19ANS 20same_answers( `$TJSIM -b $PATH --solve "$code" $MODULE\n`, $ans,"test"); 21############################################ 22############################################ 23$code = <<'CODE'; 24test 2. 25 26CODE 27$ans = <<'ANS'; 28ANS 29same_answers( `$TJSIM -b $PATH --solve "$code" $MODULE\n`, $ans,"test"); 30############################################ 31############################################ 32$code = <<'CODE'; 33test 3. 34 35CODE 36$ans = <<'ANS'; 37ANS 38same_answers( `$TJSIM -b $PATH --solve "$code" $MODULE\n`, $ans,"test"); 39############################################ 40############################################ 41 42$code = <<'CODE'; 43test 4. 44 45CODE 46$ans = <<'ANS'; 47ANS 48same_answers( `$TJSIM -b $PATH --solve "$code" $MODULE\n`, $ans,"test"); 49############################################ 50############################################ 51$code = <<'CODE'; 52test 5. 53 54CODE 55$ans = <<'ANS'; 56ANS 57same_answers( `$TJSIM -b $PATH --solve "$code" $MODULE\n`, $ans,"test"); 58############################################ 59############################################ 60$code = <<'CODE'; 61test 6. 62 63CODE 64$ans = <<'ANS'; 65ANS 66same_answers( `$TJSIM -b $PATH --solve "$code" $MODULE\n`, $ans,"test"); 67############################################ 68############################################ 69$code = <<'CODE'; 70test 7. 71 72CODE 73$ans = <<'ANS'; 74ANS 75same_answers( `$TJSIM -b $PATH --solve "$code" $MODULE\n`, $ans,"test"); 76############################################ 77############################################