Commit 3ee87fdc authored by Daniel Wortmann's avatar Daniel Wortmann

Update mae.F90

parent de3dcd47
......@@ -33,6 +33,7 @@ CONTAINS
TYPE(t_sym),INTENT(IN) :: sym
CHARACTER(len=*),INTENT(INOUT) :: theta_s,phi_s
INTEGER::n
LOGICAL::error(sym%nop)
CALL evaluateList(this%theta,theta_s)
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment