NAME

chain - create a chain of 2,3, or 4 operators


SYNOPSIS

call chain(oper1,oper2,adj,add,model,data,temp1)

call chain(oper1,oper2,oper3,adj,add,model,data,temp1,temp2)

call chain(oper1,oper2,oper3,oper4,adj,add,model,data,temp1,temp2,temp3)


PARAMETERS

oper1,oper2,oper3,oper4 - func
      standard operators
adj,add,model,data -
      standard operator interface
temp1,temp2,temp3 - real(:)
      temporary arrays


DESCRIPTION

Create a chain of multiple operators

head1 COMMENTS

temp1 should be the output of oper1(model) temp2 should be the output of oper2(oper1(model)) temp3 should be the output of oper3(oper2(oper1(model)))


SEE ALSO

the array manpage,the solver manpage


LIBRARY

geef90