134 |
iim, jjm + 1, nhori, 1, 1, 1, -99, "inst(X)", zsto, zout) |
iim, jjm + 1, nhori, 1, 1, 1, -99, "inst(X)", zsto, zout) |
135 |
CALL histdef(nid_ins, "zxfqcalving", "ice calving", "kg m-2 s-1", & |
CALL histdef(nid_ins, "zxfqcalving", "ice calving", "kg m-2 s-1", & |
136 |
iim, jjm + 1, nhori, 1, 1, 1, -99, "inst(X)", zsto, zout) |
iim, jjm + 1, nhori, 1, 1, 1, -99, "inst(X)", zsto, zout) |
137 |
|
CALL histdef(nid_ins, "run_off_lic", "land ice melt to ocean", & |
138 |
|
"kg m-2 s-1", iim, jjm + 1, nhori, 1, 1, 1, -99, "inst(X)", zsto, & |
139 |
|
zout) |
140 |
|
|
141 |
DO nsrf = 1, nbsrf |
DO nsrf = 1, nbsrf |
142 |
call histdef(nid_ins, "pourc_"//clnsurf(nsrf), & |
call histdef(nid_ins, "pourc_"//clnsurf(nsrf), & |