Source animated_pendulum_plotball.f

### SUBROUTINE PLOTBALL ( THETA )

> Argument Definitions (+ indicates altered content)
>     DOUBLE PRECISION   THETA

> Description
>     Clear the screen and draw/redraw the ball circle.

> Source file: | animated_pendulum_plotball.f

> I/O Operations:
>     Unit ID  Unit No       Access  Form   Operation
>           *                   SEQ  FMTD           W

>     Operation codes A=rewind,B=backspace,C=close,E=endfile
>                     I=inquire,O=open,R=read,W=write

> Intrinsic Functions Called
>     DOUBLE PRECISION   DCOS,       DSIN
>     INTEGER            INT

> Local Variables (+ indicates altered content)
>     INTEGER           +COL,       +ROW