#] #] ********************* #] loaddefs link d_Qndfs 'NEUNET-D-14-00130 tests.ndf' # www.BillHowell.ca 16Apr2014 initial # tests for NEUNET-D-14-00130 p Rakkiyappan, Cao, Lakshmanan - Synchronization of memristor-based RNNs with two delay components based on 2nd-order reciprocally convex approach.pdf f_NEUNET_D_14_00130 := 'NEUNET-D-14-00130 tests.ndf' ; loaddefs_start f_NEUNET_D_14_00130 ; #**************************** # List of operators, generated with : # $ cat "$d_Qndfs""NEUNET-D-14-00130 tests.ndf" | grep "^#]" | sed 's/^#\]/ /' # #*********************************** # Setup # The following 'matrix_multiply.ndf' also loads string functions loaddefs (link Qnial_mine 'matrix_multiply.ndf') ; # This loads : # strings.ndf # array_indexLabelled IS OP Symbol_string shapet - indexLabelled arrays - shows array_name@[i,j] symbols for easily following processes! # symbolic reduction.ndf - This does symbolic reduction of a matrix-multiply expression # /home/bill/Qnial/MY_NDFS/mm-parenthesis aligned.ndf - This prints out results of each cell of a symbolic matric multiply in a human-workable format #*********************************************** # tests for NEUNET-D-14-00130 p Rakkiyappan, Cao, Lakshmanan - Synchronization of memristor-based RNNs with two delay components based on 2nd-order reciprocally convex approach.pdf e := array_indexLabelled 'e' (5 1) ; e_T := array_indexLabelled 'e_T' (1 5) ; Q := array_indexLabelled 'Q' (5 5) ; intgrl_V2_Q1 := first mms e_T (mms Q e) ; IF parenthesis_check intgrl_V2_Q1 THEN write 'cell_write_parenthesis_aligned intgrl_V2_Q1 : ' ; cell_write_parenthesis_aligned intgrl_V2_Q1 ; ELSE write 'parenthesis_check intgrl_V2_Q1 : unbalanced parenthesis in expression string' ; ENDIF ; # Output for logfile write '' ; write '' ; write '/home/bill/Qnial/quips.ndf ' ; write '' ; write 'a = ' ; write a ; write '' ; write 'a_T = ' ; write a_T ; write '' ; write 'Q = ' ; write Q ; write '' ; write 'intgrl_V2_Q1 = ' ; write intgrl_V2_Q1 ; write '' ; write 'intgrl_V2_Q1_fmt = ' ; write intgrl_V2_Q1_fmt ; write '' ; write '' ; loaddefs_ended f_NEUNET_D_14_00130 ; # enddoc