readinputs.f90
05a553ae087cmaster

readinputs.f90
View Options

			SUBROUTINE readinputs
			! Additional data for Coulomb Collision

			USE MODEL, ONLY: model_readinputs,operatormodel_readinput
			USE BASIC_MPI

			IMPLICIT NONE

			IF(me .eq. 0) WRITE(*,'(a/)') '=== Define Physical Data ==='
			!
			CALL model_readinputs

			IF(me .eq. 0) WRITE(*,'(a/)') '=== Define Model Collision Operator ==='
			!
			CALL operatormodel_readinput
			!
			END SUBROUTINE readinputs