8 calls to
THETA_CALC

SCMMAIN
PHYSICS
PHYSICS
PHYSICS
PHYSICS
PHYSICS
PHYSICS
RUN_INIT