subroutine stella_error(index,keyname)
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
! Gives the errors of a the stellarator module
integer, intent(in) :: index
character, intent(in) :: keyname
select case (index)
case(1)
! Error reading in a json attribute
! Not used yet because I don't know how.
write(*,*)'ERROR in initialization of stellarator config. Missing json key: ',keyname
case default
! Return some error here. The index is not implemented yet.
write(*,*)'ERROR in stella_error! No such error index: ',index
end select
end subroutine stella_error