/wb,load,start ! starting to send loads /com,*********** Create "Heat Flux" *********** et,53,151 keyop,53,3,10 !get plane option and thickness from underlying element eblock,10,,,85 (15i9) 45720 53 53 53 0 2976 2977 3407 45721 53 53 53 0 2977 2978 3409 45722 53 53 53 0 2978 2979 3411 45723 53 53 53 0 2979 2980 3413 45724 53 53 53 0 2980 2981 3415 45725 53 53 53 0 2981 2982 3417 45726 53 53 53 0 2982 2983 3419 45727 53 53 53 0 2983 2984 3421 45728 53 53 53 0 2984 2985 3423 45729 53 53 53 0 2985 2986 3425 45730 53 53 53 0 2986 2987 3427 45731 53 53 53 0 2987 2988 3429 45732 53 53 53 0 2988 2989 3431 45733 53 53 53 0 2989 2990 3433 45734 53 53 53 0 2990 2991 3435 45735 53 53 53 0 2991 2992 3437 45736 53 53 53 0 2992 2993 3439 45737 53 53 53 0 2993 2994 3441 45738 53 53 53 0 2994 2995 3443 45739 53 53 53 0 2995 2996 3445 45740 53 53 53 0 2996 2997 3447 45741 53 53 53 0 2997 2998 3449 45742 53 53 53 0 2998 2999 3451 45743 53 53 53 0 2999 3000 3453 45744 53 53 53 0 3000 3001 3455 45745 53 53 53 0 3001 3002 3457 45746 53 53 53 0 3002 3003 3459 45747 53 53 53 0 3003 3004 3461 45748 53 53 53 0 3004 3005 3463 45749 53 53 53 0 3005 3006 3465 45750 53 53 53 0 3006 3007 3467 45751 53 53 53 0 3007 3008 3469 45752 53 53 53 0 3008 3009 3471 45753 53 53 53 0 3009 3010 3473 45754 53 53 53 0 3010 3011 3475 45755 53 53 53 0 3011 3012 3477 45756 53 53 53 0 3012 3013 3479 45757 53 53 53 0 3013 3014 3481 45758 53 53 53 0 3014 3015 3483 45759 53 53 53 0 3015 3016 3485 45760 53 53 53 0 3016 3017 3487 45761 53 53 53 0 3017 3018 3489 45762 53 53 53 0 3018 3019 3491 45763 53 53 53 0 3019 3020 3493 45764 53 53 53 0 3020 3021 3495 45765 53 53 53 0 3021 3022 3497 45766 53 53 53 0 3022 3023 3499 45767 53 53 53 0 3023 3024 3501 45768 53 53 53 0 3024 3025 3503 45769 53 53 53 0 3025 3026 3505 45770 53 53 53 0 3026 3027 3507 45771 53 53 53 0 3027 3028 3509 45772 53 53 53 0 3028 3029 3511 45773 53 53 53 0 3029 3030 3513 45774 53 53 53 0 3030 3031 3515 45775 53 53 53 0 3031 3032 3517 45776 53 53 53 0 3032 3033 3519 45777 53 53 53 0 3033 3034 3521 45778 53 53 53 0 3034 3035 3523 45779 53 53 53 0 3035 3036 3525 45780 53 53 53 0 3036 3037 3527 45781 53 53 53 0 3037 3038 3529 45782 53 53 53 0 3038 3039 3531 45783 53 53 53 0 3039 3040 3533 45784 53 53 53 0 3040 3041 3535 45785 53 53 53 0 3041 3042 3537 45786 53 53 53 0 3042 3043 3539 45787 53 53 53 0 3043 3044 3541 45788 53 53 53 0 3044 3045 3543 45789 53 53 53 0 3045 3046 3545 45790 53 53 53 0 3046 3047 3547 45791 53 53 53 0 3047 3048 3549 45792 53 53 53 0 3048 3049 3551 45793 53 53 53 0 3049 3050 3553 45794 53 53 53 0 3050 3051 3555 45795 53 53 53 0 3051 3052 3557 45796 53 53 53 0 3052 3053 3559 45797 53 53 53 0 3053 3054 3561 45798 53 53 53 0 3054 3055 3563 45799 53 53 53 0 3055 3056 3565 45800 53 53 53 0 3056 3057 3567 45801 53 53 53 0 3057 3058 3569 45802 53 53 53 0 3058 3059 3571 45803 53 53 53 0 3059 3060 3573 45804 53 53 53 0 3060 2973 3403 -1 esel,s,type,,53 keyop,53,8,1 ! include heat flux *DIM,_loadvari271,TABLE,9,1,1,TIME, ! Time values _loadvari271(1,0,1) = 0. _loadvari271(2,0,1) = 307. _loadvari271(3,0,1) = 661. _loadvari271(4,0,1) = 1055. _loadvari271(5,0,1) = 1344. _loadvari271(6,0,1) = 1674. _loadvari271(7,0,1) = 2865. _loadvari271(8,0,1) = 4093. _loadvari271(9,0,1) = 5274. ! Load values _loadvari271(1,1,1) = 0. _loadvari271(2,1,1) = 15818. _loadvari271(3,1,1) = 32651. _loadvari271(4,1,1) = 49630. _loadvari271(5,1,1) = 67770. _loadvari271(6,1,1) = 84893. _loadvari271(7,1,1) = 103904. _loadvari271(8,1,1) = 121898. _loadvari271(9,1,1) = 143376. /com,*********** Create "Heat Flux 2" *********** et,54,151 keyop,54,3,10 !get plane option and thickness from underlying element eblock,10,,,45 (15i9) 45805 54 54 54 0 40983 40984 42638 45806 54 54 54 0 40984 40985 42641 45807 54 54 54 0 40985 40986 42643 45808 54 54 54 0 40986 40987 42645 45809 54 54 54 0 40987 40988 42647 45810 54 54 54 0 40988 40989 42649 45811 54 54 54 0 40989 40990 42651 45812 54 54 54 0 40990 40991 42653 45813 54 54 54 0 40991 40992 42655 45814 54 54 54 0 40992 40993 42657 45815 54 54 54 0 40993 40994 42659 45816 54 54 54 0 40994 40995 42661 45817 54 54 54 0 40995 40996 42663 45818 54 54 54 0 40996 40997 42665 45819 54 54 54 0 40997 40998 42667 45820 54 54 54 0 40998 40999 42669 45821 54 54 54 0 40999 41000 42671 45822 54 54 54 0 41000 41001 42673 45823 54 54 54 0 41001 41002 42675 45824 54 54 54 0 41002 41003 42677 45825 54 54 54 0 41003 41004 42679 45826 54 54 54 0 41004 41005 42681 45827 54 54 54 0 41005 41006 42683 45828 54 54 54 0 41006 41007 42685 45829 54 54 54 0 41007 41008 42687 45830 54 54 54 0 41008 41009 42689 45831 54 54 54 0 41009 41010 42691 45832 54 54 54 0 41010 41011 42693 45833 54 54 54 0 41011 41012 42695 45834 54 54 54 0 41012 41013 42697 45835 54 54 54 0 41013 41014 42699 45836 54 54 54 0 41014 41015 42701 45837 54 54 54 0 41015 41016 42703 45838 54 54 54 0 41016 41017 42705 45839 54 54 54 0 41017 41018 42707 45840 54 54 54 0 41018 41019 42709 45841 54 54 54 0 41019 41020 42711 45842 54 54 54 0 41020 41021 42713 45843 54 54 54 0 41021 41022 42715 45844 54 54 54 0 41022 41023 42717 45845 54 54 54 0 41023 41024 42719 45846 54 54 54 0 41024 41025 42721 45847 54 54 54 0 41025 41026 42723 45848 54 54 54 0 41026 41027 42725 45849 54 54 54 0 41027 40980 42633 -1 esel,s,type,,54 keyop,54,8,1 ! include heat flux *DIM,_loadvari273,TABLE,9,1,1,TIME, ! Time values _loadvari273(1,0,1) = 0. _loadvari273(2,0,1) = 307. _loadvari273(3,0,1) = 661. _loadvari273(4,0,1) = 1055. _loadvari273(5,0,1) = 1344. _loadvari273(6,0,1) = 1674. _loadvari273(7,0,1) = 2865. _loadvari273(8,0,1) = 4093. _loadvari273(9,0,1) = 5274. ! Load values _loadvari273(1,1,1) = 0. _loadvari273(2,1,1) = 1566.2 _loadvari273(3,1,1) = 3233.5 _loadvari273(4,1,1) = 4914.3 _loadvari273(5,1,1) = 6711.1 _loadvari273(6,1,1) = 8406.1 _loadvari273(7,1,1) = 10288. _loadvari273(8,1,1) = 12069.9 _loadvari273(9,1,1) = 14196.6 /com,*********** Create "Heat Flux 3" *********** et,55,151 keyop,55,3,10 !get plane option and thickness from underlying element eblock,10,,,7 (15i9) 45850 55 55 55 0 40973 40974 42618 45851 55 55 55 0 40974 40975 42621 45852 55 55 55 0 40975 40976 42623 45853 55 55 55 0 40976 40977 42625 45854 55 55 55 0 40977 40978 42627 45855 55 55 55 0 40978 40979 42629 45856 55 55 55 0 40979 40968 42609 -1 esel,s,type,,55 keyop,55,8,1 ! include heat flux *DIM,_loadvari275,TABLE,9,1,1,TIME, ! Time values _loadvari275(1,0,1) = 0. _loadvari275(2,0,1) = 307. _loadvari275(3,0,1) = 661. _loadvari275(4,0,1) = 1055. _loadvari275(5,0,1) = 1344. _loadvari275(6,0,1) = 1674. _loadvari275(7,0,1) = 2865. _loadvari275(8,0,1) = 4093. _loadvari275(9,0,1) = 5274. ! Load values _loadvari275(1,1,1) = 0. _loadvari275(2,1,1) = 12173. _loadvari275(3,1,1) = 25128. _loadvari275(4,1,1) = 38195. _loadvari275(5,1,1) = 52156. _loadvari275(6,1,1) = 65334. _loadvari275(7,1,1) = 79965. _loadvari275(8,1,1) = 93814. _loadvari275(9,1,1) = 110343. /com,*********** Create "Heat Flux 4" *********** et,56,151 keyop,56,3,10 !get plane option and thickness from underlying element eblock,10,,,2 (15i9) 45857 56 56 56 0 25642 25829 26595 45858 56 56 56 0 25829 25809 26927 -1 esel,s,type,,56 keyop,56,8,1 ! include heat flux *DIM,_loadvari277,TABLE,9,1,1,TIME, ! Time values _loadvari277(1,0,1) = 0. _loadvari277(2,0,1) = 307. _loadvari277(3,0,1) = 661. _loadvari277(4,0,1) = 1055. _loadvari277(5,0,1) = 1344. _loadvari277(6,0,1) = 1674. _loadvari277(7,0,1) = 2865. _loadvari277(8,0,1) = 4093. _loadvari277(9,0,1) = 5274. ! Load values _loadvari277(1,1,1) = 0. _loadvari277(2,1,1) = 1594. _loadvari277(3,1,1) = 3291. _loadvari277(4,1,1) = 5003. _loadvari277(5,1,1) = 6832. _loadvari277(6,1,1) = 8558. _loadvari277(7,1,1) = 10475. _loadvari277(8,1,1) = 12289. _loadvari277(9,1,1) = 14454. /com,*********** Create "Heat Flux 5" *********** et,57,151 keyop,57,3,10 !get plane option and thickness from underlying element eblock,10,,,71 (15i9) 45859 57 57 57 0 49523 49524 54844 45860 57 57 57 0 49524 49525 54846 45861 57 57 57 0 49525 49526 54848 45862 57 57 57 0 49526 49527 54850 45863 57 57 57 0 49527 49528 54852 45864 57 57 57 0 49528 49529 54854 45865 57 57 57 0 49529 49530 54856 45866 57 57 57 0 49530 49531 54858 45867 57 57 57 0 49531 49532 54860 45868 57 57 57 0 49532 49533 54862 45869 57 57 57 0 49533 49534 54864 45870 57 57 57 0 49534 49535 54866 45871 57 57 57 0 49535 49536 54868 45872 57 57 57 0 49536 49537 54870 45873 57 57 57 0 49537 49538 54872 45874 57 57 57 0 49538 49539 54874 45875 57 57 57 0 49539 49540 54876 45876 57 57 57 0 49540 49541 54878 45877 57 57 57 0 49541 49542 54880 45878 57 57 57 0 49542 49543 54882 45879 57 57 57 0 49543 49544 54884 45880 57 57 57 0 49544 49545 54886 45881 57 57 57 0 49545 49546 54888 45882 57 57 57 0 49546 49547 54890 45883 57 57 57 0 49547 49548 54892 45884 57 57 57 0 49548 49549 54894 45885 57 57 57 0 49549 49550 54896 45886 57 57 57 0 49550 49551 54898 45887 57 57 57 0 49551 49552 54900 45888 57 57 57 0 49552 49553 54902 45889 57 57 57 0 49553 49554 54904 45890 57 57 57 0 49554 49555 54906 45891 57 57 57 0 49555 49556 54908 45892 57 57 57 0 49556 49557 54910 45893 57 57 57 0 49557 49558 54912 45894 57 57 57 0 49558 49559 54914 45895 57 57 57 0 49559 49560 54916 45896 57 57 57 0 49560 49561 54918 45897 57 57 57 0 49561 49562 54920 45898 57 57 57 0 49562 49563 54922 45899 57 57 57 0 49563 49564 54924 45900 57 57 57 0 49564 49565 54926 45901 57 57 57 0 49565 49566 54928 45902 57 57 57 0 49566 49567 54930 45903 57 57 57 0 49567 49568 54932 45904 57 57 57 0 49568 49569 54934 45905 57 57 57 0 49569 49570 54936 45906 57 57 57 0 49570 49571 54938 45907 57 57 57 0 49571 49572 54940 45908 57 57 57 0 49572 49573 54942 45909 57 57 57 0 49573 49574 54944 45910 57 57 57 0 49574 49575 54946 45911 57 57 57 0 49575 49576 54948 45912 57 57 57 0 49576 49577 54950 45913 57 57 57 0 49577 49578 54952 45914 57 57 57 0 49578 49579 54954 45915 57 57 57 0 49579 49580 54956 45916 57 57 57 0 49580 49581 54958 45917 57 57 57 0 49581 49582 54960 45918 57 57 57 0 49582 49583 54962 45919 57 57 57 0 49583 49584 54964 45920 57 57 57 0 49584 49585 54966 45921 57 57 57 0 49585 49586 54968 45922 57 57 57 0 49586 49587 54970 45923 57 57 57 0 49587 49588 54972 45924 57 57 57 0 49588 49589 54974 45925 57 57 57 0 49589 49590 54976 45926 57 57 57 0 49590 49591 54978 45927 57 57 57 0 49591 49592 54980 45928 57 57 57 0 49592 49453 54706 45929 57 57 57 0 49312 49523 54426 -1 esel,s,type,,57 keyop,57,8,1 ! include heat flux *DIM,_loadvari402,TABLE,3,1,1,TIME, ! Time values _loadvari402(1,0,1) = 0. _loadvari402(2,0,1) = 4500. _loadvari402(3,0,1) = 4900. ! Load values _loadvari402(1,1,1) = 0. _loadvari402(2,1,1) = 0. _loadvari402(3,1,1) = -102986. esel,all fcum,add ! add nodal forces up (needed in case have loads on the same edge,vertex) fcum ! reset default on fcum command since done sending WB F loads