@@ -15,9 +15,9 @@ module ChfChdInputModule
1515 logical :: auxiliary = .false.
1616 logical :: auxmultname = .false.
1717 logical :: boundnames = .false.
18- logical :: print_input = .false.
19- logical :: print_flows = .false.
20- logical :: save_flows = .false.
18+ logical :: iprpak = .false.
19+ logical :: iprflow = .false.
20+ logical :: ipakcb = .false.
2121 logical :: ts_filerecord = .false.
2222 logical :: ts6 = .false.
2323 logical :: filein = .false.
@@ -28,7 +28,7 @@ module ChfChdInputModule
2828 logical :: maxbound = .false.
2929 logical :: cellid = .false.
3030 logical :: head = .false.
31- logical :: aux = .false.
31+ logical :: auxvar = .false.
3232 logical :: boundname = .false.
3333 end type ChfChdParamFoundType
3434
@@ -98,13 +98,13 @@ module ChfChdInputModule
9898 )
9999
100100 type (InputParamDefinitionType), parameter :: &
101- chfchd_print_input = InputParamDefinitionType &
101+ chfchd_iprpak = InputParamDefinitionType &
102102 ( &
103103 ' CHF' , & ! component
104104 ' CHD' , & ! subcomponent
105105 ' OPTIONS' , & ! block
106106 ' PRINT_INPUT' , & ! tag name
107- ' PRINT_INPUT ' , & ! fortran variable
107+ ' IPRPAK ' , & ! fortran variable
108108 ' KEYWORD' , & ! type
109109 ' ' , & ! shape
110110 ' print input to listing file' , & ! longname
@@ -117,13 +117,13 @@ module ChfChdInputModule
117117 )
118118
119119 type (InputParamDefinitionType), parameter :: &
120- chfchd_print_flows = InputParamDefinitionType &
120+ chfchd_iprflow = InputParamDefinitionType &
121121 ( &
122122 ' CHF' , & ! component
123123 ' CHD' , & ! subcomponent
124124 ' OPTIONS' , & ! block
125125 ' PRINT_FLOWS' , & ! tag name
126- ' PRINT_FLOWS ' , & ! fortran variable
126+ ' IPRFLOW ' , & ! fortran variable
127127 ' KEYWORD' , & ! type
128128 ' ' , & ! shape
129129 ' print CHD flows to listing file' , & ! longname
@@ -136,13 +136,13 @@ module ChfChdInputModule
136136 )
137137
138138 type (InputParamDefinitionType), parameter :: &
139- chfchd_save_flows = InputParamDefinitionType &
139+ chfchd_ipakcb = InputParamDefinitionType &
140140 ( &
141141 ' CHF' , & ! component
142142 ' CHD' , & ! subcomponent
143143 ' OPTIONS' , & ! block
144144 ' SAVE_FLOWS' , & ! tag name
145- ' SAVE_FLOWS ' , & ! fortran variable
145+ ' IPAKCB ' , & ! fortran variable
146146 ' KEYWORD' , & ! type
147147 ' ' , & ! shape
148148 ' save CHD flows to budget file' , & ! longname
@@ -345,13 +345,13 @@ module ChfChdInputModule
345345 )
346346
347347 type (InputParamDefinitionType), parameter :: &
348- chfchd_aux = InputParamDefinitionType &
348+ chfchd_auxvar = InputParamDefinitionType &
349349 ( &
350350 ' CHF' , & ! component
351351 ' CHD' , & ! subcomponent
352352 ' PERIOD' , & ! block
353353 ' AUX' , & ! tag name
354- ' AUX ' , & ! fortran variable
354+ ' AUXVAR ' , & ! fortran variable
355355 ' DOUBLE1D' , & ! type
356356 ' NAUX' , & ! shape
357357 ' auxiliary variables' , & ! longname
@@ -388,9 +388,9 @@ module ChfChdInputModule
388388 chfchd_auxiliary, &
389389 chfchd_auxmultname, &
390390 chfchd_boundnames, &
391- chfchd_print_input , &
392- chfchd_print_flows , &
393- chfchd_save_flows , &
391+ chfchd_iprpak , &
392+ chfchd_iprflow , &
393+ chfchd_ipakcb , &
394394 chfchd_ts_filerecord, &
395395 chfchd_ts6, &
396396 chfchd_filein, &
@@ -401,7 +401,7 @@ module ChfChdInputModule
401401 chfchd_maxbound, &
402402 chfchd_cellid, &
403403 chfchd_head, &
404- chfchd_aux , &
404+ chfchd_auxvar , &
405405 chfchd_boundname &
406406 ]
407407
0 commit comments