Subversion Repositories wimsdev

Rev

Rev 17122 | Blame | Compare with Previous | Last modification | View Log | RSS feed

!! Numeric generic anstype.input (also used by Complex)

!set anstype=yes
!set anstyle=numeric
!set ans_require=

!if $wims_read_parm=def
  !exit
!endif
!if debug iswordof $m_oefenv and ?analyze notin $(replygood$i)
  !set replydefaulted=yes
  !if $oef_default=yes
    !set tt=!row 1 of $(replygood$i)
    !default reply$i=!item 1 of $tt
  !endif
!endif
!if $wims_read_parm!=noprompt
  !!class noembed
  <tr><td><label for="reply$i">$(replyname$i)&nbsp;=</label></td><td>
!endif

!read anstype/inputcss.inc

!bound inputsize between integer 1 and 100 default 20
<input list="emptylist" size="$inputsize" name="reply$i" id="reply$i" value="$(reply$i)" autocapitalize="off" $inputoption>

!if symbols isin $(replyoption$i)
  !read anstype/symbols.inc
!endif

!if $wims_read_parm!=noprompt
  </td></tr>
!endif
!reset inputsize inputoption option