source:
proiecte/pmake3d/make3d_original/Make3dSingleImageStanford_version0.1/third_party/opt/yalmip/extras/ipopt_funhess.m
@
37
Last change on this file since 37 was 37, checked in by , 14 years ago | |
---|---|
File size: 204 bytes |
Rev | Line | |
---|---|---|
[37] | 1 | function [nnz,row, col, val] = pennlp_funhess(x) |
2 | ||
3 | ||
4 | H = datasaver(3,x); | |
5 | H = reshape(H,sqrt(length(H)),sqrt(length(H))); | |
6 | [row,col,val] = find(tril(H)); | |
7 | nnz = length(val); | |
8 | row = row'; | |
9 | col = col'; | |
10 | val = val'; |
Note: See TracBrowser
for help on using the repository browser.