expr(sub( ->V
If T=1
Ans->Z
If T=2
Ans-1->L3(1+dim(L3
B+1->A
End
End
For(P,1,G
RecallPic Pic2
//Store Pic2 is at the top. of the program
ZV->L4(1+dim(L4
DrawF sum(L4X^L3
Pause DispGraph
StorePic Pic2
End