Skip to content

Instantly share code, notes, and snippets.

@gmisail

gmisail/Riemann.tibasic

Created October 25, 2018 18:27
Show Gist options
  • Save gmisail/051b496fd27d6f4b1087ac8b09b4788a to your computer and use it in GitHub Desktop.
Save gmisail/051b496fd27d6f4b1087ac8b09b4788a to your computer and use it in GitHub Desktop.
Download ZIP
Raw
Riemann.tibasic
0→T
(B-A)/N→D
Prompt A,B,N
Menu("Select Method:","Left Riemann",LR,"Right Riemann",RR,"Midpoint Riemann",MR)
Lbl LR
For(G,A,B-D,D
Y₁(G)+T→T
End
Disp T*D
Stop
Lbl RR
For(G,A,B,D
Y₁(G)+T→T
End
Disp T*D
Stop
Lbl MR
For(G,A+D/2,B-D/2,D
Y₁(G)+T→T
End
Disp T*D
Stop
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment