V26 moistadjust 15 moistadjust.f90 S582 0 12/11/2015 21:06:34 use chemcalc private use composition private use constants private use basicset private use gridset private use dc_message private use dc_types private use chemcalc private use composition private use constants private use basicset private use gridset private use dc_message private use dc_types private enduse D 704 21 9 3 1022 1033 0 0 1 0 0 362 363 3 1023 1024 1025 367 368 1025 1026 1027 1028 372 373 1029 1030 1031 1032 D 707 21 9 3 1022 1033 0 0 1 0 0 362 363 3 1023 1024 1025 367 368 1025 1026 1027 1028 372 373 1029 1030 1031 1032 D 710 21 9 3 1022 1033 0 0 1 0 0 362 363 3 1023 1024 1025 367 368 1025 1026 1027 1028 372 373 1029 1030 1031 1032 D 713 21 9 4 1034 1036 0 0 1 0 0 362 363 3 1023 1024 1025 367 368 1025 1026 1027 1028 372 373 1029 1030 1031 1032 0 971 1033 3 1035 1035 D 716 21 9 3 1037 1048 0 0 1 0 0 362 363 3 1038 1039 1040 367 368 1040 1041 1042 1043 372 373 1044 1045 1046 1047 D 719 21 9 3 1037 1048 0 0 1 0 0 362 363 3 1038 1039 1040 367 368 1040 1041 1042 1043 372 373 1044 1045 1046 1047 D 722 21 9 3 1037 1048 0 0 1 0 0 362 363 3 1038 1039 1040 367 368 1040 1041 1042 1043 372 373 1044 1045 1046 1047 D 725 21 9 4 1049 1051 0 0 1 0 0 362 363 3 1038 1039 1040 367 368 1040 1041 1042 1043 372 373 1044 1045 1046 1047 0 971 1048 3 1050 1050 S 582 24 0 0 0 6 1 0 4658 10015 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 23 0 0 0 0 0 0 moistadjust S 584 23 0 0 0 8 625 582 4679 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 dp S 586 19 0 0 0 6 1 582 4693 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 9 2 0 0 0 0 0 582 0 0 0 0 messagenotify O 586 2 694 655 S 588 23 0 0 0 6 930 582 4715 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 ncmax S 589 23 0 0 0 6 934 582 4721 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 imin S 590 23 0 0 0 6 935 582 4726 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 imax S 591 23 0 0 0 6 936 582 4731 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 jmin S 592 23 0 0 0 6 937 582 4736 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 jmax S 593 23 0 0 0 6 938 582 4741 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 kmin S 594 23 0 0 0 6 939 582 4746 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 kmax S 596 23 0 0 0 8 1570 582 4760 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 xyz_exnerbz S 597 23 0 0 0 8 1586 582 4772 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 xyz_ptempbz S 598 23 0 0 0 8 1650 582 4784 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 xyzf_qmixbz S 600 23 0 0 0 8 1739 582 4806 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 pressbasis S 601 23 0 0 0 8 1744 582 4817 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 cpdry S 602 23 0 0 0 6 1747 582 4823 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 molwtdry S 603 23 0 0 0 8 1748 582 4832 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 gasrdry S 605 23 0 0 0 6 1483 582 4852 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 molwtwet S 606 23 0 0 0 8 1477 582 4861 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 spcwetid S 607 23 0 0 0 8 1466 582 4870 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 condnum S 608 23 0 0 0 6 1467 582 4878 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 idxcg S 609 23 0 0 0 6 1468 582 4884 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 idxcc S 610 23 0 0 0 6 1471 582 4890 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 idxnh3 S 611 23 0 0 0 6 1472 582 4897 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 idxh2s S 612 23 0 0 0 6 1473 582 4904 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 idxnh4shc S 614 23 0 0 0 8 1851 582 4923 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 xyz_svappress S 615 23 0 0 0 8 1868 582 4937 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 xyz_latentheat S 616 23 0 0 0 8 1791 582 4952 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 reactheatnh4sh S 617 23 0 0 0 8 1897 582 4967 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 xyz_dqmixsatdptemp S 618 23 0 0 0 8 1919 582 4986 14 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 xyz_delqmixnh4sh R 625 16 1 dc_types dp R 655 14 23 dc_message messagenotifyc R 694 14 62 dc_message messagenotifyi R 930 6 9 gridset ncmax R 934 6 13 gridset imin R 935 6 14 gridset imax R 936 6 15 gridset jmin R 937 6 16 gridset jmax R 938 6 17 gridset kmin R 939 6 18 gridset kmax R 1466 6 16 composition condnum R 1467 7 17 composition idxcg R 1468 7 18 composition idxcc R 1471 6 21 composition idxnh3 R 1472 6 22 composition idxh2s R 1473 6 23 composition idxnh4shc R 1477 7 27 composition spcwetid R 1483 7 33 composition molwtwet R 1570 7 53 basicset xyz_exnerbz R 1586 7 69 basicset xyz_ptempbz R 1650 7 133 basicset xyzf_qmixbz R 1739 6 11 constants pressbasis R 1744 6 16 constants cpdry R 1747 6 19 constants molwtdry R 1748 6 20 constants gasrdry R 1791 6 38 chemcalc reactheatnh4sh R 1851 14 98 chemcalc xyz_svappress R 1868 14 115 chemcalc xyz_latentheat R 1897 14 144 chemcalc xyz_dqmixsatdptemp R 1919 14 166 chemcalc xyz_delqmixnh4sh S 1941 27 0 0 0 6 1943 582 13096 0 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 moistadjustsvappress S 1942 27 0 0 0 6 1965 582 13117 0 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 moistadjustnh4sh S 1943 23 5 0 0 0 1949 582 13096 0 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 moistadjustsvappress S 1944 7 3 1 0 704 1 1943 12979 800214 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 xyz_pressdry S 1945 7 3 1 0 707 1 1943 12210 800214 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 xyz_exner S 1946 7 3 3 0 710 1 1943 12229 800214 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 xyz_ptemp S 1947 7 3 3 0 713 1 1943 12261 800214 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 xyzf_qmix S 1948 1 3 1 0 9 1 1943 13134 14 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 factorcloud2gas S 1949 14 5 0 0 0 1 1943 13096 200 400000 A 0 0 0 0 0 0 0 220 5 0 0 0 0 0 0 0 0 0 0 0 0 66 0 582 0 0 0 0 moistadjustsvappress F 1949 5 1944 1945 1946 1947 1948 S 1950 6 1 0 0 6 1 1943 13150 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_362 S 1951 6 1 0 0 6 1 1943 13158 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_363 S 1952 6 1 0 0 6 1 1943 12300 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_1025 S 1953 6 1 0 0 6 1 1943 13166 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_367 S 1954 6 1 0 0 6 1 1943 13174 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_368 S 1955 6 1 0 0 6 1 1943 12325 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_1030 S 1956 6 1 0 0 6 1 1943 12334 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_1032 S 1957 6 1 0 0 6 1 1943 13182 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_372 S 1958 6 1 0 0 6 1 1943 13190 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_373 S 1959 6 1 0 0 6 1 1943 12351 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_1037 S 1960 6 1 0 0 6 1 1943 12360 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_1039 S 1961 6 1 0 0 6 1 1943 12369 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_1044 S 1962 6 1 0 0 6 1 1943 13198 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_971 S 1963 6 1 0 0 6 1 1943 13206 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_1047 S 1964 6 1 0 0 6 1 1943 13215 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_1049 S 1965 23 5 0 0 0 1971 582 13117 0 0 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 moistadjustnh4sh S 1966 7 3 1 0 716 1 1965 12979 800214 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 xyz_pressdry S 1967 7 3 1 0 719 1 1965 12210 800214 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 xyz_exner S 1968 7 3 3 0 722 1 1965 12229 800214 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 xyz_ptemp S 1969 7 3 3 0 725 1 1965 12261 800214 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 xyzf_qmix S 1970 1 3 1 0 9 1 1965 13134 14 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 factorcloud2gas S 1971 14 5 0 0 0 1 1965 13117 200 400000 A 0 0 0 0 0 0 0 226 5 0 0 0 0 0 0 0 0 0 0 0 0 171 0 582 0 0 0 0 moistadjustnh4sh F 1971 5 1966 1967 1968 1969 1970 S 1972 6 1 0 0 6 1 1965 13150 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_362 S 1973 6 1 0 0 6 1 1965 13158 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_363 S 1974 6 1 0 0 6 1 1965 13224 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_1040 S 1975 6 1 0 0 6 1 1965 13166 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_367 S 1976 6 1 0 0 6 1 1965 13174 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_368 S 1977 6 1 0 0 6 1 1965 13233 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_1045 S 1978 6 1 0 0 6 1 1965 13206 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_1047 S 1979 6 1 0 0 6 1 1965 13182 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_372 S 1980 6 1 0 0 6 1 1965 13190 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_373 S 1981 6 1 0 0 6 1 1965 13242 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_1052 S 1982 6 1 0 0 6 1 1965 13251 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_1054 S 1983 6 1 0 0 6 1 1965 13260 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_1059 S 1984 6 1 0 0 6 1 1965 13198 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_971 S 1985 6 1 0 0 6 1 1965 13269 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_1062 S 1986 6 1 0 0 6 1 1965 13278 40800016 3000 A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 z_e_1064 A 362 1 0 0 0 6 934 0 0 0 0 0 0 0 0 0 0 0 0 0 A 363 1 0 0 0 6 935 0 0 0 0 0 0 0 0 0 0 0 0 0 A 367 1 0 0 0 6 936 0 0 0 0 0 0 0 0 0 0 0 0 0 A 368 1 0 0 0 6 937 0 0 0 0 0 0 0 0 0 0 0 0 0 A 372 1 0 0 347 6 938 0 0 0 0 0 0 0 0 0 0 0 0 0 A 373 1 0 0 0 6 939 0 0 0 0 0 0 0 0 0 0 0 0 0 A 971 1 0 0 339 6 930 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1022 1 0 0 937 6 1961 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1023 1 0 0 158 6 1950 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1024 1 0 0 137 6 1951 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1025 1 0 0 0 6 1952 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1026 1 0 0 877 6 1953 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1027 1 0 0 357 6 1954 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1028 1 0 0 238 6 1955 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1029 1 0 0 0 6 1956 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1030 1 0 0 0 6 1957 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1031 1 0 0 882 6 1958 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1032 1 0 0 0 6 1959 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1033 1 0 0 896 6 1960 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1034 1 0 0 0 6 1964 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1035 1 0 0 0 6 1962 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1036 1 0 0 7 6 1963 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1037 1 0 0 0 6 1983 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1038 1 0 0 0 6 1972 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1039 1 0 0 299 6 1973 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1040 1 0 0 0 6 1974 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1041 1 0 0 0 6 1975 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1042 1 0 0 900 6 1976 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1043 1 0 0 757 6 1977 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1044 1 0 0 0 6 1978 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1045 1 0 0 0 6 1979 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1046 1 0 0 0 6 1980 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1047 1 0 0 0 6 1981 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1048 1 0 0 348 6 1982 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1049 1 0 0 0 6 1986 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1050 1 0 0 908 6 1984 0 0 0 0 0 0 0 0 0 0 0 0 0 A 1051 1 0 0 0 6 1985 0 0 0 0 0 0 0 0 0 0 0 0 0 Z Z