! !$Author: joelevin $ !$Date: 2011-03-24 11:33:26 -0500 (Thu, 24 Mar 2011) $ !$Revision: 11724 $ !$HeadURL: https://svn.weru.ksu.edu/weru/weps1/trunk/weps.src/src/util/lib_sax/tstsax1/MyHandler01.f95 $ ! module myhandler01 use flib_sax contains subroutine start_element(name,attributes) character(len=*), intent(in) :: name type(dictionary_t), intent(in) :: attributes write(*,*) "Start Tag: ", name end subroutine start_element end module myhandler01