你应该能够做到这一点。
模块测试,其中data Nat:设置位置零:自然例如:Nat->Natdata Vec:Nat->设置位置[]:Vec零点_::_:{n:Nat}->Nat->Vec n->Vec(例如)f:(n:Nat)->兽医->Natf n@_[]=n
阿格达
编辑提要栏