Artifact 6e21d13445a25feacbd6319bc63cc5af47272a5104e4be171551d17a8fed7971:

• File mttroot/mtt/lib/examples/Identification/idNonlinearTanks/sconical.cr — part of check-in [5ad84ea3e2] at 2001-04-05 12:00:18 on branch origin/master — Identification example (user: gawthrop@users.sourceforge.net, size: 549) [annotate] [blame] [check-ins using] [more...]

%% CR for conical tank example - sensitivity

in "conical.cr";

OPERATOR sconical;
%% The actual port (1) 
FOR ALL rho,g,V_0,V_0s,V,sV LET
    sconical(rho,g,V_0,V_0s,effort,1,
               V,state,1,
               sV,state,2)
    = conical(rho,g,V_0,effort,1,V,state,1);

%% The sensitivity port (2) 
FOR ALL rho,g,V_0,V_0s,V,sV LET
    sconical(rho,g,V_0,V_0s,effort,2,
               V,state,1,
               sV,state,2)
    = df(conical(rho,g,V_0,effort,1,V,state,1),V) * sV
    + df(conical(rho,g,V_0,effort,1,V,state,1),V_0)* V_0s;

END;;