Source animated_pendulum_main.f

### PROGRAM ANIMATEDPENDULUM ( )

> Description
>     Program:    Simple_Pendulum_Solver   *
>     Written_By: Brian Downing            *
>                 Fordham University       *
>     Date:       October 23rd, 1990       *

> Source file: | animated_pendulum_main.f

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

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

> Intrinsic Functions Called
>     DOUBLE PRECISION   DSIN
>     GENERIC            ATAN

> External Functions and Subroutines Called
>     SUBROUTINE         CLS,        ENTERGRAPHICSMODE
>     SUBROUTINE         EXITGRAPHICSMODE,       PLOTBALL

> Local Variables (+ indicates altered content)
>     DOUBLE PRECISION  +A,         +DT,        +G,         +L
>     DOUBLE PRECISION  +PI,        +T,         +THETA,     +THETAM
>     DOUBLE PRECISION  +W