Changeset 18950
- Timestamp:
- 12/05/14 13:24:05 (10 years ago)
- Location:
- issm/trunk-jpl
- Files:
-
- 13 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/m4/analyses.m4
r18595 r18950 11 11 12 12 dnl with-AdjointBalancethickness{{{ 13 14 13 AC_ARG_WITH([AdjointBalancethickness], 15 16 14 AS_HELP_STRING([--with-AdjointBalancethickness = YES], [compile with AdjointBalancethickness capabilities (default is yes)]), 17 18 15 [ADJOINTBALANCETHICKNESS=$withval],[ADJOINTBALANCETHICKNESS=yes]) 19 20 16 AC_MSG_CHECKING(for AdjointBalancethickness capability compilation) 21 17 22 23 18 HAVE_ADJOINTBALANCETHICKNESS=no 24 25 19 if test "x$ADJOINTBALANCETHICKNESS" = "xyes"; then 26 27 20 HAVE_ADJOINTBALANCETHICKNESS=yes 28 29 21 AC_DEFINE([_HAVE_ADJOINTBALANCETHICKNESS_],[1],[with AdjointBalancethicknesscapability]) 30 31 fi 32 22 fi 33 23 AM_CONDITIONAL([ADJOINTBALANCETHICKNESS], [test x$HAVE_ADJOINTBALANCETHICKNESS = xyes]) 34 35 24 AC_MSG_RESULT($HAVE_ADJOINTBALANCETHICKNESS) 36 37 25 dnl }}} 38 26 dnl with-AdjointBalancethickness2{{{ 39 40 27 AC_ARG_WITH([AdjointBalancethickness2], 41 42 28 AS_HELP_STRING([--with-AdjointBalancethickness2 = YES], [compile with AdjointBalancethickness2 capabilities (default is yes)]), 43 44 29 [ADJOINTBALANCETHICKNESS2=$withval],[ADJOINTBALANCETHICKNESS2=yes]) 45 46 30 AC_MSG_CHECKING(for AdjointBalancethickness2 capability compilation) 47 31 48 49 32 HAVE_ADJOINTBALANCETHICKNESS2=no 50 51 33 if test "x$ADJOINTBALANCETHICKNESS2" = "xyes"; then 52 53 34 HAVE_ADJOINTBALANCETHICKNESS2=yes 54 55 35 AC_DEFINE([_HAVE_ADJOINTBALANCETHICKNESS2_],[1],[with AdjointBalancethickness2capability]) 56 57 fi 58 36 fi 59 37 AM_CONDITIONAL([ADJOINTBALANCETHICKNESS2], [test x$HAVE_ADJOINTBALANCETHICKNESS2 = xyes]) 60 61 38 AC_MSG_RESULT($HAVE_ADJOINTBALANCETHICKNESS2) 62 63 39 dnl }}} 64 40 dnl with-AdjointHoriz{{{ 65 66 41 AC_ARG_WITH([AdjointHoriz], 67 68 42 AS_HELP_STRING([--with-AdjointHoriz = YES], [compile with AdjointHoriz capabilities (default is yes)]), 69 70 43 [ADJOINTHORIZ=$withval],[ADJOINTHORIZ=yes]) 71 72 44 AC_MSG_CHECKING(for AdjointHoriz capability compilation) 73 45 74 75 46 HAVE_ADJOINTHORIZ=no 76 77 47 if test "x$ADJOINTHORIZ" = "xyes"; then 78 79 48 HAVE_ADJOINTHORIZ=yes 80 81 49 AC_DEFINE([_HAVE_ADJOINTHORIZ_],[1],[with AdjointHorizcapability]) 82 83 fi 84 50 fi 85 51 AM_CONDITIONAL([ADJOINTHORIZ], [test x$HAVE_ADJOINTHORIZ = xyes]) 86 87 52 AC_MSG_RESULT($HAVE_ADJOINTHORIZ) 88 89 53 dnl }}} 90 54 dnl with-Balancethickness{{{ 91 92 55 AC_ARG_WITH([Balancethickness], 93 94 56 AS_HELP_STRING([--with-Balancethickness = YES], [compile with Balancethickness capabilities (default is yes)]), 95 96 57 [BALANCETHICKNESS=$withval],[BALANCETHICKNESS=yes]) 97 98 58 AC_MSG_CHECKING(for Balancethickness capability compilation) 99 59 100 101 60 HAVE_BALANCETHICKNESS=no 102 103 61 if test "x$BALANCETHICKNESS" = "xyes"; then 104 105 62 HAVE_BALANCETHICKNESS=yes 106 107 63 AC_DEFINE([_HAVE_BALANCETHICKNESS_],[1],[with Balancethicknesscapability]) 108 109 fi 110 64 fi 111 65 AM_CONDITIONAL([BALANCETHICKNESS], [test x$HAVE_BALANCETHICKNESS = xyes]) 112 113 66 AC_MSG_RESULT($HAVE_BALANCETHICKNESS) 114 115 67 dnl }}} 116 68 dnl with-Balancethickness2{{{ 117 118 69 AC_ARG_WITH([Balancethickness2], 119 120 70 AS_HELP_STRING([--with-Balancethickness2 = YES], [compile with Balancethickness2 capabilities (default is yes)]), 121 122 71 [BALANCETHICKNESS2=$withval],[BALANCETHICKNESS2=yes]) 123 124 72 AC_MSG_CHECKING(for Balancethickness2 capability compilation) 125 73 126 127 74 HAVE_BALANCETHICKNESS2=no 128 129 75 if test "x$BALANCETHICKNESS2" = "xyes"; then 130 131 76 HAVE_BALANCETHICKNESS2=yes 132 133 77 AC_DEFINE([_HAVE_BALANCETHICKNESS2_],[1],[with Balancethickness2capability]) 134 135 fi 136 78 fi 137 79 AM_CONDITIONAL([BALANCETHICKNESS2], [test x$HAVE_BALANCETHICKNESS2 = xyes]) 138 139 80 AC_MSG_RESULT($HAVE_BALANCETHICKNESS2) 140 141 81 dnl }}} 142 82 dnl with-BalancethicknessSoft{{{ 143 144 83 AC_ARG_WITH([BalancethicknessSoft], 145 146 84 AS_HELP_STRING([--with-BalancethicknessSoft = YES], [compile with BalancethicknessSoft capabilities (default is yes)]), 147 148 85 [BALANCETHICKNESSSOFT=$withval],[BALANCETHICKNESSSOFT=yes]) 149 150 86 AC_MSG_CHECKING(for BalancethicknessSoft capability compilation) 151 87 152 153 88 HAVE_BALANCETHICKNESSSOFT=no 154 155 89 if test "x$BALANCETHICKNESSSOFT" = "xyes"; then 156 157 90 HAVE_BALANCETHICKNESSSOFT=yes 158 159 91 AC_DEFINE([_HAVE_BALANCETHICKNESSSOFT_],[1],[with BalancethicknessSoftcapability]) 160 161 fi 162 92 fi 163 93 AM_CONDITIONAL([BALANCETHICKNESSSOFT], [test x$HAVE_BALANCETHICKNESSSOFT = xyes]) 164 165 94 AC_MSG_RESULT($HAVE_BALANCETHICKNESSSOFT) 166 167 95 dnl }}} 168 96 dnl with-Balancevelocity{{{ 169 170 97 AC_ARG_WITH([Balancevelocity], 171 172 98 AS_HELP_STRING([--with-Balancevelocity = YES], [compile with Balancevelocity capabilities (default is yes)]), 173 174 99 [BALANCEVELOCITY=$withval],[BALANCEVELOCITY=yes]) 175 176 100 AC_MSG_CHECKING(for Balancevelocity capability compilation) 177 101 178 179 102 HAVE_BALANCEVELOCITY=no 180 181 103 if test "x$BALANCEVELOCITY" = "xyes"; then 182 183 104 HAVE_BALANCEVELOCITY=yes 184 185 105 AC_DEFINE([_HAVE_BALANCEVELOCITY_],[1],[with Balancevelocitycapability]) 186 187 fi 188 106 fi 189 107 AM_CONDITIONAL([BALANCEVELOCITY], [test x$HAVE_BALANCEVELOCITY = xyes]) 190 191 108 AC_MSG_RESULT($HAVE_BALANCEVELOCITY) 192 193 109 dnl }}} 194 110 dnl with-L2ProjectionEPL{{{ 195 196 111 AC_ARG_WITH([L2ProjectionEPL], 197 198 112 AS_HELP_STRING([--with-L2ProjectionEPL = YES], [compile with L2ProjectionEPL capabilities (default is yes)]), 199 200 113 [L2PROJECTIONEPL=$withval],[L2PROJECTIONEPL=yes]) 201 202 114 AC_MSG_CHECKING(for L2ProjectionEPL capability compilation) 203 115 204 205 116 HAVE_L2PROJECTIONEPL=no 206 207 117 if test "x$L2PROJECTIONEPL" = "xyes"; then 208 209 118 HAVE_L2PROJECTIONEPL=yes 210 211 119 AC_DEFINE([_HAVE_L2PROJECTIONEPL_],[1],[with L2ProjectionEPLcapability]) 212 213 fi 214 120 fi 215 121 AM_CONDITIONAL([L2PROJECTIONEPL], [test x$HAVE_L2PROJECTIONEPL = xyes]) 216 217 122 AC_MSG_RESULT($HAVE_L2PROJECTIONEPL) 218 219 123 dnl }}} 220 124 dnl with-L2ProjectionBase{{{ 221 222 125 AC_ARG_WITH([L2ProjectionBase], 223 224 126 AS_HELP_STRING([--with-L2ProjectionBase = YES], [compile with L2ProjectionBase capabilities (default is yes)]), 225 226 127 [L2PROJECTIONBASE=$withval],[L2PROJECTIONBASE=yes]) 227 228 128 AC_MSG_CHECKING(for L2ProjectionBase capability compilation) 229 129 230 231 130 HAVE_L2PROJECTIONBASE=no 232 233 131 if test "x$L2PROJECTIONBASE" = "xyes"; then 234 235 132 HAVE_L2PROJECTIONBASE=yes 236 237 133 AC_DEFINE([_HAVE_L2PROJECTIONBASE_],[1],[with L2ProjectionBasecapability]) 238 239 fi 240 134 fi 241 135 AM_CONDITIONAL([L2PROJECTIONBASE], [test x$HAVE_L2PROJECTIONBASE = xyes]) 242 243 136 AC_MSG_RESULT($HAVE_L2PROJECTIONBASE) 244 245 137 dnl }}} 246 138 dnl with-DamageEvolution{{{ 247 248 139 AC_ARG_WITH([DamageEvolution], 249 250 140 AS_HELP_STRING([--with-DamageEvolution = YES], [compile with DamageEvolution capabilities (default is yes)]), 251 252 141 [DAMAGEEVOLUTION=$withval],[DAMAGEEVOLUTION=yes]) 253 254 142 AC_MSG_CHECKING(for DamageEvolution capability compilation) 255 143 256 257 144 HAVE_DAMAGEEVOLUTION=no 258 259 145 if test "x$DAMAGEEVOLUTION" = "xyes"; then 260 261 146 HAVE_DAMAGEEVOLUTION=yes 262 263 147 AC_DEFINE([_HAVE_DAMAGEEVOLUTION_],[1],[with DamageEvolutioncapability]) 264 265 fi 266 148 fi 267 149 AM_CONDITIONAL([DAMAGEEVOLUTION], [test x$HAVE_DAMAGEEVOLUTION = xyes]) 268 269 150 AC_MSG_RESULT($HAVE_DAMAGEEVOLUTION) 270 271 151 dnl }}} 272 152 dnl with-Stressbalance{{{ 273 274 153 AC_ARG_WITH([Stressbalance], 275 276 154 AS_HELP_STRING([--with-Stressbalance = YES], [compile with Stressbalance capabilities (default is yes)]), 277 278 155 [STRESSBALANCE=$withval],[STRESSBALANCE=yes]) 279 280 156 AC_MSG_CHECKING(for Stressbalance capability compilation) 281 157 282 283 158 HAVE_STRESSBALANCE=no 284 285 159 if test "x$STRESSBALANCE" = "xyes"; then 286 287 160 HAVE_STRESSBALANCE=yes 288 289 161 AC_DEFINE([_HAVE_STRESSBALANCE_],[1],[with Stressbalancecapability]) 290 291 fi 292 162 fi 293 163 AM_CONDITIONAL([STRESSBALANCE], [test x$HAVE_STRESSBALANCE = xyes]) 294 295 164 AC_MSG_RESULT($HAVE_STRESSBALANCE) 296 297 165 dnl }}} 298 166 dnl with-StressbalanceSIA{{{ 299 300 167 AC_ARG_WITH([StressbalanceSIA], 301 302 168 AS_HELP_STRING([--with-StressbalanceSIA = YES], [compile with StressbalanceSIA capabilities (default is yes)]), 303 304 169 [STRESSBALANCESIA=$withval],[STRESSBALANCESIA=yes]) 305 306 170 AC_MSG_CHECKING(for StressbalanceSIA capability compilation) 307 171 308 309 172 HAVE_STRESSBALANCESIA=no 310 311 173 if test "x$STRESSBALANCESIA" = "xyes"; then 312 313 174 HAVE_STRESSBALANCESIA=yes 314 315 175 AC_DEFINE([_HAVE_STRESSBALANCESIA_],[1],[with StressbalanceSIAcapability]) 316 317 fi 318 176 fi 319 177 AM_CONDITIONAL([STRESSBALANCESIA], [test x$HAVE_STRESSBALANCESIA = xyes]) 320 321 178 AC_MSG_RESULT($HAVE_STRESSBALANCESIA) 322 323 179 dnl }}} 324 180 dnl with-StressbalanceVertical{{{ 325 326 181 AC_ARG_WITH([StressbalanceVertical], 327 328 182 AS_HELP_STRING([--with-StressbalanceVertical = YES], [compile with StressbalanceVertical capabilities (default is yes)]), 329 330 183 [STRESSBALANCEVERTICAL=$withval],[STRESSBALANCEVERTICAL=yes]) 331 332 184 AC_MSG_CHECKING(for StressbalanceVertical capability compilation) 333 185 334 335 186 HAVE_STRESSBALANCEVERTICAL=no 336 337 187 if test "x$STRESSBALANCEVERTICAL" = "xyes"; then 338 339 188 HAVE_STRESSBALANCEVERTICAL=yes 340 341 189 AC_DEFINE([_HAVE_STRESSBALANCEVERTICAL_],[1],[with StressbalanceVerticalcapability]) 342 343 fi 344 190 fi 345 191 AM_CONDITIONAL([STRESSBALANCEVERTICAL], [test x$HAVE_STRESSBALANCEVERTICAL = xyes]) 346 347 192 AC_MSG_RESULT($HAVE_STRESSBALANCEVERTICAL) 348 349 193 dnl }}} 350 194 dnl with-Enthalpy{{{ 351 352 195 AC_ARG_WITH([Enthalpy], 353 354 196 AS_HELP_STRING([--with-Enthalpy = YES], [compile with Enthalpy capabilities (default is yes)]), 355 356 197 [ENTHALPY=$withval],[ENTHALPY=yes]) 357 358 198 AC_MSG_CHECKING(for Enthalpy capability compilation) 359 199 360 361 200 HAVE_ENTHALPY=no 362 363 201 if test "x$ENTHALPY" = "xyes"; then 364 365 202 HAVE_ENTHALPY=yes 366 367 203 AC_DEFINE([_HAVE_ENTHALPY_],[1],[with Enthalpycapability]) 368 369 fi 370 204 fi 371 205 AM_CONDITIONAL([ENTHALPY], [test x$HAVE_ENTHALPY = xyes]) 372 373 206 AC_MSG_RESULT($HAVE_ENTHALPY) 374 375 207 dnl }}} 376 208 dnl with-HydrologyShreve{{{ 377 378 209 AC_ARG_WITH([HydrologyShreve], 379 380 210 AS_HELP_STRING([--with-HydrologyShreve = YES], [compile with HydrologyShreve capabilities (default is yes)]), 381 382 211 [HYDROLOGYSHREVE=$withval],[HYDROLOGYSHREVE=yes]) 383 384 212 AC_MSG_CHECKING(for HydrologyShreve capability compilation) 385 213 386 387 214 HAVE_HYDROLOGYSHREVE=no 388 389 215 if test "x$HYDROLOGYSHREVE" = "xyes"; then 390 391 216 HAVE_HYDROLOGYSHREVE=yes 392 393 217 AC_DEFINE([_HAVE_HYDROLOGYSHREVE_],[1],[with HydrologyShrevecapability]) 394 395 fi 396 218 fi 397 219 AM_CONDITIONAL([HYDROLOGYSHREVE], [test x$HAVE_HYDROLOGYSHREVE = xyes]) 398 399 220 AC_MSG_RESULT($HAVE_HYDROLOGYSHREVE) 400 401 221 dnl }}} 402 222 dnl with-HydrologyDCInefficient{{{ 403 404 223 AC_ARG_WITH([HydrologyDCInefficient], 405 406 224 AS_HELP_STRING([--with-HydrologyDCInefficient = YES], [compile with HydrologyDCInefficient capabilities (default is yes)]), 407 408 225 [HYDROLOGYDCINEFFICIENT=$withval],[HYDROLOGYDCINEFFICIENT=yes]) 409 410 226 AC_MSG_CHECKING(for HydrologyDCInefficient capability compilation) 411 227 412 413 228 HAVE_HYDROLOGYDCINEFFICIENT=no 414 415 229 if test "x$HYDROLOGYDCINEFFICIENT" = "xyes"; then 416 417 230 HAVE_HYDROLOGYDCINEFFICIENT=yes 418 419 231 AC_DEFINE([_HAVE_HYDROLOGYDCINEFFICIENT_],[1],[with HydrologyDCInefficientcapability]) 420 421 fi 422 232 fi 423 233 AM_CONDITIONAL([HYDROLOGYDCINEFFICIENT], [test x$HAVE_HYDROLOGYDCINEFFICIENT = xyes]) 424 425 234 AC_MSG_RESULT($HAVE_HYDROLOGYDCINEFFICIENT) 426 427 235 dnl }}} 428 236 dnl with-HydrologyDCEfficient{{{ 429 430 237 AC_ARG_WITH([HydrologyDCEfficient], 431 432 238 AS_HELP_STRING([--with-HydrologyDCEfficient = YES], [compile with HydrologyDCEfficient capabilities (default is yes)]), 433 434 239 [HYDROLOGYDCEFFICIENT=$withval],[HYDROLOGYDCEFFICIENT=yes]) 435 436 240 AC_MSG_CHECKING(for HydrologyDCEfficient capability compilation) 437 241 438 439 242 HAVE_HYDROLOGYDCEFFICIENT=no 440 441 243 if test "x$HYDROLOGYDCEFFICIENT" = "xyes"; then 442 443 244 HAVE_HYDROLOGYDCEFFICIENT=yes 444 445 245 AC_DEFINE([_HAVE_HYDROLOGYDCEFFICIENT_],[1],[with HydrologyDCEfficientcapability]) 446 447 fi 448 246 fi 449 247 AM_CONDITIONAL([HYDROLOGYDCEFFICIENT], [test x$HAVE_HYDROLOGYDCEFFICIENT = xyes]) 450 451 248 AC_MSG_RESULT($HAVE_HYDROLOGYDCEFFICIENT) 452 453 249 dnl }}} 454 250 dnl with-Melting{{{ 455 456 251 AC_ARG_WITH([Melting], 457 458 252 AS_HELP_STRING([--with-Melting = YES], [compile with Melting capabilities (default is yes)]), 459 460 253 [MELTING=$withval],[MELTING=yes]) 461 462 254 AC_MSG_CHECKING(for Melting capability compilation) 463 255 464 465 256 HAVE_MELTING=no 466 467 257 if test "x$MELTING" = "xyes"; then 468 469 258 HAVE_MELTING=yes 470 471 259 AC_DEFINE([_HAVE_MELTING_],[1],[with Meltingcapability]) 472 473 fi 474 260 fi 475 261 AM_CONDITIONAL([MELTING], [test x$HAVE_MELTING = xyes]) 476 477 262 AC_MSG_RESULT($HAVE_MELTING) 478 479 263 dnl }}} 480 264 dnl with-Masstransport{{{ 481 482 265 AC_ARG_WITH([Masstransport], 483 484 266 AS_HELP_STRING([--with-Masstransport = YES], [compile with Masstransport capabilities (default is yes)]), 485 486 267 [MASSTRANSPORT=$withval],[MASSTRANSPORT=yes]) 487 488 268 AC_MSG_CHECKING(for Masstransport capability compilation) 489 269 490 491 270 HAVE_MASSTRANSPORT=no 492 493 271 if test "x$MASSTRANSPORT" = "xyes"; then 494 495 272 HAVE_MASSTRANSPORT=yes 496 497 273 AC_DEFINE([_HAVE_MASSTRANSPORT_],[1],[with Masstransportcapability]) 498 499 fi 500 274 fi 501 275 AM_CONDITIONAL([MASSTRANSPORT], [test x$HAVE_MASSTRANSPORT = xyes]) 502 503 276 AC_MSG_RESULT($HAVE_MASSTRANSPORT) 504 505 277 dnl }}} 506 278 dnl with-FreeSurfaceBase{{{ 507 508 279 AC_ARG_WITH([FreeSurfaceBase], 509 510 280 AS_HELP_STRING([--with-FreeSurfaceBase = YES], [compile with FreeSurfaceBase capabilities (default is yes)]), 511 512 281 [FREESURFACEBASE=$withval],[FREESURFACEBASE=yes]) 513 514 282 AC_MSG_CHECKING(for FreeSurfaceBase capability compilation) 515 283 516 517 284 HAVE_FREESURFACEBASE=no 518 519 285 if test "x$FREESURFACEBASE" = "xyes"; then 520 521 286 HAVE_FREESURFACEBASE=yes 522 523 287 AC_DEFINE([_HAVE_FREESURFACEBASE_],[1],[with FreeSurfaceBasecapability]) 524 525 fi 526 288 fi 527 289 AM_CONDITIONAL([FREESURFACEBASE], [test x$HAVE_FREESURFACEBASE = xyes]) 528 529 290 AC_MSG_RESULT($HAVE_FREESURFACEBASE) 530 531 291 dnl }}} 532 292 dnl with-FreeSurfaceTop{{{ 533 534 293 AC_ARG_WITH([FreeSurfaceTop], 535 536 294 AS_HELP_STRING([--with-FreeSurfaceTop = YES], [compile with FreeSurfaceTop capabilities (default is yes)]), 537 538 295 [FREESURFACETOP=$withval],[FREESURFACETOP=yes]) 539 540 296 AC_MSG_CHECKING(for FreeSurfaceTop capability compilation) 541 297 542 543 298 HAVE_FREESURFACETOP=no 544 545 299 if test "x$FREESURFACETOP" = "xyes"; then 546 547 300 HAVE_FREESURFACETOP=yes 548 549 301 AC_DEFINE([_HAVE_FREESURFACETOP_],[1],[with FreeSurfaceTopcapability]) 550 551 fi 552 302 fi 553 303 AM_CONDITIONAL([FREESURFACETOP], [test x$HAVE_FREESURFACETOP = xyes]) 554 555 304 AC_MSG_RESULT($HAVE_FREESURFACETOP) 556 557 305 dnl }}} 558 306 dnl with-ExtrudeFromBase{{{ 559 560 307 AC_ARG_WITH([ExtrudeFromBase], 561 562 308 AS_HELP_STRING([--with-ExtrudeFromBase = YES], [compile with ExtrudeFromBase capabilities (default is yes)]), 563 564 309 [EXTRUDEFROMBASE=$withval],[EXTRUDEFROMBASE=yes]) 565 566 310 AC_MSG_CHECKING(for ExtrudeFromBase capability compilation) 567 311 568 569 312 HAVE_EXTRUDEFROMBASE=no 570 571 313 if test "x$EXTRUDEFROMBASE" = "xyes"; then 572 573 314 HAVE_EXTRUDEFROMBASE=yes 574 575 315 AC_DEFINE([_HAVE_EXTRUDEFROMBASE_],[1],[with ExtrudeFromBasecapability]) 576 577 fi 578 316 fi 579 317 AM_CONDITIONAL([EXTRUDEFROMBASE], [test x$HAVE_EXTRUDEFROMBASE = xyes]) 580 581 318 AC_MSG_RESULT($HAVE_EXTRUDEFROMBASE) 582 583 319 dnl }}} 584 320 dnl with-ExtrudeFromTop{{{ 585 586 321 AC_ARG_WITH([ExtrudeFromTop], 587 588 322 AS_HELP_STRING([--with-ExtrudeFromTop = YES], [compile with ExtrudeFromTop capabilities (default is yes)]), 589 590 323 [EXTRUDEFROMTOP=$withval],[EXTRUDEFROMTOP=yes]) 591 592 324 AC_MSG_CHECKING(for ExtrudeFromTop capability compilation) 593 325 594 595 326 HAVE_EXTRUDEFROMTOP=no 596 597 327 if test "x$EXTRUDEFROMTOP" = "xyes"; then 598 599 328 HAVE_EXTRUDEFROMTOP=yes 600 601 329 AC_DEFINE([_HAVE_EXTRUDEFROMTOP_],[1],[with ExtrudeFromTopcapability]) 602 603 fi 604 330 fi 605 331 AM_CONDITIONAL([EXTRUDEFROMTOP], [test x$HAVE_EXTRUDEFROMTOP = xyes]) 606 607 332 AC_MSG_RESULT($HAVE_EXTRUDEFROMTOP) 608 609 333 dnl }}} 610 334 dnl with-DepthAverage{{{ 611 612 335 AC_ARG_WITH([DepthAverage], 613 614 336 AS_HELP_STRING([--with-DepthAverage = YES], [compile with DepthAverage capabilities (default is yes)]), 615 616 337 [DEPTHAVERAGE=$withval],[DEPTHAVERAGE=yes]) 617 618 338 AC_MSG_CHECKING(for DepthAverage capability compilation) 619 339 620 621 340 HAVE_DEPTHAVERAGE=no 622 623 341 if test "x$DEPTHAVERAGE" = "xyes"; then 624 625 342 HAVE_DEPTHAVERAGE=yes 626 627 343 AC_DEFINE([_HAVE_DEPTHAVERAGE_],[1],[with DepthAveragecapability]) 628 629 fi 630 344 fi 631 345 AM_CONDITIONAL([DEPTHAVERAGE], [test x$HAVE_DEPTHAVERAGE = xyes]) 632 633 346 AC_MSG_RESULT($HAVE_DEPTHAVERAGE) 634 635 347 dnl }}} 636 348 dnl with-Smooth{{{ 637 638 349 AC_ARG_WITH([Smooth], 639 640 350 AS_HELP_STRING([--with-Smooth = YES], [compile with Smooth capabilities (default is yes)]), 641 642 351 [SMOOTH=$withval],[SMOOTH=yes]) 643 644 352 AC_MSG_CHECKING(for Smooth capability compilation) 645 353 646 647 354 HAVE_SMOOTH=no 648 649 355 if test "x$SMOOTH" = "xyes"; then 650 651 356 HAVE_SMOOTH=yes 652 653 357 AC_DEFINE([_HAVE_SMOOTH_],[1],[with Smoothcapability]) 654 655 fi 656 358 fi 657 359 AM_CONDITIONAL([SMOOTH], [test x$HAVE_SMOOTH = xyes]) 658 659 360 AC_MSG_RESULT($HAVE_SMOOTH) 660 661 361 dnl }}} 662 362 dnl with-Thermal{{{ 663 664 363 AC_ARG_WITH([Thermal], 665 666 364 AS_HELP_STRING([--with-Thermal = YES], [compile with Thermal capabilities (default is yes)]), 667 668 365 [THERMAL=$withval],[THERMAL=yes]) 669 670 366 AC_MSG_CHECKING(for Thermal capability compilation) 671 367 672 673 368 HAVE_THERMAL=no 674 675 369 if test "x$THERMAL" = "xyes"; then 676 677 370 HAVE_THERMAL=yes 678 679 371 AC_DEFINE([_HAVE_THERMAL_],[1],[with Thermalcapability]) 680 681 fi 682 372 fi 683 373 AM_CONDITIONAL([THERMAL], [test x$HAVE_THERMAL = xyes]) 684 685 374 AC_MSG_RESULT($HAVE_THERMAL) 686 687 375 dnl }}} 688 376 dnl with-UzawaPressure{{{ 689 690 377 AC_ARG_WITH([UzawaPressure], 691 692 378 AS_HELP_STRING([--with-UzawaPressure = YES], [compile with UzawaPressure capabilities (default is yes)]), 693 694 379 [UZAWAPRESSURE=$withval],[UZAWAPRESSURE=yes]) 695 696 380 AC_MSG_CHECKING(for UzawaPressure capability compilation) 697 381 698 699 382 HAVE_UZAWAPRESSURE=no 700 701 383 if test "x$UZAWAPRESSURE" = "xyes"; then 702 703 384 HAVE_UZAWAPRESSURE=yes 704 705 385 AC_DEFINE([_HAVE_UZAWAPRESSURE_],[1],[with UzawaPressurecapability]) 706 707 fi 708 386 fi 709 387 AM_CONDITIONAL([UZAWAPRESSURE], [test x$HAVE_UZAWAPRESSURE = xyes]) 710 711 388 AC_MSG_RESULT($HAVE_UZAWAPRESSURE) 712 713 389 dnl }}} 714 390 dnl with-Gia{{{ 715 716 391 AC_ARG_WITH([Gia], 717 718 392 AS_HELP_STRING([--with-Gia = YES], [compile with Gia capabilities (default is yes)]), 719 720 393 [GIA=$withval],[GIA=yes]) 721 722 394 AC_MSG_CHECKING(for Gia capability compilation) 723 395 724 725 396 HAVE_GIA=no 726 727 397 if test "x$GIA" = "xyes"; then 728 729 398 HAVE_GIA=yes 730 731 399 AC_DEFINE([_HAVE_GIA_],[1],[with Giacapability]) 732 733 fi 734 400 fi 735 401 AM_CONDITIONAL([GIA], [test x$HAVE_GIA = xyes]) 736 737 402 AC_MSG_RESULT($HAVE_GIA) 738 739 403 dnl }}} 740 404 dnl with-Seaice{{{ 741 742 405 AC_ARG_WITH([Seaice], 743 744 406 AS_HELP_STRING([--with-Seaice = YES], [compile with Seaice capabilities (default is yes)]), 745 746 407 [SEAICE=$withval],[SEAICE=yes]) 747 748 408 AC_MSG_CHECKING(for Seaice capability compilation) 749 409 750 751 410 HAVE_SEAICE=no 752 753 411 if test "x$SEAICE" = "xyes"; then 754 755 412 HAVE_SEAICE=yes 756 757 413 AC_DEFINE([_HAVE_SEAICE_],[1],[with Seaicecapability]) 758 759 fi 760 414 fi 761 415 AM_CONDITIONAL([SEAICE], [test x$HAVE_SEAICE = xyes]) 762 763 416 AC_MSG_RESULT($HAVE_SEAICE) 764 765 417 dnl }}} 766 418 dnl with-Meshdeformation{{{ 767 768 419 AC_ARG_WITH([Meshdeformation], 769 770 420 AS_HELP_STRING([--with-Meshdeformation = YES], [compile with Meshdeformation capabilities (default is yes)]), 771 772 421 [MESHDEFORMATION=$withval],[MESHDEFORMATION=yes]) 773 774 422 AC_MSG_CHECKING(for Meshdeformation capability compilation) 775 423 776 777 424 HAVE_MESHDEFORMATION=no 778 779 425 if test "x$MESHDEFORMATION" = "xyes"; then 780 781 426 HAVE_MESHDEFORMATION=yes 782 783 427 AC_DEFINE([_HAVE_MESHDEFORMATION_],[1],[with Meshdeformationcapability]) 784 785 fi 786 428 fi 787 429 AM_CONDITIONAL([MESHDEFORMATION], [test x$HAVE_MESHDEFORMATION = xyes]) 788 789 430 AC_MSG_RESULT($HAVE_MESHDEFORMATION) 790 791 431 dnl }}} 792 432 dnl with-Levelset{{{ 793 794 433 AC_ARG_WITH([Levelset], 795 796 434 AS_HELP_STRING([--with-Levelset = YES], [compile with Levelset capabilities (default is yes)]), 797 798 435 [LEVELSET=$withval],[LEVELSET=yes]) 799 800 436 AC_MSG_CHECKING(for Levelset capability compilation) 801 437 802 803 438 HAVE_LEVELSET=no 804 805 439 if test "x$LEVELSET" = "xyes"; then 806 807 440 HAVE_LEVELSET=yes 808 809 441 AC_DEFINE([_HAVE_LEVELSET_],[1],[with Levelsetcapability]) 810 811 fi 812 442 fi 813 443 AM_CONDITIONAL([LEVELSET], [test x$HAVE_LEVELSET = xyes]) 814 815 444 AC_MSG_RESULT($HAVE_LEVELSET) 816 817 445 dnl }}} 818 446 dnl with-Extrapolation{{{ 819 820 447 AC_ARG_WITH([Extrapolation], 821 822 448 AS_HELP_STRING([--with-Extrapolation = YES], [compile with Extrapolation capabilities (default is yes)]), 823 824 449 [EXTRAPOLATION=$withval],[EXTRAPOLATION=yes]) 825 826 450 AC_MSG_CHECKING(for Extrapolation capability compilation) 827 451 828 829 452 HAVE_EXTRAPOLATION=no 830 831 453 if test "x$EXTRAPOLATION" = "xyes"; then 832 833 454 HAVE_EXTRAPOLATION=yes 834 835 455 AC_DEFINE([_HAVE_EXTRAPOLATION_],[1],[with Extrapolationcapability]) 836 837 fi 838 456 fi 839 457 AM_CONDITIONAL([EXTRAPOLATION], [test x$HAVE_EXTRAPOLATION = xyes]) 840 841 458 AC_MSG_RESULT($HAVE_EXTRAPOLATION) 842 843 459 dnl }}} 844 460 dnl with-LsfReinitialization{{{ 845 846 461 AC_ARG_WITH([LsfReinitialization], 847 848 462 AS_HELP_STRING([--with-LsfReinitialization = YES], [compile with LsfReinitialization capabilities (default is yes)]), 849 850 463 [LSFREINITIALIZATION=$withval],[LSFREINITIALIZATION=yes]) 851 852 464 AC_MSG_CHECKING(for LsfReinitialization capability compilation) 853 465 854 855 466 HAVE_LSFREINITIALIZATION=no 856 857 467 if test "x$LSFREINITIALIZATION" = "xyes"; then 858 859 468 HAVE_LSFREINITIALIZATION=yes 860 861 469 AC_DEFINE([_HAVE_LSFREINITIALIZATION_],[1],[with LsfReinitializationcapability]) 862 863 fi 864 470 fi 865 471 AM_CONDITIONAL([LSFREINITIALIZATION], [test x$HAVE_LSFREINITIALIZATION = xyes]) 866 867 472 AC_MSG_RESULT($HAVE_LSFREINITIALIZATION) 868 869 473 dnl }}} 870 474 -
issm/trunk-jpl/src/c/analyses/MasstransportAnalysis.cpp
r18930 r18950 184 184 iomodel->FetchDataToInput(elements,SurfaceforcingsTemperaturesPresentdayEnum); 185 185 iomodel->FetchDataToInput(elements,SurfaceforcingsPrecipitationsPresentdayEnum); 186 iomodel->FetchDataToInput(elements,SurfaceforcingsPrecipitationsLgmEnum); 186 187 } 187 188 else{ -
issm/trunk-jpl/src/c/classes/Elements/Penta.cpp
r18948 r18950 2012 2012 IssmDouble monthlytemperatures[NUMVERTICES][12],monthlyprec[NUMVERTICES][12]; 2013 2013 IssmDouble TemperaturesPresentday[NUMVERTICES][12],TemperaturesLgm[NUMVERTICES][12]; 2014 IssmDouble PrecipitationsPresentday[NUMVERTICES][12],PrecipitationsLgm[NUMVERTICES][12]; 2014 2015 IssmDouble h[NUMVERTICES],s[NUMVERTICES]; 2015 2016 IssmDouble rho_water,rho_ice,desfac,s0p,s0t,rlaps,rlapslgm; 2016 2017 IssmDouble PfacTime,TdiffTime,sealevTime; 2018 IssmDouble sconv; //rhow_rain/rhoi / 12 months 2019 2020 /*Get material parameters :*/ 2021 rho_ice=matpar->GetRhoIce(); 2022 rho_water=matpar->GetRhoFreshwater(); 2023 2024 sconv=(rho_water/rho_ice)/12.; //to convert monbthly prec in m of ice equivalent per month 2017 2025 2018 2026 /*Recover monthly temperatures and precipitation*/ … … 2021 2029 Input* input3=inputs->GetInput(SurfaceforcingsTemperaturesPresentdayEnum); _assert_(input3); 2022 2030 Input* input4=inputs->GetInput(SurfaceforcingsTemperaturesLgmEnum); _assert_(input4); 2031 Input* input5=inputs->GetInput(SurfaceforcingsPrecipitationsPresentdayEnum); _assert_(input5); 2032 Input* input6=inputs->GetInput(SurfaceforcingsPrecipitationsLgmEnum); _assert_(input6); 2023 2033 GaussPenta* gauss=new GaussPenta(); 2024 2034 IssmDouble time,yts; 2025 2035 this->parameters->FindParam(&time,TimeEnum); 2026 2036 this->parameters->FindParam(&yts,ConstantsYtsEnum); 2037 2027 2038 for(int month=0;month<12;month++) { 2028 2039 for(int iv=0;iv<NUMVERTICES;iv++) { … … 2031 2042 monthlytemperatures[iv][month]=monthlytemperatures[iv][month]-273.15; // conversion from Kelvin to celcius 2032 2043 input2->GetInputValue(&monthlyprec[iv][month],gauss,time+month/12.*yts); 2033 monthlyprec[iv][month]=monthlyprec[iv][month]* yts; // convertion to m/yr2044 monthlyprec[iv][month]=monthlyprec[iv][month]*sconv; // convertion to m/yr 2034 2045 input3->GetInputValue(&TemperaturesPresentday[iv][month],gauss,month/12.*yts); 2035 2046 TemperaturesPresentday[iv][month]=TemperaturesPresentday[iv][month]-273.15; // conversion from Kelvin to celcius 2036 2047 input4->GetInputValue(&TemperaturesLgm[iv][month],gauss,month/12.*yts); 2037 2048 TemperaturesLgm[iv][month]=TemperaturesLgm[iv][month]-273.15; // conversion from Kelvin to celcius 2049 input5->GetInputValue(&PrecipitationsPresentday[iv][month],gauss,month/12.*yts); 2050 PrecipitationsPresentday[iv][month]=PrecipitationsPresentday[iv][month]; 2051 input6->GetInputValue(&PrecipitationsLgm[iv][month],gauss,month/12.*yts); 2052 PrecipitationsLgm[iv][month]=PrecipitationsLgm[iv][month]; 2038 2053 } 2039 2054 } … … 2046 2061 /*Recover info at the vertices: */ 2047 2062 GetInputListOnVertices(&h[0],ThicknessEnum); 2048 GetInputListOnVertices(&s[0],SurfaceEnum); 2049 2050 /*Get material parameters :*/ 2051 rho_ice=matpar->GetMaterialParameter(MaterialsRhoIceEnum); 2052 rho_water=matpar->GetMaterialParameter(MaterialsRhoFreshwaterEnum); 2063 GetInputListOnVertices(&s[0],SurfaceEnum); 2053 2064 2054 2065 /*Get other pdd parameters*/ … … 2063 2074 agd[iv]=PddSurfaceMassBlance(&monthlytemperatures[iv][0], &monthlyprec[iv][0], 2064 2075 &TemperaturesLgm[iv][0], &TemperaturesPresentday[iv][0], 2065 pdds,pds, signorm, yts, h[iv], s[iv], rho_ice, rho_water, 2076 &PrecipitationsLgm[iv][0], &PrecipitationsPresentday[iv][0], 2077 pdds,pds, signorm, yts, h[iv], s[iv], 2066 2078 desfac, s0t, s0p,rlaps,rlapslgm,PfacTime,TdiffTime,sealevTime); 2067 2079 } -
issm/trunk-jpl/src/c/classes/Elements/Tria.cpp
r18949 r18950 2215 2215 IssmDouble monthlytemperatures[NUMVERTICES][12],monthlyprec[NUMVERTICES][12]; 2216 2216 IssmDouble TemperaturesPresentday[NUMVERTICES][12],TemperaturesLgm[NUMVERTICES][12]; 2217 IssmDouble PrecipitationsPresentday[NUMVERTICES][12],PrecipitationsLgm[NUMVERTICES][12]; 2217 2218 IssmDouble h[NUMVERTICES],s[NUMVERTICES]; 2218 2219 IssmDouble rho_water,rho_ice,desfac,s0p,s0t,rlaps,rlapslgm; 2219 2220 IssmDouble PfacTime,TdiffTime,sealevTime; 2221 IssmDouble sconv; //rhow_rain/rhoi / 12 months 2222 2223 /*Get material parameters :*/ 2224 rho_ice=matpar->GetRhoIce(); 2225 rho_water=matpar->GetRhoFreshwater(); 2226 2227 sconv=(rho_water/rho_ice)/12.; //to convert monbthly prec in m of ice equivalent per month 2220 2228 2221 2229 /*Recover monthly temperatures and precipitation and Present day and LGm ones*/ … … 2224 2232 Input* input3=inputs->GetInput(SurfaceforcingsTemperaturesPresentdayEnum); _assert_(input3); 2225 2233 Input* input4=inputs->GetInput(SurfaceforcingsTemperaturesLgmEnum); _assert_(input4); 2234 Input* input5=inputs->GetInput(SurfaceforcingsPrecipitationsPresentdayEnum); _assert_(input5); 2235 Input* input6=inputs->GetInput(SurfaceforcingsPrecipitationsLgmEnum); _assert_(input6); 2226 2236 GaussTria* gauss=new GaussTria(); 2227 2237 IssmDouble time,yts; … … 2234 2244 monthlytemperatures[iv][month]=monthlytemperatures[iv][month]-273.15; // conversion from Kelvin to celcius 2235 2245 input2->GetInputValue(&monthlyprec[iv][month],gauss,time+month/12.*yts); 2236 monthlyprec[iv][month]=monthlyprec[iv][month]* yts; // convertion in m/y2246 monthlyprec[iv][month]=monthlyprec[iv][month]*sconv*yts; // convertion in m/y 2237 2247 input3->GetInputValue(&TemperaturesPresentday[iv][month],gauss,month/12.*yts); 2238 2248 TemperaturesPresentday[iv][month]=TemperaturesPresentday[iv][month]-273.15; // conversion from Kelvin to celcius 2239 2249 input4->GetInputValue(&TemperaturesLgm[iv][month],gauss,month/12.*yts); 2240 2250 TemperaturesLgm[iv][month]=TemperaturesLgm[iv][month]-273.15; // conversion from Kelvin to celcius 2251 input5->GetInputValue(&PrecipitationsPresentday[iv][month],gauss,month/12.*yts); 2252 PrecipitationsPresentday[iv][month]=PrecipitationsPresentday[iv][month]; 2253 input6->GetInputValue(&PrecipitationsLgm[iv][month],gauss,month/12.*yts); 2254 PrecipitationsLgm[iv][month]=PrecipitationsLgm[iv][month]; 2241 2255 } 2242 2256 } … … 2250 2264 GetInputListOnVertices(&h[0],ThicknessEnum); 2251 2265 GetInputListOnVertices(&s[0],SurfaceEnum); 2252 2253 /*Get material parameters :*/2254 rho_ice=matpar->GetMaterialParameter(MaterialsRhoIceEnum);2255 rho_water=matpar->GetMaterialParameter(MaterialsRhoFreshwaterEnum);2256 2266 2257 2267 /*Get other pdd parameters*/ … … 2266 2276 agd[iv]=PddSurfaceMassBlance(&monthlytemperatures[iv][0], &monthlyprec[iv][0], 2267 2277 &TemperaturesLgm[iv][0], &TemperaturesPresentday[iv][0], 2268 pdds, pds, signorm, yts, h[iv], s[iv], rho_ice, rho_water, 2278 &PrecipitationsLgm[iv][0], &PrecipitationsPresentday[iv][0], 2279 pdds, pds, signorm, yts, h[iv], s[iv], 2269 2280 desfac, s0t, s0p,rlaps,rlapslgm,PfacTime,TdiffTime,sealevTime); 2270 2281 } -
issm/trunk-jpl/src/c/shared/Elements/ComputeDelta18oTemperaturePrecipitation.cpp
r18717 r18950 17 17 IssmDouble glacialindex; // used to vary present day temperature 18 18 19 glacialindex = 0.;//(Delta18oTime-Delta18oPresent-delta18oLapseRate*(Delta18oSurfaceTime-Delta18oSurfacePresent)) 20 // /(Delta18oLgm-Delta18oPresent-delta18oLapseRate*(Delta18oSurfaceLgm-Delta18oSurfacePresent)); 19 // CURENTLY THE TEMPERATURE COMPUTED HERE ARE NOT USED. 20 // Tdiff is used isnstead in PddSurfaceMassBalance.cpp to get the interpolated temperature 21 22 glacialindex = (Delta18oTime-Delta18oPresent-delta18oLapseRate*(Delta18oSurfaceTime-Delta18oSurfacePresent)) 23 /(Delta18oLgm-Delta18oPresent-delta18oLapseRate*(Delta18oSurfaceLgm-Delta18oSurfacePresent)); // Tarasov 2004 paper 21 24 22 25 for (int imonth = 0; imonth<12; imonth++){ -
issm/trunk-jpl/src/c/shared/Elements/PddSurfaceMassBalance.cpp
r18717 r18950 8 8 IssmDouble PddSurfaceMassBlance(IssmDouble* monthlytemperatures, IssmDouble* monthlyprec, 9 9 IssmDouble* TemperaturesLgm, IssmDouble* TemperaturesPresentday, 10 IssmDouble* PrecipitationsLgm, IssmDouble* PrecipitationsPresentday, 10 11 IssmDouble* pdds, IssmDouble* pds, IssmDouble signorm, 11 IssmDouble yts, IssmDouble h, IssmDouble s, IssmDouble rho_ice,12 IssmDouble rho_water, IssmDouble desfac, IssmDoubles0t,12 IssmDouble yts, IssmDouble h, IssmDouble s, IssmDouble desfac, 13 IssmDouble s0t, 13 14 IssmDouble s0p, IssmDouble rlaps, IssmDouble rlapslgm, 14 15 IssmDouble PfacTime,IssmDouble TdiffTime,IssmDouble sealevTime){ 16 17 // CURENTLY monthlytemperatures and monthlyprec ARE NOT USED HERE. 18 // THEY ARE REPLACE BY tdiffh No usage of deltO18 anymore 15 19 16 20 // output: … … 24 28 IssmDouble water; //water=rain + snowmelt 25 29 IssmDouble runoff; //meltwater only, does not include rain 26 IssmDouble sconv; //rhow_rain/rhoi / 12 months27 30 28 31 //IssmDouble sealev=0.; // degrees per meter. 7.5 lev's 99 paper, 9 Marshall 99 paper … … 30 33 IssmDouble rtlaps; 31 34 // IssmDouble lapser=6.5 // lapse rate 32 // IssmDouble desfac = 0. 5; // desert elevation factor35 // IssmDouble desfac = 0.3; // desert elevation factor 33 36 // IssmDouble s0p=0.; // should be set to elevation from precip source 34 37 // IssmDouble s0t=0.; // should be set to elevation from temperature source … … 36 39 IssmDouble st; // elevation between altitude of the temp record and current altitude 37 40 IssmDouble sp; // elevation between altitude of the prec record and current altitude 41 IssmDouble deselcut=1.0; 38 42 39 43 // PDD and PD constants and variables … … 45 49 IssmDouble pddt, pd; // pd: snow/precip fraction, precipitation falling as snow 46 50 47 IssmDouble q, qmpt; // q is desert/elev. fact, hnpfac is huybrect fact, and pd is normal dist. 48 IssmDouble qm = 0.; // snow part of the precipitation 49 IssmDouble qmt = 0.; // precipitation without desertification effect adjustment 50 IssmDouble qmp = 0.; // desertification taken into account 51 IssmDouble premt; // monthly precipitation (m of ice equivalent) 52 IssmDouble q, qmpt; // q is desert/elev. fact, hnpfac is huybrect fact, and pd is normal dist. 53 IssmDouble qm = 0.; // snow part of the precipitation 54 IssmDouble qmt = 0.; // precipitation without desertification effect adjustment 55 IssmDouble qmp = 0.; // desertification taken into account 51 56 IssmDouble pdd = 0.; 52 57 IssmDouble frzndd = 0.; … … 68 73 IssmDouble pddtj, hmx2; 69 74 70 sconv=(rho_water/rho_ice)/12.; //rhow_rain/rhoi / 12 months71 75 72 76 /*PDD constant*/ … … 98 102 99 103 /******exp des/elev precip reduction*******/ 100 sp=(s-s0p)/1000. ; // deselev effect is wrt chng in topo104 sp=(s-s0p)/1000.-deselcut; // deselev effect is wrt chng in topo 101 105 if (sp>0.0){q = exp(-desfac*sp);} 102 106 else {q = 1.0;} 103 107 104 qmt= qmt + monthlyprec[imonth]*sconv; //*sconv to convert in m of ice equivalent per month 105 qmpt= q*monthlyprec[imonth]*sconv; 108 premt =min(1.5, PrecipitationsPresentday[imonth] * pow(PrecipitationsLgm[imonth],PfacTime)); // [m/month] 109 110 qmt= qmt + premt; 111 qmpt= q*premt; 106 112 qmp= qmp + qmpt; 107 113 qm= qm + qmpt*pd; … … 110 116 // ndd(month)=-(tstar-pdd(month)) since ndd+pdd gives expectation of 111 117 // gaussian=T_m, so ndd=-(Tsurf-pdd) 112 if (iqj>5 && 118 if (iqj>5 && iqj<9){ Tsum=Tsum+tstar;} 113 119 114 120 if (tstar >= siglim) {pdd = pdd + tstar*deltm;} -
issm/trunk-jpl/src/c/shared/Elements/elements.h
r18717 r18950 15 15 IssmDouble PddSurfaceMassBlance(IssmDouble* monthlytemperatures, IssmDouble* monthlyprec, 16 16 IssmDouble* TemperaturesLgm, IssmDouble* TemperaturesPresentday, 17 IssmDouble* PrecipitationsLgm, IssmDouble* PrecipitationsPresentday, 17 18 IssmDouble* pdds, IssmDouble* pds,IssmDouble signorm, IssmDouble yts, 18 IssmDouble h, IssmDouble s, IssmDouble rho_ice,IssmDouble rho_water, IssmDoubledesfac,19 IssmDouble h, IssmDouble s, IssmDouble desfac, 19 20 IssmDouble s0t,IssmDouble s0p, IssmDouble rlaps, IssmDouble rlapslgm, 20 21 IssmDouble PfacTime,IssmDouble TdiffTime,IssmDouble sealevTime); -
issm/trunk-jpl/src/c/shared/Enum/EnumDefinitions.h
r18945 r18950 342 342 SurfaceforcingsIsdelta18oEnum, 343 343 SurfaceforcingsPrecipitationsPresentdayEnum, 344 SurfaceforcingsPrecipitationsLgmEnum, 344 345 SurfaceforcingsTemperaturesPresentdayEnum, 345 346 SurfaceforcingsTemperaturesLgmEnum, -
issm/trunk-jpl/src/c/shared/Enum/EnumToStringx.cpp
r18945 r18950 348 348 case SurfaceforcingsIsdelta18oEnum : return "SurfaceforcingsIsdelta18o"; 349 349 case SurfaceforcingsPrecipitationsPresentdayEnum : return "SurfaceforcingsPrecipitationsPresentday"; 350 case SurfaceforcingsPrecipitationsLgmEnum : return "SurfaceforcingsPrecipitationsLgm"; 350 351 case SurfaceforcingsTemperaturesPresentdayEnum : return "SurfaceforcingsTemperaturesPresentday"; 351 352 case SurfaceforcingsTemperaturesLgmEnum : return "SurfaceforcingsTemperaturesLgm"; -
issm/trunk-jpl/src/c/shared/Enum/StringToEnumx.cpp
r18945 r18950 354 354 else if (strcmp(name,"SurfaceforcingsIsdelta18o")==0) return SurfaceforcingsIsdelta18oEnum; 355 355 else if (strcmp(name,"SurfaceforcingsPrecipitationsPresentday")==0) return SurfaceforcingsPrecipitationsPresentdayEnum; 356 else if (strcmp(name,"SurfaceforcingsPrecipitationsLgm")==0) return SurfaceforcingsPrecipitationsLgmEnum; 356 357 else if (strcmp(name,"SurfaceforcingsTemperaturesPresentday")==0) return SurfaceforcingsTemperaturesPresentdayEnum; 357 358 else if (strcmp(name,"SurfaceforcingsTemperaturesLgm")==0) return SurfaceforcingsTemperaturesLgmEnum; … … 382 383 else if (strcmp(name,"SurfaceforcingsIssmbgradients")==0) return SurfaceforcingsIssmbgradientsEnum; 383 384 else if (strcmp(name,"SolutionType")==0) return SolutionTypeEnum; 384 else if (strcmp(name,"AnalysisType")==0) return AnalysisTypeEnum;385 385 else stage=4; 386 386 } 387 387 if(stage==4){ 388 if (strcmp(name,"ConfigurationType")==0) return ConfigurationTypeEnum; 388 if (strcmp(name,"AnalysisType")==0) return AnalysisTypeEnum; 389 else if (strcmp(name,"ConfigurationType")==0) return ConfigurationTypeEnum; 389 390 else if (strcmp(name,"AdjointBalancethicknessAnalysis")==0) return AdjointBalancethicknessAnalysisEnum; 390 391 else if (strcmp(name,"AdjointBalancethickness2Analysis")==0) return AdjointBalancethickness2AnalysisEnum; … … 505 506 else if (strcmp(name,"Massconaxpby")==0) return MassconaxpbyEnum; 506 507 else if (strcmp(name,"MassconaxpbyName")==0) return MassconaxpbyNameEnum; 507 else if (strcmp(name,"MassconaxpbyDefinitionenum")==0) return MassconaxpbyDefinitionenumEnum;508 508 else stage=5; 509 509 } 510 510 if(stage==5){ 511 if (strcmp(name,"MassconaxpbyNamex")==0) return MassconaxpbyNamexEnum; 511 if (strcmp(name,"MassconaxpbyDefinitionenum")==0) return MassconaxpbyDefinitionenumEnum; 512 else if (strcmp(name,"MassconaxpbyNamex")==0) return MassconaxpbyNamexEnum; 512 513 else if (strcmp(name,"MassconaxpbyNamey")==0) return MassconaxpbyNameyEnum; 513 514 else if (strcmp(name,"MassconaxpbyAlpha")==0) return MassconaxpbyAlphaEnum; … … 628 629 else if (strcmp(name,"StrainRatexx")==0) return StrainRatexxEnum; 629 630 else if (strcmp(name,"StrainRatexy")==0) return StrainRatexyEnum; 630 else if (strcmp(name,"StrainRatexz")==0) return StrainRatexzEnum;631 631 else stage=6; 632 632 } 633 633 if(stage==6){ 634 if (strcmp(name,"StrainRateyy")==0) return StrainRateyyEnum; 634 if (strcmp(name,"StrainRatexz")==0) return StrainRatexzEnum; 635 else if (strcmp(name,"StrainRateyy")==0) return StrainRateyyEnum; 635 636 else if (strcmp(name,"StrainRateyz")==0) return StrainRateyzEnum; 636 637 else if (strcmp(name,"StrainRatezz")==0) return StrainRatezzEnum; … … 751 752 else if (strcmp(name,"Nodal")==0) return NodalEnum; 752 753 else if (strcmp(name,"OldGradient")==0) return OldGradientEnum; 753 else if (strcmp(name,"OutputFilePointer")==0) return OutputFilePointerEnum;754 754 else stage=7; 755 755 } 756 756 if(stage==7){ 757 if (strcmp(name,"ToolkitsFileName")==0) return ToolkitsFileNameEnum; 757 if (strcmp(name,"OutputFilePointer")==0) return OutputFilePointerEnum; 758 else if (strcmp(name,"ToolkitsFileName")==0) return ToolkitsFileNameEnum; 758 759 else if (strcmp(name,"RootPath")==0) return RootPathEnum; 759 760 else if (strcmp(name,"OutputFileName")==0) return OutputFileNameEnum; -
issm/trunk-jpl/src/m/classes/SMBpdd.m
r18728 r18950 11 11 s0p = 0; 12 12 s0t = 0; 13 rlaps = 0;14 rlapslgm = 0;15 Pfac = NaN;16 Tdiff = NaN;17 sealev = NaN;13 rlaps = 0; 14 rlapslgm = 0; 15 Pfac = NaN; 16 Tdiff = NaN; 17 sealev = NaN; 18 18 isdelta18o = 0; 19 19 delta18o = NaN; … … 22 22 temperatures_lgm = NaN; 23 23 precipitations_presentday = NaN; 24 precipitations_lgm = NaN; 24 25 end 25 26 methods … … 39 40 if(self.isdelta18o),self.temperatures_presentday=project3d(md,'vector',self.temperatures_presentday,'type','node');end 40 41 if(self.isdelta18o),self.precipitations_presentday=project3d(md,'vector',self.precipitations_presentday,'type','node');end 42 if(self.isdelta18o),self.precipitations_lgm=project3d(md,'vector',self.precipitations_lgm,'type','node');end 41 43 42 44 … … 80 82 md = checkfield(md,'fieldname','surfaceforcings.temperatures_lgm','size',[md.mesh.numberofvertices+1 12],'NaN',1); 81 83 md = checkfield(md,'fieldname','surfaceforcings.precipitations_presentday','size',[md.mesh.numberofvertices+1 12],'NaN',1); 84 md = checkfield(md,'fieldname','surfaceforcings.precipitations_lgm','size',[md.mesh.numberofvertices+1 12],'NaN',1); 82 85 end 83 86 end … … 96 99 fielddisplay(obj,'Tdiff','time interpolation parameter for temperature, 1D(year)'); 97 100 fielddisplay(obj,'sealev','sea level [m], 1D(year)'); 98 fielddisplay(obj,'monthlytemperatures', 'monthly surface temperatures [K], required if pdd is activated and delta18o not activated');99 fielddisplay(obj,'precipitation', 'surface precipitation [m/yr water eq]');101 fielddisplay(obj,'monthlytemperatures',['CURRENTLY NOT USED monthly surface temperatures [K], required if pdd is activated and delta18o not activated']); 102 fielddisplay(obj,'precipitation',['CURRENTLY NOT USED monthly surface precipitation [m/yr water eq]']); 100 103 fielddisplay(obj,'temperatures_presentday','monthly present day surface temperatures [K], required if pdd is activated and delta18o activated'); 101 104 fielddisplay(obj,'temperatures_lgm','monthly LGM surface temperatures [K], required if pdd is activated and delta18o activated'); 102 105 fielddisplay(obj,'precipitations_presentday','monthly surface precipitation [m/yr water eq], required if pdd is activated and delta18o activated'); 106 fielddisplay(obj,'precipitations_lgm','monthly surface precipitation [m/yr water eq], required if pdd is activated and delta18o activated'); 103 107 fielddisplay(obj,'delta18o','delta18o, required if pdd is activated and delta18o activated'); 104 108 fielddisplay(obj,'delta18o_surface','surface elevation of the delta18o site, required if pdd is activated and delta18o activated'); … … 125 129 WriteData(fid,'object',obj,'class','surfaceforcings','fieldname','temperatures_lgm','format','DoubleMat','mattype',1); 126 130 WriteData(fid,'object',obj,'class','surfaceforcings','fieldname','precipitations_presentday','format','DoubleMat','mattype',1); 131 WriteData(fid,'object',obj,'class','surfaceforcings','fieldname','precipitations_lgm','format','DoubleMat','mattype',1); 127 132 WriteData(fid,'object',obj,'class','surfaceforcings','fieldname','delta18o_surface','format','DoubleMat','mattype',1); 128 133 WriteData(fid,'object',obj,'class','surfaceforcings','fieldname','delta18o','format','DoubleMat','mattype',1); -
issm/trunk-jpl/src/m/enum/EnumDefinitions.py
r18945 r18950 340 340 def SurfaceforcingsIsdelta18oEnum(): return StringToEnum("SurfaceforcingsIsdelta18o")[0] 341 341 def SurfaceforcingsPrecipitationsPresentdayEnum(): return StringToEnum("SurfaceforcingsPrecipitationsPresentday")[0] 342 def SurfaceforcingsPrecipitationsLgmEnum(): return StringToEnum("SurfaceforcingsPrecipitationsLgm")[0] 342 343 def SurfaceforcingsTemperaturesPresentdayEnum(): return StringToEnum("SurfaceforcingsTemperaturesPresentday")[0] 343 344 def SurfaceforcingsTemperaturesLgmEnum(): return StringToEnum("SurfaceforcingsTemperaturesLgm")[0] -
issm/trunk-jpl/src/m/plot/processmesh.m
r17686 r18950 21 21 end 22 22 23 %first load x,y, etc ... to speed up plot 24 if ~strcmpi(getfieldvalue(options,'coord','xy'),'latlon'), 25 x=md.mesh.x; 26 if isprop(md.mesh,'x2d'), x2d=md.mesh.x2d; end 27 y=md.mesh.y; 28 if isprop(md.mesh,'y2d'), y2d=md.mesh.y2d; end 29 else 30 x=md.mesh.long; 31 y=md.mesh.lat; 32 end 23 if ~strcmpi(getfieldvalue(options,'coord','xy'),'latlon'), 24 x=md.mesh.x; 25 x2d=md.mesh.x2d; %if isprop(md.mesh,'x2d'), x2d=md.mesh.x2d; end 26 y=md.mesh.y; 27 y2d=md.mesh.y2d; %if isprop(md.mesh,'y2d'), y2d=md.mesh.y2d; end 28 else 29 x=md.mesh.long; 30 y=md.mesh.lat; 31 end 33 32 34 33 if isprop(md.mesh,'z'), … … 42 41 end 43 42 44 if isprop(md.mesh,'elements2d'), elements2d=md.mesh.elements2d; end45 elements=md.mesh.elements;43 elements2d=md.mesh.elements2d;%if isprop(md.mesh,'elements2d'), elements2d=md.mesh.elements2d; end 44 elements=md.mesh.elements; 46 45 47 46 %is it a 2d plot?
Note:
See TracChangeset
for help on using the changeset viewer.