Last change
on this file since 14950 was 14950, checked in by Mathieu Morlighem, 12 years ago |
CHG: moved io to shared/io
|
File size:
756 bytes
|
Line | |
---|
1 | /*!\file SmbGradientsx
|
---|
2 | * \brief: calculates SMB as function of local elevation
|
---|
3 | */
|
---|
4 |
|
---|
5 | #include "./SmbGradientsx.h"
|
---|
6 | #include "../../shared/shared.h"
|
---|
7 | #include "../../shared/io/io.h"
|
---|
8 | #include "../../toolkits/toolkits.h"
|
---|
9 | #include "../../EnumDefinitions/EnumDefinitions.h"
|
---|
10 |
|
---|
11 | void SmbGradientsx(Elements* elements,Nodes* nodes, Vertices* vertices,Loads* loads,Materials* materials, Parameters* parameters){
|
---|
12 |
|
---|
13 | // void SmbGradientsx(hd,agd,ni){
|
---|
14 | // INPUT parameters: ni: working size of arrays
|
---|
15 | // INPUT: surface elevation (m): hd(NA)
|
---|
16 | // OUTPUT: mass-balance (m/yr ice): agd(NA)
|
---|
17 |
|
---|
18 | int i;
|
---|
19 |
|
---|
20 | Element* element = NULL;
|
---|
21 |
|
---|
22 | for(i=0;i<elements->Size();i++){
|
---|
23 | element=dynamic_cast<Element*>(elements->GetObjectByOffset(i));
|
---|
24 | element->SmbGradients();
|
---|
25 | }
|
---|
26 | }
|
---|
Note:
See
TracBrowser
for help on using the repository browser.