V26 c_fracn 18 MODULE_C_FRACN.f90 S582 0 07/31/2020 17:57:59 use f77kinds public 0 direct enduse D 56 21 8 3 58 57 0 1 0 0 1 33 37 51 33 37 35 39 43 53 39 43 41 45 49 55 45 49 47 D 59 21 6 1 0 30 0 0 0 0 0 0 30 0 3 30 0 D 62 21 8 3 79 78 0 1 0 0 1 63 66 75 63 66 64 67 70 76 67 70 68 71 74 77 71 74 72 D 65 21 6 1 0 30 0 0 0 0 0 0 30 0 3 30 0 D 68 21 8 3 100 99 0 1 0 0 1 84 87 96 84 87 85 88 91 97 88 91 89 92 95 98 92 95 93 D 71 21 6 1 0 30 0 0 0 0 0 0 30 0 3 30 0 S 582 24 0 0 0 8 1 0 4658 5 0 A 0 0 0 0 0 0 0 0 0 0 0 0 35 0 0 0 0 0 0 0 0 15 0 0 0 0 0 0 c_fracn S 586 3 0 0 0 6 1 1 0 0 0 A 0 0 0 0 0 0 0 0 0 8 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 6 S 599 6 4 0 0 6 600 582 4711 40800006 0 A 0 0 0 0 0 0 0 0 0 0 0 0 634 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 z_b_0 S 600 6 4 0 0 6 601 582 4717 40800006 0 A 0 0 0 0 0 4 0 0 0 0 0 0 634 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 z_b_1 S 601 6 4 0 0 6 619 582 4723 40800006 0 A 0 0 0 0 0 8 0 0 0 0 0 0 634 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 z_b_2 S 602 7 6 0 0 56 1 582 4729 10a00024 51 A 0 0 0 0 0 0 605 0 0 0 607 0 0 0 0 0 0 0 0 604 0 0 606 582 0 0 0 0 f_ice S 603 3 0 0 0 6 0 1 0 0 0 A 0 0 0 0 0 0 0 0 0 30 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 6 S 604 8 4 0 0 59 623 582 4735 40822064 1020 A 0 0 0 0 0 0 0 0 0 0 0 0 634 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 f_ice$sd S 605 6 4 0 0 7 606 582 4744 40802061 1020 A 0 0 0 0 0 120 0 0 0 0 0 0 634 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 f_ice$p S 606 6 4 0 0 7 604 582 4752 40802060 1020 A 0 0 0 0 0 128 0 0 0 0 0 0 634 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 f_ice$o S 607 22 1 0 0 8 1 582 4760 40000000 1000 A 0 0 0 0 0 0 0 602 0 0 0 0 604 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 f_ice$arrdsc S 608 3 0 0 0 6 0 1 0 0 0 A 0 0 0 0 0 0 0 0 0 13 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 6 S 609 3 0 0 0 6 0 1 0 0 0 A 0 0 0 0 0 0 0 0 0 14 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 6 S 610 3 0 0 0 6 0 1 0 0 0 A 0 0 0 0 0 0 0 0 0 19 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 6 S 611 3 0 0 0 6 0 1 0 0 0 A 0 0 0 0 0 0 0 0 0 20 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 6 S 612 3 0 0 0 6 0 1 0 0 0 A 0 0 0 0 0 0 0 0 0 25 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 6 S 613 3 0 0 0 6 0 1 0 0 0 A 0 0 0 0 0 0 0 0 0 26 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 6 S 614 3 0 0 0 6 0 1 0 0 0 A 0 0 0 0 0 0 0 0 0 17 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 6 S 615 3 0 0 0 6 0 1 0 0 0 A 0 0 0 0 0 0 0 0 0 23 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 6 S 616 3 0 0 0 6 0 1 0 0 0 A 0 0 0 0 0 0 0 0 0 29 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 6 S 617 3 0 0 0 6 0 1 0 0 0 A 0 0 0 0 0 0 0 0 0 7 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 6 S 618 7 6 0 0 62 1 582 4773 10a00024 51 A 0 0 0 0 0 0 623 0 0 0 625 0 0 0 0 0 0 0 0 622 0 0 624 582 0 0 0 0 f_rain S 619 6 4 0 0 6 620 582 4780 40800006 0 A 0 0 0 0 0 12 0 0 0 0 0 0 634 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 z_b_3 S 620 6 4 0 0 6 621 582 4786 40800006 0 A 0 0 0 0 0 16 0 0 0 0 0 0 634 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 z_b_4 S 621 6 4 0 0 6 627 582 4792 40800006 0 A 0 0 0 0 0 20 0 0 0 0 0 0 634 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 z_b_5 S 622 8 4 0 0 65 631 582 4798 40822064 1020 A 0 0 0 0 0 136 0 0 0 0 0 0 634 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 f_rain$sd S 623 6 4 0 0 7 624 582 4808 40802061 1020 A 0 0 0 0 0 256 0 0 0 0 0 0 634 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 f_rain$p S 624 6 4 0 0 7 622 582 4817 40802060 1020 A 0 0 0 0 0 264 0 0 0 0 0 0 634 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 f_rain$o S 625 22 1 0 0 8 1 582 4826 40000000 1000 A 0 0 0 0 0 0 0 618 0 0 0 0 622 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 f_rain$arrdsc S 626 7 6 0 0 68 1 582 4840 10a00024 51 A 0 0 0 0 0 0 631 0 0 0 633 0 0 0 0 0 0 0 0 630 0 0 632 582 0 0 0 0 f_rimef S 627 6 4 0 0 6 628 582 4848 40800006 0 A 0 0 0 0 0 24 0 0 0 0 0 0 634 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 z_b_6 S 628 6 4 0 0 6 629 582 4854 40800006 0 A 0 0 0 0 0 28 0 0 0 0 0 0 634 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 z_b_7 S 629 6 4 0 0 6 1 582 4860 40800006 0 A 0 0 0 0 0 32 0 0 0 0 0 0 634 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 z_b_8 S 630 8 4 0 0 71 599 582 4866 40822064 1020 A 0 0 0 0 0 272 0 0 0 0 0 0 634 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 f_rimef$sd S 631 6 4 0 0 7 632 582 4877 40802061 1020 A 0 0 0 0 0 392 0 0 0 0 0 0 634 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 f_rimef$p S 632 6 4 0 0 7 630 582 4887 40802060 1020 A 0 0 0 0 0 400 0 0 0 0 0 0 634 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 f_rimef$o S 633 22 1 0 0 8 1 582 4897 40000000 1000 A 0 0 0 0 0 0 0 626 0 0 0 0 630 0 0 0 0 0 0 0 0 0 0 582 0 0 0 0 f_rimef$arrdsc S 634 11 0 0 0 8 1 582 4912 40800000 801000 A 0 0 0 0 0 444 0 0 605 629 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 _c_fracn$0 A 18 2 0 0 0 6 586 0 0 0 18 0 0 0 0 0 0 0 0 0 A 30 2 0 0 0 6 603 0 0 0 30 0 0 0 0 0 0 0 0 0 A 31 2 0 0 0 6 608 0 0 0 31 0 0 0 0 0 0 0 0 0 A 32 1 0 1 0 59 604 0 0 0 0 0 0 0 0 0 0 0 0 0 A 33 10 0 0 0 6 32 1 0 0 0 0 0 0 0 0 0 0 0 0 X 1 31 A 34 2 0 0 0 6 609 0 0 0 34 0 0 0 0 0 0 0 0 0 A 35 10 0 0 33 6 32 4 0 0 0 0 0 0 0 0 0 0 0 0 X 1 34 A 36 4 0 0 0 6 35 0 3 0 0 0 0 2 0 0 0 0 0 0 A 37 4 0 0 0 6 33 0 36 0 0 0 0 1 0 0 0 0 0 0 A 38 2 0 0 0 6 610 0 0 0 38 0 0 0 0 0 0 0 0 0 A 39 10 0 0 35 6 32 7 0 0 0 0 0 0 0 0 0 0 0 0 X 1 38 A 40 2 0 0 0 6 611 0 0 0 40 0 0 0 0 0 0 0 0 0 A 41 10 0 0 39 6 32 10 0 0 0 0 0 0 0 0 0 0 0 0 X 1 40 A 42 4 0 0 0 6 41 0 3 0 0 0 0 2 0 0 0 0 0 0 A 43 4 0 0 0 6 39 0 42 0 0 0 0 1 0 0 0 0 0 0 A 44 2 0 0 0 6 612 0 0 0 44 0 0 0 0 0 0 0 0 0 A 45 10 0 0 41 6 32 13 0 0 0 0 0 0 0 0 0 0 0 0 X 1 44 A 46 2 0 0 0 6 613 0 0 0 46 0 0 0 0 0 0 0 0 0 A 47 10 0 0 45 6 32 16 0 0 0 0 0 0 0 0 0 0 0 0 X 1 46 A 48 4 0 0 0 6 47 0 3 0 0 0 0 2 0 0 0 0 0 0 A 49 4 0 0 24 6 45 0 48 0 0 0 0 1 0 0 0 0 0 0 A 50 2 0 0 0 6 614 0 0 0 50 0 0 0 0 0 0 0 0 0 A 51 10 0 0 47 6 32 19 0 0 0 0 0 0 0 0 0 0 0 0 X 1 50 A 52 2 0 0 0 6 615 0 0 0 52 0 0 0 0 0 0 0 0 0 A 53 10 0 0 51 6 32 22 0 0 0 0 0 0 0 0 0 0 0 0 X 1 52 A 54 2 0 0 0 6 616 0 0 0 54 0 0 0 0 0 0 0 0 0 A 55 10 0 0 53 6 32 25 0 0 0 0 0 0 0 0 0 0 0 0 X 1 54 A 56 2 0 0 0 6 617 0 0 0 56 0 0 0 0 0 0 0 0 0 A 57 10 0 0 55 6 32 28 0 0 0 0 0 0 0 0 0 0 0 0 X 1 56 A 58 10 0 0 57 6 32 31 0 0 0 0 0 0 0 0 0 0 0 0 X 1 18 A 62 1 0 1 0 65 622 0 0 0 0 0 0 0 0 0 0 0 0 0 A 63 10 0 0 62 6 62 1 0 0 0 0 0 0 0 0 0 0 0 0 X 1 31 A 64 10 0 0 63 6 62 4 0 0 0 0 0 0 0 0 0 0 0 0 X 1 34 A 65 4 0 0 0 6 64 0 3 0 0 0 0 2 0 0 0 0 0 0 A 66 4 0 0 0 6 63 0 65 0 0 0 0 1 0 0 0 0 0 0 A 67 10 0 0 64 6 62 7 0 0 0 0 0 0 0 0 0 0 0 0 X 1 38 A 68 10 0 0 67 6 62 10 0 0 0 0 0 0 0 0 0 0 0 0 X 1 40 A 69 4 0 0 0 6 68 0 3 0 0 0 0 2 0 0 0 0 0 0 A 70 4 0 0 0 6 67 0 69 0 0 0 0 1 0 0 0 0 0 0 A 71 10 0 0 68 6 62 13 0 0 0 0 0 0 0 0 0 0 0 0 X 1 44 A 72 10 0 0 71 6 62 16 0 0 0 0 0 0 0 0 0 0 0 0 X 1 46 A 73 4 0 0 0 6 72 0 3 0 0 0 0 2 0 0 0 0 0 0 A 74 4 0 0 0 6 71 0 73 0 0 0 0 1 0 0 0 0 0 0 A 75 10 0 0 72 6 62 19 0 0 0 0 0 0 0 0 0 0 0 0 X 1 50 A 76 10 0 0 75 6 62 22 0 0 0 0 0 0 0 0 0 0 0 0 X 1 52 A 77 10 0 0 76 6 62 25 0 0 0 0 0 0 0 0 0 0 0 0 X 1 54 A 78 10 0 0 77 6 62 28 0 0 0 0 0 0 0 0 0 0 0 0 X 1 56 A 79 10 0 0 78 6 62 31 0 0 0 0 0 0 0 0 0 0 0 0 X 1 18 A 83 1 0 1 0 71 630 0 0 0 0 0 0 0 0 0 0 0 0 0 A 84 10 0 0 12 6 83 1 0 0 0 0 0 0 0 0 0 0 0 0 X 1 31 A 85 10 0 0 84 6 83 4 0 0 0 0 0 0 0 0 0 0 0 0 X 1 34 A 86 4 0 0 0 6 85 0 3 0 0 0 0 2 0 0 0 0 0 0 A 87 4 0 0 0 6 84 0 86 0 0 0 0 1 0 0 0 0 0 0 A 88 10 0 0 85 6 83 7 0 0 0 0 0 0 0 0 0 0 0 0 X 1 38 A 89 10 0 0 88 6 83 10 0 0 0 0 0 0 0 0 0 0 0 0 X 1 40 A 90 4 0 0 0 6 89 0 3 0 0 0 0 2 0 0 0 0 0 0 A 91 4 0 0 0 6 88 0 90 0 0 0 0 1 0 0 0 0 0 0 A 92 10 0 0 89 6 83 13 0 0 0 0 0 0 0 0 0 0 0 0 X 1 44 A 93 10 0 0 92 6 83 16 0 0 0 0 0 0 0 0 0 0 0 0 X 1 46 A 94 4 0 0 0 6 93 0 3 0 0 0 0 2 0 0 0 0 0 0 A 95 4 0 0 0 6 92 0 94 0 0 0 0 1 0 0 0 0 0 0 A 96 10 0 0 93 6 83 19 0 0 0 0 0 0 0 0 0 0 0 0 X 1 50 A 97 10 0 0 96 6 83 22 0 0 0 0 0 0 0 0 0 0 0 0 X 1 52 A 98 10 0 0 97 6 83 25 0 0 0 0 0 0 0 0 0 0 0 0 X 1 54 A 99 10 0 0 98 6 83 28 0 0 0 0 0 0 0 0 0 0 0 0 X 1 56 A 100 10 0 0 99 6 83 31 0 0 0 0 0 0 0 0 0 0 0 0 X 1 18 Z Z