title=Núcleo de una aplicación lineal
language=es
author=XIAO, Gang
email=xiao@unice.fr
format=html

!if $status=waiting
 !exit
!endif

!read init.sys
type=vector
raw_matrix=
!for i=1 to $eqn
 raw_matrix=!append line $(eq$i) to $raw_matrix
!next i
!read mkmatrix
!if $eqn>1
 hsup=<sup>$eqn</sup>
 hdef=la matriz <p><center>$html_matrix</center> <p>
!else
 hsup=
 vlist=!item 1 to $dim of x,y,z,u,v,w
 hdef=$m_f(($vlist))=
 start=0
 !for i=1 to $dim
  v=!item $i of $vlist
  c=!item $i of $eq1
  !ifval $c!=0
   !ifval abs($c)=1
    cc=!char 1 to -2 of $c
   !else
    cc=$c
   !endif
   !if $c>0 and $start>0
    hdef=$hdef+$cc$v
   !else
    hdef=$hdef$cc$v
   !endif
   start=1
  !endif
 !next i
 hdef=$hdef,
!endif

question=Sea $m_f: <b>R</b><sup>$dim</sup> $m_rightarrow <b>R</b>$hsup\
la aplicación lineal definida por $hdef\
y sea $m_S el núcleo de $m_f. Encuentre una base de $m_S.

