summaryrefslogtreecommitdiff
path: root/659/CH6/EX6.4cs/Casestudy6_4.sce
blob: 31a5e0f8939a3e23314730ea0dd13f2a79353b4a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
//                Case Study:-Chapter 6
//   4.Plotting of two Functions i.e. y1=exp(-ax) and y2=exp(-ax^2/2)

a=0.4;
printf("                      y------->                         \n");
printf("0 ---------------------------------------------------------------\n");
for x=0:0.25:4
    //Evaluation of functions
    y1=int32(50*exp(-a*x)+0.5);
    y2=int32(50*exp(-a*(x^2)/2)+0.5);
    //plotting when y1=y2
    if(y1==y2) ,
        if(x==2.5) ,
            printf("x |");
        else
            printf("  |");
        end
        for i=1:(y1-1)
            printf(" ");
        end
        printf("#\n");
        continue;
    end
   
    //Plotting when y1>y2
    if(y1>y2) ,
        if(x==2.5) ,
            printf("x |");
        else
            printf("  |");
        end
        for i=1:y2-1
            printf(" ");
        end
        printf("*");
        for i=1:(y1-y2-1)
            printf("-");
        end
        printf("0\n");
        continue;
     end 
     
     //Plotting when y2>y1
    if(y2>y1) ,
        if(x==2.5)
            printf("x |");
        else
            printf("  |");
        end
        for i=1:(y1-1)
            printf(" ");
        end
        printf("0");
        for i=1:(y2-y1-1)
            printf("-");
        end
        printf("*\n");
     end
end
     printf("  |\n");