!+ ! Subroutine tao_json_cmd (input_str) ! ! Print information in a form easily parsed json aware programs. ! ! Input: ! input_str -- Character(*): What to show. !- subroutine tao_json_cmd (input_str) use tao_interface, dummy => tao_json_cmd implicit none character(*) input_str ! end subroutine tao_json_cmd